SQLServerCE Проблема с параметризованными запросами из .NET - PullRequest
Новая
       12

SQLServerCE Проблема с параметризованными запросами из .NET

2 голосов
/ 03 декабря 2009

Я вытаскиваю волосы из головы, пытаясь понять это.

Я не могу заставить параметризованные запросы работать в 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

1 Ответ

4 голосов
/ 03 декабря 2009

Наконец-то я нашел решение этой проблемы.

При использовании параметра в функции происходит сбой, если свойство 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()
...