- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [讨论] QueryBuilder 中能引用全局变量吗？ (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=1133)
-- 发布时间：2008/11/14 12:46:00
-- [讨论] QueryBuilder 中能引用全局变量吗？
有这样一个外部查询：
Dim q As new QueryBuilder
q.TableName = "会计凭证查询"
q.C
q.SelectString = "select * from [z_tablqpz] where sszt = 11 and pzrqn = 2008 union all select * from [z_tabdqpz] where sszt = 11 and pzrqn = 2008 union all select * from [z_tabxqpz] where sszt = 11 and pzrqn = 2008 order by pzrqn,pzrqy,pzlx,pzdm,flxh"
q.Build
在q.SelectString 中，有 pzrqn = 2008 ，我将2008换成全局变量vars("kn")后，就不能编译了！
我想，用户自已能通过改变全局变量，更新一下查询条件，这是一个很自然的事。
非得由开发者一次性设置固定的查询吗？不太灵活吧。
现在的数据表都好大，几十万条记录的，用户经常根据需要调取不同年度的数据，而用户不会SQL查询，只有我来设置好，插入变量。
同时，建议老大提供两个功能选项：
１、可以设置在打开项目时是否加载外部查询表，允许用户自行在代码中根据需要加载；
２、允许在代码中获取数据源名称，这样可以在窗口中调用不同的数据源查询；
这样不是更加友好灵活吗？
我实在是想不出变通的方法，没办法：我做各种版本专业软件的数据接口，不同数据库、不同年度、不同的表，每一次转换数据都面对不同的东西，不灵活就完全搞不成啦！
-- 发布时间：2008/11/14 13:09:00
--
Dim q As new QueryBuilder
q.TableName = "会计凭证查询"
q.C
q.SelectString = "select * from [z_tablqpz] where sszt = 11 and pzrqn = " & vars("kn") & " union all select * from [z_tabdqpz] where sszt = 11 and pzrqn = 2008 union all select * from [z_tabxqpz] where sszt = 11 and pzrqn = 2008 order by pzrqn,pzrqy,pzlx,pzdm,flxh"
q.Build
-- 发布时间：2008/11/14 14:28:00
--
我测试了一下，有出错提示：
此主题相关图片如下：未命名.jpg
[此贴子已经被作者于2008-11-14 14:28:08编辑过]
-- 发布时间：2008/11/14 14:34:00
--
和全局变量无关的，也许后面的2008也要处理。
不要急于下结论使全局变量的事，任何表达式都可以动态合成。
q.SelectString = "select * from [z_tablqpz] where sszt = 11 and pzrqn = " & vars("kn") & " union all select * from [z_tabdqpz] where sszt = 11 and pzrqn = 2008 union all select * from [z_tabxqpz] where sszt = 11 and pzrqn = " & vars("kn") & " order by pzrqn,pzrqy,pzlx,pzdm,flxh"
要学会调试，例如你可以在命令窗口：
dim str = "select * from [z_tablqpz] where sszt = 11 and pzrqn = " & vars("kn") & " union all select * from [z_tabdqpz] where sszt = 11 and pzrqn = 2008 union all select * from [z_tabxqpz] where sszt = 11 and pzrqn = " & vars("kn") & " order by pzrqn,pzrqy,pzlx,pzdm,flxh"
output.show(str)
看看所生成的sql语句是什么，如果觉得没问题，复制这个生成好的sql到查询表定义窗口进行测试。
-- 发布时间：2008/11/14 14:50:00
--
明白了：
pzrqn between "vars("kn") and vars("jn")" 这样的写法不正确
pzrqn between "vars("kn")"and "vars("jn")" 这样的写法正确
已搞定！
还是建议老大提供两个功能选项：
１、可以设置在打开项目时是否加载外部查询表，允许用户自行在代码中根据需要加载；
２、允许在代码中获取数据源名称，这样可以在窗口中调用不同的数据源查询；
这样不是更加友好灵活吗
-- 发布时间：2008/11/14 14:54:00
--
呵呵，我会考虑的。
-- 发布时间：2008/11/14 17:19:00
--
哈哈，我的第一个应用软件的核心功能已接近完成，主要性能：
１、同步远光财务数据库中的会计科目、会计凭证等重要内容；
２、做第二账套账，也就是预算系统账；
我的应用系统与远光系统的数据有完整的对应关系，在我的系统里统计的数据与在远光财务中统计的数据一样，但我的系统里多了预算管理功能。