以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]SQLGetComboListString最新版是不是有问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=164997)

--  作者:ajie5211
--  发布时间:2021/5/10 10:54:00
--  [求助]SQLGetComboListString最新版是不是有问题
以前好好的程序,现在这个SQLGetComboListString得不到值,如果把数据加载到前台,用GetComboListString是可以取到值的。
--  作者:有点蓝
--  发布时间:2021/5/10 11:56:00
--  
我测试没有问题,完整代码发上来看看
--  作者:ajie5211
--  发布时间:2021/5/10 14:00:00
--  

表是SQL查询表,语句Se lect F250 AS [产品形态],F252 As [产品料号],F3963 As [BOM类型],F255 As [成品批量],F256 As [成品单位],F128 as [材料形态],F257 As [材料料号],F125 As [材料名称],F160 As [仓库名称],F162 As [现有库存],F260 As [单位],F259 / F255 As [用量],F259 AS [零件批量],Round((F162 / F259 * F255 * 10 -5) / 10 , 0) As [可制成品] ,0.00 as [在单量],0.00 as [同族总库存],[往年当月总用量],[往年当月和后两月总用量],[往年后三个月月平均用量],[近12月平均值],F575 AS [原品名],F141 AS [生产方式],F5120 as 色号 From (({tabDIYTable29} Inner JOIN {tabDIYTable24} ON {tabDIYTable24}.[ID] = {tabDIYTable29}.[ID]) Inner JOIN {tabDIYTable38} ON {tabDIYTable38}.[F257] = {tabDIYTable24}.[F124]) Inner JOIN {tabDIYTable37} ON {tabDIYTable37}.[ID] = {tabDIYTable38}.[ID] left JOIN {库存界线表} ON {tabDIYTable38}.[F257] = {库存界线表}.[料号] Where F252 is null

查询代码如下:Dim sxxm As String
sxxm = DataTables("BOM及材料库存").SQLGetComboListString("F3963","[F252] =  \'WJEK381-3.81-04P-14G-02N\'")
Output.Show(sxxm)

数据能加载出来,但是SQLGetComboListString取不到值


图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看

--  作者:有点蓝
--  发布时间:2021/5/10 14:12:00
--  
上传实例看看。

或者换种方法,到数据库里使用上面sql建一个视图,然后查询表使用视图生成

--  作者:ajie5211
--  发布时间:2021/5/10 14:29:00
--  
用视图是可以的,这是改了什么东西么,这样整,我很多旧代码要改动的,非常麻烦的。

图片点击可在新窗口打开查看此主题相关图片如下:2.png
图片点击可在新窗口打开查看
[此贴子已经被作者于2021/5/10 14:29:08编辑过]

--  作者:有点蓝
--  发布时间:2021/5/10 14:45:00
--  
请上传实例测试
--  作者:ajie5211
--  发布时间:2021/5/10 16:42:00
--  

清了一下BIN文件夹,这个可以了。


--  作者:ajie5211
--  发布时间:2021/5/10 17:15:00
--  

还是有问题,这个SQLCompute有问题。

Dim i As Integer
i = DataTables("产品库存信息").SQLCompute("sum(162)","[F124] = \'C000000270\'")
Output.Show(i)
\'DataTables("产品库存信息").LoadFilter = ""
\'DataTables("产品库存信息").Load(False)
\'Dim i As Integer
\'i = DataTables("产品库存信息").Compute("sum(现有库存)","产品料号 = \'C000000270\'")
\'Output.Show(i)

 下载信息  [文件大小:   下载次数: ]
点击浏览该文件:管理项目2.rar


--  作者:有点蓝
--  发布时间:2021/5/10 17:33:00
--  
已反馈