Hi Aleksey,
>
How exactly it doesn't work? What happens? What do you expect?
Take a look into thread #766577, it may answer the question.Yes, what happens is what Ed Aguinaga says in message #
025991:
"I'll second this one. I have a great deal of Visual FoxPro 6 and 7 code that uses SQL Passthrough. Under VFP8 it always acts like Synchronous is set to .T."In the loop below, it never gets to the "
If InKey (.001) = 27". It seems what Ed said:
"Under VFP8 it always acts like Synchronous is set to .T."It should be expected to get some records (CursorSetProp ("FetchSize", 100, 0)), loop, test for Inkey(.001), get some more records and so on.
Do While SQLExec (gSQLHandle) = 0
If InKey (.001) = 27
If MessageBox ("Do you want to stop executing SQL command ?", ;
(4+48+256), cCaption) = 7
Loop
endif
SqlCancel (gSQLHandle)
bInterrupted = .T.
Exit
endif
EndDo
Thanks,
Fernando