Set RS = New ADODB.Recordset
RS.Open "select * from Tbl_OtherSend where Indatetime>='" & Format(Trim(DTP_sdate), "yyyy-mm-dd") & "' and Indatetime<='" & DateAdd("d", 1, Format(Trim(DTP_edate), "yyyy-mm-dd")) & "' and BaoUser='" & Trim(Txt_baoname) & "' ", con, adOpenKeyset, adLockReadOnly
一直都可以的,今天突然就这样了,
adOpenForwardOnly
0adOpenKeyset
adOpenDynamic
adOpenStatic 这几种游标都试了,还是一样。
RS.Open "select * from Tbl_OtherSend where Indatetime>='" & Format(Trim(DTP_sdate), "yyyy-mm-dd") & "' and Indatetime<='" & DateAdd("d", 1, Format(Trim(DTP_edate), "yyyy-mm-dd")) & "' and BaoUser='" & Trim(Txt_baoname) & "' ", con, adOpenKeyset, adLockReadOnly
一直都可以的,今天突然就这样了,
adOpenForwardOnly
0adOpenKeyset
adOpenDynamic
adOpenStatic 这几种游标都试了,还是一样。
解决方案 »
- 水晶报表打开报表报can not initialize ole
- 控件属性问题!!急!!!
- 请教一个MSHFlexGrid连接Access数据库时数据显示问题
- 为了帮朋友找毕业设计可以给我发一个工资管理系统吗?(VB+sql)
- 很简单的问题!望高手来帮我解答这些代码的意思!在线等!立马给分!
- VB中的Picture Box控件如何设为透明
- 求点是否在多边形内的算法!谢谢~!
- 谁有ActiveReport 2的中文例子和原程?在线等待!急急急!
- vb+sql数据库编写报表时,预览报表发现数据库没有更新,可是数据库却是对的,什么原因?
- listview中,显示为大图标时,我嫌他还不够大,如何使的图标变的很大很大??
- 联合查询"."附近语法错误是什么原因?谁能告诉我!!
- 如何通过VB编程,将ACCESS97数据库转换成ACCESS2003格式?
用上这个游标,再设个断点,调试试一下!
Rs.CursorLocation = adUseClient