質問

私はこれを理解しようとして頭から髪を引っ張っています。

パラメーターを使用しているときに、VB.NETで動作するパラメーター化されたクエリを作成することはできません。

私が見つけたものから、関数のパラメーターを使用して、.NETからエラーが発生します(サンプルコードを参照)。ただし、Visual Studioのクエリウィンドウで動作しないクエリを実行すると、適切に機能します。

発生したエラーは次のとおりです。

25922-関数の引数は無効です。

情報:http://msdn.microsoft.com/en-us/library/aa25672%28sql.80%29.aspx

サンプルコード:

Imports System.Data.SqlServerCe

Public Class MiniDemo

    Public Shared Sub Main()
        Dim cs As String = "Data Source=Inventory.sdf; Persist Security Info=False;"
        Dim db As New SqlCeConnection(cs)
        db.Open()


        ''#Using parameters works
        Dim cmd As SqlCeCommand = db.CreateCommand()

        cmd.CommandText = "INSERT INTO inventory_type (inv_type_id, inv_type_name) VALUES (@id, @name)"
        cmd.Parameters.Add("@id", 1)
        cmd.Parameters.Add("@name", "test")
        cmd.ExecuteNonQuery()



        ''#Using parameters in functions does not work
        Dim cmd2 As SqlCeCommand = db.CreateCommand()

            ''#Broken on multiple lines for readability (built using string builders in real code)
        cmd2.CommandText = 
                     "SELECT 
                        inv_type_id, 
                        inv_type_name 
                      FROM
                        inventory_type 
                      WHERE 
                        ((@id IS NULL) OR (inv_type_id = @id)) AND 
                        ((@name IS NULL) OR (inv_type_name = @name))"

        cmd2.Parameters.Add("@id", 1)
        cmd2.Parameters.Add("@name", "test") ''# Would not work with DBNull.Value either

        Dim da2 As New SqlCeDataAdapter(cmd2)
        Dim dt2 As New DataTable()
        da2.Fill(dt2)
        db.Close()
    End Sub

End Class
役に立ちましたか?

解決

最後に、この問題の解決策を見つけました。

パラメーターのDBTypeプロパティが設定されていない場合、関数でパラメーターを使用すると、次のことがわかります。

これはクラッシュします:

    Dim cmd As SqlCeCommand = db.CreateCommand()

    cmd.CommandText = "SELECT COALESCE(@param1, @param2);"
    cmd.Parameters.Add("@param1", 1)
    cmd.Parameters.Add("@param2", "test")
    cmd.ExecuteScalar()

パラメーターのDBTYPEプロパティが機能する場合、関数でパラメーターを使用すると機能します 設定

これは機能します:

    Dim cmd As SqlCeCommand = db.CreateCommand()

    cmd.CommandText = "SELECT COALESCE(@param1, @param2);"
    cmd.Parameters.Add("@param1", 1).DbType = DbType.Int32
    cmd.Parameters.Add("@param2", "test").DbType = DbType.String
    cmd.ExecuteScalar()
ライセンス: CC-BY-SA帰属
所属していません StackOverflow
scroll top