- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 请各位师傅们帮我看一下代码错在哪儿？ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=33499)
-- 发布时间：2013/5/19 17:46:00
-- 请各位师傅们帮我看一下代码错在哪儿？
出错代码如下：
Dim x As String = Tables("payInfo").current("id")
Dim y As String = Tables("payInfo").current("sch")
Dim z As String = Tables("payInfo").current("clas")
Tables("CC收费系统_query").Fill("select sch as 校区, clas as 班级, freq as 每周课次, numWkOff as 请假周数, balance as 对应金额, dateLeave as 请假日期, refGen as 登记单号 from {wAb} where id = \'"& x &"\' and sch = \'"& y &"\' and clas = \'"& z &"\'", "test", True)
Tables("CC收费系统_query").SetColVisibleWidth("校区|57|班级|57|每周课次|57|请假周数|57|对应金额|57|请假日期|69|登记单号|66")
错误描述：
当我在SQL语句里加入第三个条件（也就是where后面的clas = \'"& z &"\')后，程序出错
此主题相关图片如下：1.jpg
请师傅们帮我看一下错在哪里！
-- 发布时间：2013/5/19 18:02:00
--
遠看朦渣渣,放大嚇一跳:連接符&和其它字符串無空格,不出錯才怪!
where id = \'"& x &"\' and sch = \'"& y &"\' and clas = \'"& z &"\'"
-- 发布时间：2013/5/19 18:08:00
--
Tables("CC收费系统_query").Fill("select sch as 校区, clas as 班级, freq as 每周课次, numWkOff as 请假周数, balance as 对应金额, dateLeave as 请假日期, refGen as 登记单号 from {wAb} where id = \'" & x & "\' and sch = \'" & y & "\' and clas = \'" & z & "\'", "test", True)
还有没有别的错，不敢说，前后缺少空格是肯定的。
-- 发布时间：2013/5/19 18:12:00
--
don，我把连字符“&”前后都加了空隔，但是相同的问题还在出现？
-- 发布时间：2013/5/19 18:23:00
--
如ID是整數型,則不需加引號
-- 发布时间：2013/5/19 18:25:00
--
我把id设置成字符型
-- 发布时间：2013/5/19 18:41:00
--
我想把事例发上来，但是上面提示：”给定关键字不在字典中“，这是为何？ :-(
-- 发布时间：2013/5/19 19:06:00
--
谢谢lsy，连字符前后空了隔也不行，可能其它地方还有错！
-- 发布时间：2013/5/19 23:03:00
--
我在家又测试了一下，问题正如don和lsy说的，还是连字符的格式问题，现已更正，问题解决了！
谢谢don and lsy！
[此贴子已经被作者于2013-5-20 2:33:44编辑过]