例如:
dim record as new adodb.recordset
dim conn as adodb.connection
set conn=getconn() '调用过程
if record.state then record.close
record.open "select name from emp",conn,adopenstatic,adlockoptimistic
if not (record.eof and record.bof) then
do while not record.eof
listview1.listitem.add ,,record!name
record.movenext
loop
endif
如果把这句话放到查询分析器中去执行会得到:
aaaaa
bbbbb
ccccc
ddddd
但是从listview1中返回的结果却是:
aaaaa
aaaaa
aaaaa
aaaaa
只不过是一个小例子,我一般用的都是更复杂的SQL语句
为什么??
我在有时候把记录集后面的锁去掉就没问题!
这种情况发生了许多次!每次发生时返回的结果都和数据库中的记录不同!
这次是去掉锁也不可以了!