Office中国论坛/Access中国论坛

标题: 求助：SQL语句执行出错，看了调试结果一脸懵圈了 [打印本页]

---

作者: Dozen    时间: 2017-2-9 23:34
标题: 求助：SQL语句执行出错，看了调试结果一脸懵圈了
具体案例请见附件，主要说一下存在的问题：
用sql执行查询时出错，调试时发现了问题所在的位置，但不知道为什么会出错：

1.执行SQL语句后，是能查询到一条纪录的（把sql语句和数据表移植到Access执行无问题），且在excel的VBA通过debug.print 可以输出rst.Fields(0)的值
2.但是rst.RecordCount=-1（不存在纪录），这也就程序出错的原因

如果查询查不到纪录，那应该也输出不了Fields(0)的值吧？感觉好矛盾，所以只好来请教各位大神了。。。。。
错误提示弹窗
[attach]60738[/attach]



调试窗口信息
[attach]60739[/attach]

参考示例文档
[attach]60740[/attach]

---

作者: roych    时间: 2017-2-10 14:19

1.             'Debug.Print sql
   
2.             'Set rst = con.Execute(sql)
   
3.             'Debug.Print rst.RecordCount
   
4.             'Debug.Print 1723.63
   
5.             'Debug.Print rst.Fields(0)
   
6.             Set rst = CreateObject("Adodb.Recordset")
   
7.             rst.Open sql, con, 3, 1

复制代码

请自行参考修改。印象中，Set rst = con.Execute(sql)的写法是只读的，是否有影响就不知道了。

---

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)

Powered by Discuz! X3.3