2

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

パラメータを使用している場合、VB.Net でパラメータ化されたクエリを機能させることができません。

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

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

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

情報: http://msdn.microsoft.com/en-us/library/aa256772%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
4

1 に答える 1

4

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

パラメータの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()
于 2009-12-03T19:15:08.133 に答える