我有一个如下的
tCodeDetail表:
code fstatus
1 Y
2 Y然后运行下面的vb代码后,为什么dbCodeDetail的数据是空的?我在数据库中已经看到dbcCmd已经执行了execute,可是dbCodeDetail却不能拿到数据?请问怎么样才能使Connection和Recordset的数据同步啊?Public dbcCmd As New ADODB.Connection
Public dbCodeDetail As New ADODB.Recordset'连接数据库,
'ConnectionOpen = PDBconnectionString
'DBconnection.Open PDBconnectionString
dbcCmd.Open PDBconnectionString
'打开tCodeDetail表
dbCodeDetail.Open "select * from tCodeDetail where fStatus = 'N'", PDBconnectionString, _
adOpenKeyset, adLockPessimistic, adCmdText
dbcCmd.Execute "update tCodeDetail set fStatus = 'N' where fStatus = 'Y'"
dbcCmd.Close
dbcCmd.Open PDBconnectionString
If dbCodeDetail.State = adStateOpen Then dbCodeDetail.Close
dbCodeDetail.Open "select * from tCodeDetail where fStatus = 'N'", PDBconnectionString, _
adOpenKeyset, adLockPessimistic, adCmdText
tCodeDetail表:
code fstatus
1 Y
2 Y然后运行下面的vb代码后,为什么dbCodeDetail的数据是空的?我在数据库中已经看到dbcCmd已经执行了execute,可是dbCodeDetail却不能拿到数据?请问怎么样才能使Connection和Recordset的数据同步啊?Public dbcCmd As New ADODB.Connection
Public dbCodeDetail As New ADODB.Recordset'连接数据库,
'ConnectionOpen = PDBconnectionString
'DBconnection.Open PDBconnectionString
dbcCmd.Open PDBconnectionString
'打开tCodeDetail表
dbCodeDetail.Open "select * from tCodeDetail where fStatus = 'N'", PDBconnectionString, _
adOpenKeyset, adLockPessimistic, adCmdText
dbcCmd.Execute "update tCodeDetail set fStatus = 'N' where fStatus = 'Y'"
dbcCmd.Close
dbcCmd.Open PDBconnectionString
If dbCodeDetail.State = adStateOpen Then dbCodeDetail.Close
dbCodeDetail.Open "select * from tCodeDetail where fStatus = 'N'", PDBconnectionString, _
adOpenKeyset, adLockPessimistic, adCmdText
解决方案 »
- winsock 连接断开后,出现“TIME_WAIT”,Client端无法连接
- MsgBox("真的要校正零级位置吗?", vbInformation + vbYesNo, "")的返回值没有6啊
- 用printer.print来打印输出时,如何控制行距!!
- 请问怎么用命令将两个表关联到另一个主表上啊?
- 请问如何将wbemdisp.tlb正确打包
- 用vb操作一个表
- 用adodc控件和绑定控件用addnew方法往access里写数据,为什么只能写入三条记录,新输入的就把前面的记录替换了,怎么回事呢?
- 我要做一个网址收集管理的共享软件,不知有没有商业前景?来者有分!!!
- 用“RESTORE DATABASE......"恢复数据库时,系统提示“Database in use........”,Why?
- 请问重庆的程序员考试什么时候报名?
- fpspread 中footer怎么对齐??
- ado连接sql server数据库
update tCodeDetail set fStatus = 'N' where fStatus = 'Y'
拿到查询分析器看执行结果
update tCodeDetail set fStatus = 'N' where fStatus = 'Y'
拿到查询分析器看执行结果不懂,请问是什么问题呢?
dbCodeDetail.Open "select * from tCodeDetail where fStatus = 'N'", dbcCmd , _
adOpenKeyset, adLockPessimistic, adCmdText