1188
社区成员
access数据延迟问题，高手进来看看。
有一张表大概1万多条记录，首先插入，之后，马上点击查询按钮，可是这个记录不能备查询出来。
望解决。
con.execute("insert t1 values(10001)")
set rs=con.execute("select max(c1) as c1 from t1 ")
i=rs("c1")
msgbox(i)
如果点击查询按钮速度快，输出为10000
备注：我的access数据库的内容当让不能象上表那么简单，意识查不多了
望解决。
con.execute("insert t1 values(10001)")
set rs=con.execute("select max(c1) as c1 from t1 ")
i=rs("c1")
msgbox(i)
如果点击查询按钮速度快，输出为10000
备注：我的access数据库的内容当让不能象上表那么简单，意识查不多了
...全文
当前发帖距今超过3年，不再开放新的回复
发表回复
of123 2006-03-24
由于你的记录太多，更新时会引起虚拟内存的磁盘交换，因此更新的进度会比代码运行速度慢。 SQL 语句的执行是将 SQL 语句发送到数据库引擎就算完成。
解决方法：
1 使用记录集对象来插入记录：
con.curserlocation = aduseclient
rs.open "select * from t1", con
rs.addnew
rs!c1 = 10001
rs.update
rs.bookmark = rs.lastmodified
2 使用带有事件的 con
Dim WithEvents con as ADODB.Connection '必须在通用段中声明
Dim done As Boolean
Private Sub con_ExecuteComplete(ByVal RecordsAffected As Long, ByVal pError As ADODB.Error, adStatus As ADODB.EventStatusEnum, ByVal pCommand As ADODB.Command, ByVal pRecordset As ADODB.Recordset, ByVal pConnection As ADODB.Connection)
done = True
End Sub
Private Sub con_WillExecute(Source As String, CursorType As ADODB.CursorTypeEnum, LockType As ADODB.LockTypeEnum, Options As Long, adStatus As ADODB.EventStatusEnum, ByVal pCommand As ADODB.Command, ByVal pRecordset As ADODB.Recordset, ByVal pConnection As ADODB.Connection)
done = False
End Sub
你的代码改为：
con.execute("insert t1 values(10001)")
Do Until done
DoEvents
Loop
set rs=con.execute("select max(c1) as c1 from t1 ")
i=rs("c1")
msgbox(i)
解决方法：
1 使用记录集对象来插入记录：
con.curserlocation = aduseclient
rs.open "select * from t1", con
rs.addnew
rs!c1 = 10001
rs.update
rs.bookmark = rs.lastmodified
2 使用带有事件的 con
Dim WithEvents con as ADODB.Connection '必须在通用段中声明
Dim done As Boolean
Private Sub con_ExecuteComplete(ByVal RecordsAffected As Long, ByVal pError As ADODB.Error, adStatus As ADODB.EventStatusEnum, ByVal pCommand As ADODB.Command, ByVal pRecordset As ADODB.Recordset, ByVal pConnection As ADODB.Connection)
done = True
End Sub
Private Sub con_WillExecute(Source As String, CursorType As ADODB.CursorTypeEnum, LockType As ADODB.LockTypeEnum, Options As Long, adStatus As ADODB.EventStatusEnum, ByVal pCommand As ADODB.Command, ByVal pRecordset As ADODB.Recordset, ByVal pConnection As ADODB.Connection)
done = False
End Sub
你的代码改为：
con.execute("insert t1 values(10001)")
Do Until done
DoEvents
Loop
set rs=con.execute("select max(c1) as c1 from t1 ")
i=rs("c1")
msgbox(i)
- 打赏
- 举报
射天狼 2006-03-24
有可能会出现延迟，你统计难道非要这么精确吗？
╭════════════════════════════╮
║ ║
║ 免费的学习、交流、源码、工具网站，欢迎大家访问！ ║
║ http://www.j2soft.cn/ ║
╰════════════════════════════╯
╭════════════════════════════╮
║ ║
║ 免费的学习、交流、源码、工具网站，欢迎大家访问！ ║
║ http://www.j2soft.cn/ ║
╰════════════════════════════╯
- 打赏
- 举报
watt 2006-03-23
最好使用事务处理，能保证数据的一致性。
con.execute("insert t1 values(10001)")
完成后Commit，
然后再查询
con.execute("insert t1 values(10001)")
完成后Commit，
然后再查询
- 打赏
- 举报
gjianpro 2006-03-23
楼上的使用doevents,是使计算机完成doevents之前的程序语句,然后再执行doevents语句之后的程序语句,可以解决问题..
- 打赏
- 举报
gjianpro 2006-03-23
应用程序和数据库之间的I/O是需要n个机器周期时间的.
lz的问题只能通过控制数据库的读写来解决.
lz的问题只能通过控制数据库的读写来解决.
- 打赏
- 举报
DengXingJie 2006-03-23
con.execute("insert t1 values(10001)")
doevents
set rs=con.execute("select max(c1) as c1 from t1 ")
i=rs("c1")
msgbox(i)
doevents
set rs=con.execute("select max(c1) as c1 from t1 ")
i=rs("c1")
msgbox(i)
- 打赏
- 举报
Java面试不通过？这篇文章你看了吗？ 注：本人才疏学浅，知识还在积累中，不能保证每个回答都满足各种等级的高手们，（由于一些技术的升级，部分答案不能保证实时同步准确，还请大家在阅读的时候多多留意）若发现有问题的话，请评论指出。
Thinkpad常见问题大全（转载联想工程师博客） 这个问题总算是圆满解决了，也给我一个教训，遇到问题后，不要忙着下结论，这样很容易“冤枉好人”，多找找多看看，也许答案就在你的手边。 Q：恢复盘咋又多出一张DVD来？我的Create Recovery Media只...
java面试170道精讲：留着慢慢看 答：面向对象的特征主要有以下几个方面： - 抽象：抽象是将一类对象的共同特征总结出来构造类的过程，包括数据抽象和行为抽象两方面。抽象只关注对象有哪些属性和行为，并不关注这些行为的细节是什么。 - 继承：...
java面试宝典：留着慢慢看 - 抽象：抽象是将一类对象的共同特征总结出来构造类的过程，包括数据抽象和行为抽象两方面。抽象只关注对象有哪些属性和行为，并不关注这些行为的细节是什么。 - 继承：继承是从已有类得到继承信息创建新类的过程...
java中的经典问题解答 - 抽象：抽象是将一类对象的共同特征总结出来构造类的过程，包括数据抽象和行为抽象两方面。抽象只关注对象有哪些属性和行为，并不关注这些行为的细节是什么。 - 继承：继承是从已有类得到继承信息创建新类的过程。...
Flume 从0到高手一站式养成记 假设默认 log4j 会向 access.log 文件中写日志，每当凌晨0点的时候，log4j 都会对文件进行重命名，在 access 后面添加昨天的日期，然后再创建新的 access.log 记录当天的新增日志数据。这个时候如果想要一直监控 ...
一步成高手：终极图解内存（下篇） http://www.qqread.com/pcbase/2007/04/c306543.html希望对大家有帮助，相信你看完就能成为高手了。 点击查看大图 DDR内存芯片的内部结构图，注意比较上文中SDRAM的结构图 这也是一颗128Mbit的内存芯片，标称规格也...
收藏 | 强化学习应用简述 点上方蓝字人工智能算法与Python大数据获取更多干货... 在线模式 (online) 算法通过序列数据流来训练，不保存数据，不进一步使用数据。离线模式(offline) 或批量模式 (batch mode) 算法则通过一组数据来训练。 在自助法...
Python高手之路【十三】socket网络编程 什么是客户／服务器架构？ 什么是客户／服务器架构？不同的人有不同的答案。...另一方面，客户连上一个（预先已知的）服务器，提出自己的请求， 发送必要的数据，然后就等待服务器的完成请求或说明失败原...
Java面试问题总结 说明，为了减轻大家的负担和节省大家的时间，一些过时知识点和被笔试概率极低的题目不再...我要回答一个新技术的问题大概思路和步骤是：我们想干什么，干这个遇到了什么问题，现在用什么方式来解决。其实我们讲课也...
Java面试宝典（问题史上最全，总结最好） 说明，为了减轻大家的负担和节省大家的时间，一些过时知识点和被笔试概率极低...我要回答一个新技术的问题大概思路和步骤是：我们想干什么，干这个遇到了什么问题，现在用什么方式来解决。其实我们讲课也是这样一个...
RTP/RTCP工程实践与问题解决方案(合集) 基于RTP协议的IP电话QoS监测及提高策略 ... 随着Internet和多媒体技术的飞速发展，Internet已由早期的单一数据传输网向多媒体数据(视频、音频、文本等)综合传输网发展。但Internet提供的只是尽力而为
我的Java开发学习之旅------>Java经典面试题 别的培训机构培养的是技术单一的熟练技工，传智播客培养的是具有很强学习和解决问题能力的技术高手和未来技术经理。很多工厂说，清华毕业的学生刚进工厂时的动手操作不如技校毕业的学生熟练，但过一段时间后，清华...
java 学习路线 以我的经验来说，我懂得 RMI，但是我不可能将 RMI 的程序细节一一记在脑海中，当我要写 RMI 程序时， 我会翻出此书第十六章 RMI 的部分，看看书上详细的作法。 本书也相当适合当作 Java 课程的辅助教材，每个...
【经典】《Java170道面试笔试题全面含答案》涉及java/数据库/Spring框架/JVM/数据结构算法/设计模式相关 RSS订阅原【经典】《Java170道面试笔试题全面含答案》涉及java/数据库/Spring框架/JVM/数据结构算法/设计模式相关2017年08月06日 16:02:13阅读数：12290《Java170道面试笔试题全集》 -更新版-8.302018/4/7 日常修复...
读核日记 察看cpu 的类型(在2.2.14 以后听说增加了对多种cpu 的支持, 以后我可得用心看看,if I can find a bug of intel then ……) CPU: Intel Pentium Pro stepping 09 初始或处理器与协处理器,对于比较老的处理器, linux...
