Ошибка .net поставщика данных Sqlite: командная строка ответа SQL отличается от поставщика SQLite ADO.NET

Я обнаружил проблему, которая, возможно, является ошибкой в ​​поставщике SQLite ADO.NET.

Среда — Windows 7 Pro с использованием Visual Studio 2012 Professional с Visual Basic.net и ADO.NET 2.0. Версия поставщика данных 1.0.66.0 — v2.0.50727.

Для тестирования я использую простую базу данных SQLite с одной таблицей («операции»).

Данные выглядят так:

ID|TYPE|CODE|SIGN|DATE 
15|TE|MC_02|ACME|2007-02-13
132|TE|MC_02|ACME|2009-01-16
190|TE|MC_02|ACME|2011-02-18
596|M|MC_02|MA|2009-06-17
703|M|MC_02|MA|2009-11-30
796|M|MC_02|MA|2010-06-10
898|M|MC_02|NQ|2011-07-04
929|M|MC_02|NQ|2011-12-02
980|M|MC_02|NQ|2012-01-02
1011|M|MC_02|NQ|2012-06-29
1061|M|MC_02|NQ|2012-12-05
1062|M|MC_02|AB|2000-01-01

Если я запускаю следующую инструкцию SQL SELECT с командной строкой:

D:\DB>sqlite3 test.db

Sqlite>SELECT *, MAX(DATE) FROM operations WHERE CODE = 'MC_02' GROUP BY TYPE;

У меня (правильно):

1061|M|MC_02|NQ|2012-12-05|2012-12-05 
190|TE|MC_02|ACME|2011-02-18|2011-02-18

Вместо этого, если я использую приведенный ниже код VB.net (просто форма с кнопкой):

Public Class Form1
    Dim arrSelect As New ArrayList
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim strConnection As String = "data source= D:\DB\test.db"
        Dim strQuery As String = "SELECT *, MAX(DATE) FROM operations WHERE CODE = 'MC_02' GROUP BY TYPE"
        Dim strRecord As String = ""
        arrSelect = SelectSQL(strConnection, strQuery)
        If arrSelect IsNot Nothing Then
            For Each value As Array In arrSelect
                strRecord = ""
                For j As Integer = 0 To value.Length - 1
                    strRecord &= value(j) & "|"
                Next
                Console.WriteLine(strRecord)
            Next
        End If
    End Sub

    Function SelectSQL(ByVal strConn As String, ByVal strCommand As String) As ArrayList
        Try
            Dim SQLconnect As New SQLite.SQLiteConnection()
            Dim SQLcommand As New SQLite.SQLiteCommand
            SQLconnect.ConnectionString = strConn
            SQLconnect.Open()
            SQLcommand = SQLconnect.CreateCommand
            SQLcommand.CommandText = strCommand
            Dim SQLreader As SQLite.SQLiteDataReader = SQLcommand.ExecuteReader()
            Dim listLoc As New ArrayList
            Dim nc As Integer = SQLreader.FieldCount
            Dim arrLoc() As Object
            While SQLreader.Read()
                ReDim arrLoc(nc - 1)
                For j As Integer = 0 To nc - 1
                    arrLoc(j) = SQLreader.Item(j)
                Next
                listLoc.Add(arrLoc)
            End While
            SQLcommand.Dispose()
            SQLconnect.Close()
            Return listLoc
        Catch ex As Exception
            Return Nothing
        End Try
    End Function
End Class

У вас есть этот результат (неправильно):

1062|M|MC_02|AB|2000-01-01
190|TE|MC_02|ACME|2011-02-18

Кто-нибудь уже сталкивался с таким поведением?

Является ли это ошибкой поставщика данных? Или я что-то не так делаю?


person Andrea xit    schedule 28.02.2013    source источник


Ответы (1)


Этот тип запроса работает только в SQLite 3.7.11 и более поздних версиях, поэтому вам следует обновить поставщика до версии 1.0.80.0 или более поздней.

person CL.    schedule 28.02.2013
comment
Спасибо за ответ. Извините за задержку, в прошлый раз я не мог уделить много времени этой работе. Я перешел на Data Provider v 1.0.84 и в тестовом уменьшенном проекте вроде все работает. Когда у меня будет время, я применю это к реальному проекту. Еще раз спасибо. Привет. - person Andrea xit; 12.03.2013