老师帮忙看看 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 老师帮忙看看

共有2048人关注过本帖树形打印复制链接主题：老师帮忙看看

hebxtshhyj

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：155 积分：1488 威望：0 精华：0 注册：2017/1/31 17:27:00

老师帮忙看看 发帖心情

Post By：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编辑过]

有点色

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00

Post By：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

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：155 积分：1488 威望：0 精华：0 注册：2017/1/31 17:27:00

Post By：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编辑过]

有点色

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00

Post By：2017/4/13 11:08:00 [只看该作者]

看2楼。

hebxtshhyj

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：155 积分：1488 威望：0 精华：0 注册：2017/1/31 17:27:00

Post By：2017/4/13 11:20:00 [只看该作者]

想要的效果出不来啊，查询不到图片点击可在新窗口打开查看

有点色

小大 6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00

Post By：2017/4/13 11:26:00 [只看该作者]

以下是引用hebxtshhyj在2017/4/13 11:20:00的发言：
想要的效果出不来啊，查询不到图片点击可在新窗口打开查看

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

hebxtshhyj

小大 7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：155 积分：1488 威望：0 精华：0 注册：2017/1/31 17:27:00

Post By：2017/4/13 11:36:00 [只看该作者]

我想要在 ”查询“ 窗口中点”查询“按钮，在”查询“窗口的table表 ”tbl客户查询“ 中显示 select语句的内容。

语句写在了按钮的单击事件中。

[此贴子已经被作者于2017/4/13 11:36:38编辑过]

有点色

小大 8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00

Post By：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("应收账款")