以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  老师帮忙看看  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=99134)
--  作者：hebxtshhyj
--  发布时间：2017/4/13 10:49:00
--  老师帮忙看看
Dim q As new QueryBuilder
q.TableName="应收账款"
q.SelectString = "select \'\' As 日期,"期初" As 摘要,期初_应收客户款 As 期初,0 As 应收,0 As 收款,期初_应收客户款 As 余额 fro m {客户信息表} "
Tables("查询_tbl客户查询").DataSource = Tables("应收账款")

直接运行aql 语句没有问题，写到q.selectstring 中提示编译错误。应该怎么写呢？
[此贴子已经被作者于2017/4/13 10:49:46编辑过]
--  作者：有点色
--  发布时间：2017/4/13 10:56:00
--  

Dim q As new QueryBuilder
q.TableName="应收账款"
q.SelectString = "select \'\' As 日期,\'期初\' As 摘要,期初_应收客户款 As 期初,0 As 应收,0 As 收款,期初_应收客户款 As 余额 from {客户信息表} "
Tables("查询_tbl客户查询").DataSource = Tables("应收账款")

 

 你的是外部数据源吗？如果是还要指定ConnectionName

 

Dim q As new QueryBuilder
q.ConnectionName = "数据源名"
q.TableName="应收账款"
q.SelectString = "select \'\' As 日期,\'期初\' As 摘要,期初_应收客户款 As 期初,0 As 应收,0 As 收款,期初_应收客户款 As 余额 from {客户信息表} "
Tables("查询_tbl客户查询").DataSource = Tables("应收账款")
--  作者：hebxtshhyj
--  发布时间：2017/4/13 11:00:00
--  
不是数据源的问题
\'Dim q As new QueryBuilder
\'q.TableName="应收账款"
\'q.Connection Name="宁首"
\'q.SelectString = "sel ect \'\' As 日期,"期初" As 摘要,期初_应收客户款 As 期初,0 As 应收,0 As 收款,期初_应收客户款 As 余额 fro m {客户信息表} "
\'Tables("查询_tbl客户查询").DataSource = Tables("应收账款")
[此贴子已经被作者于2017/4/13 11:03:00编辑过]
--  作者：有点色
--  发布时间：2017/4/13 11:08:00
--  
看2楼。
--  作者：hebxtshhyj
--  发布时间：2017/4/13 11:20:00
--  
想要的效果出不来啊，查询不到图片点击可在新窗口打开查看
--  作者：有点色
--  发布时间：2017/4/13 11:26:00
--  
以下是引用hebxtshhyj在2017/4/13 11:20:00的发言：
想要的效果出不来啊，查询不到图片点击可在新窗口打开查看

 

没看懂你的意思，你需要什么你就在sql窗口调试正确了再写 http://www.foxtable.com/webhelp/scr/1484.htm

 
--  作者：hebxtshhyj
--  发布时间：2017/4/13 11:36:00
--  
我想要在 ”查询“ 窗口中点”查询“按钮，在”查询“窗口的table表 ”tbl客户查询“ 中显示 select语句的内容。
语句写在了按钮的单击事件中。
[此贴子已经被作者于2017/4/13 11:36:38编辑过]
--  作者：有点色
--  发布时间：2017/4/13 11:37:00
--  

认认真真看2楼。

 

Dim q As new QueryBuilder
q.ConnectionName = "宁首"
q.TableName="应收账款"
q.SelectString = "select \'\' As 日期,\'期初\' As 摘要,期初_应收客户款 As 期初,0 As 应收,0 As 收款,期初_应收客户款 As 余额 from {客户信息表} "
Tables("查询_tbl客户查询").DataSource = Tables("应收账款")
--  作者：hebxtshhyj
--  发布时间：2017/4/13 14:04:00
--  
我认真的看了2楼了。
我已经把“期初”改为\'期初\'了，在窗口中不提示错误，实际预览运行，想要的效果还是出不来，sql语句在sql窗口能测试运行成功。
我回复的时候，没有把双引号改过来。
数据源我也是有填写的。
我想问一下老师：定义的这个查询表，必需要运行Build方法吗？不执行这个方法，即使是定义了sql语句，查询表也是生成不了的，也就无法引用，是这样吗？
Tables("查询_tbl客户查询").DataSource = Tables("应收账款") 这句有没有问题？
--  作者：hebxtshhyj
--  发布时间：2017/4/13 14:11:00
--  
老师我搞定了，
把Tables("查询_tbl客户查询").DataSource = Tables("应收账款") 改为
Tables("查询_tbl客户查询").DataSource = DataTables("应收账款")
就好了。