读书人

不定时提醒: 连接#1忙 VFP+SQLSERVER

发布时间: 2012-10-16 09:57:37 作者: rapoo

不定时提示: 连接#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 则更简单,勾选上两个选项即可(至少第二个要选上)

读书人网 >VFP

热点推荐