以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]调用SQL语句问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=74524)

--  作者:pcxjxjhkw
--  发布时间:2015/9/13 12:18:00
--  [求助]调用SQL语句问题

将SQL语句保存到表中,SQL语句中含一些需要计算的和引用一些控件值,如:>Date.Today,  = Txt.Value等

问题:调用SQL语句时,这些值如何实现正常计算和引用?  因为保存时都变成了文本格式

 

谢谢


--  作者:大红袍
--  发布时间:2015/9/13 12:24:00
--  

动态编译

 

Functions.remove("函数")
Dim Code As String
Code = "msgbox(123)" & vbcrlf
Functions.Add("函数",Code)
Functions.Complie()
Functions.Execute("函数")


--  作者:pcxjxjhkw
--  发布时间:2015/9/13 17:22:00
--  

老师,发现如此调用用的时间太长了

 


--  作者:大红袍
--  发布时间:2015/9/13 17:42:00
--  

这个是没办法的,动态编译就是耗时的。

 

 


--  作者:pcxjxjhkw
--  发布时间:2015/9/13 19:49:00
--  

还有其它变通方法没?


--  作者:大红袍
--  发布时间:2015/9/13 19:58:00
--  
没有。
--  作者:游
--  发布时间:2015/9/13 20:36:00
--  

 

 

 

图片点击可在新窗口打开查看哎!死读书,读死书。

 

Sql语句本身是字符串,你可以调用字符串的各种方法来处理

 

比如:"S elcet * from b Where  dd = \'●@变量1●\' And cc = 123 “

 

你用●来分割,判断开始为@就是变量,然后根据变量替换

 

重新合成后使用


--  作者:pcxjxjhkw
--  发布时间:2015/9/13 23:37:00
--  
嗯,是个办法