不定时提示: 连接#1忙 VFP+SQLSERVER
h1=SQLSTRINGCONNECT( 'Driver=SQL SERVER;server=IP;data source=crgdjy;uid=sa;pwd=***)
1 ?SQLEXEC(h1, "delete from fullstudent where username= 'wwle ' ")
返回结果是 -1 不提示#1忙
2 在程序整体运行中
有时直接进行删除操作,有时提示 连接#1忙
3 在sql 查询分析器中没有问题
[解决办法]
检查是否设置了共享连接
hh = SQLSTRINGCONNECT( 'Driver=SQL .....
messagebox(sqlgetprop(hh,'Shared'))
如果显示 .T.,则在连接前先用 sqlsetprop(0, 'Shared', .f.) 设置不共享
如果一定要共享连接,设置临时表的 FetchSize 为 -1
cursorsetprop('FetchSize', -1, 0)
[解决办法]
1. 用 ca 类,不应该会出现 1 楼中的语句:
?SQLEXEC(h1, "delete from fullstudent where username= 'wwle ' ")
2. ca 中同样存在这些参数对应的属性
oCa = NewObject('CursorAdapter')
? oCa.FetchSize, oCa.MaxRecords && 这两个最好都设置为 -1
若是用 ca builder 则更简单,勾选上两个选项即可(至少第二个要选上)