Соединение ADODB SQLServer с поиском и индексированием - PullRequest
Новая
       9

Соединение ADODB SQLServer с поиском и индексированием

0 голосов
/ 18 февраля 2019

В моей программе я хочу подключиться к SQL Server с помощью ADODB.Connection, затем прочитать данные с помощью ADODB.RecordSet и использовать Index и Seek для поиска искомой записи.

Я пытался использовать эту строку подключения Provider=SQLNCLI11;;Data Source=localhost;Initial Catalog=TestDB;Integrated Security=SSPI;Persist Security Info=False;, adOpenDynamic как cursorType, adLockOptimistic как LockType и adCmdTable как CommandType.Но когда я пытаюсь вызвать метод Supports для набора записей с помощью adSeek или adIndex возвращает false.

Есть ли способ подключиться к SQL Server и открыть набор записей с поддержкой поиска и индексации?

Редактируйте здесь код: 

LOCAL oCn, nCursor, nLock,oRS
oCn                     := CreateObject( "ADODB.Connection" )
oCn:ConnectionString    := "Provider=SQLNCLI11;;Data Source=localhost;Initial Catalog=TLPosWin;Integrated Security=SSPI;Persist Security Info=False;"
oRS                     := CreateObject( "ADODB.RecordSet" )
nCursor                 := adOpenDynamic
nLock                   := adLockOptimistic
oRS:CursorLocation      := adUseServer
oRS:Open("Articoli",oCn, nCursor, nLock, adCmdTable)
? "seek",oRS:Supports(0x200000),"index",oRS:Supports(0x100000) //both false
oRS:Index := "Articoli_ARTART" //Error
oRS:Seek('=',1,'000611') //Error
...