MS SQL Асинхронная команда

[VirginGran]

Visual Basic 6
в программе выполняю SQL запрос с помощью ExecuteWithResults
программа выполняет его минут за 10
все это время окно "дохлое" - типа зависшее
нужно запустить запрос асинхронно, чтобы прога и дальше "жила", а запрос выполнялся
реально ли это?

[Konst_One]

да:

Код: Выделить всё

Dim rs As ADODB.Recordset
Dim cn As ADODB.Connection

    Set cn = New ADODB.Connection
    cn.CursorLocation = adUseClient
    cn.Open ConnectString
   
    Set rs = New ADODB.Recordset
    Set rs.ActiveConnection = cn
   
    rs.CursorLocation = adUseClient
    rs.PageSize = 100
    rs.CacheSize = 1000
    rs.Open SQL, , adOpenStatic, adLockReadOnly, adCmdText Or adAsyncFetchNonBlocking

[Konst_One]

adOpenStatic, adLockReadOnly - а это тебе ничего не говорит
открой справку по ADODB и почитай еще разок

[JumpingJack]

Хаха=) Ответ не туда)

[GSerg]

VirginGran, мой юный друг!.. Создавать тему, которая в точности повторяет вопрос, висящий первым в данном форуме - это несколько чересчур, не кажется ли тебе?..

[Add]Хм, Раздел не тот... Но тема первая всё равно. http://bbs.vbstreets.ru/viewtopic.php?t=24699

[Konst_One]