以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助] 第三方软件调用问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=116505)

--  作者:wei447221918
--  发布时间:2018/3/25 23:42:00
--  [求助] 第三方软件调用问题
求解,想从第三方软件sql数据库查询并引用,统计数据,尝试用了查询表加载,但是无法引用参与计算。以数据表的形式加载进来怕动了相关数据导致第三方软件崩溃,且加载进来后表头比较乱。必须使用sql语言调用需要的数据吗,sql基础很差。还有个问题是,数据库某表,增加一个数据后,根据类型,在foxtable里增加一行记录如何实现。感谢,
--  作者:有点甜
--  发布时间:2018/3/26 8:37:00
--  

1、查询表为什么不可以?具体说明

 

http://www.foxtable.com/webhelp/scr/2321.htm

 

2、foxtable显示数据库的数据,只能定时刷新,无法和数据库即时交互的(即新增、删除,里面触发某些代码)

 

http://www.foxtable.com/webhelp/scr/0657.htm

 


--  作者:wei447221918
--  发布时间:2018/3/26 18:59:00
--  
 Select e.DataCol.Name
      Case "罐体编号"
           Dim sum2 As Double
           sum2 = DataTables("加油记录明细查询表").Compute("Sum(升数)","[日期] = \'" & e.DataRow("汇总日期") & "\'")
        e.DataRow("销售出库") = sum2
End Select

"加油记录明细查询表"是通过数据库导入后,通过别名生成的。无法统计
[此贴子已经被作者于2018/3/26 18:59:58编辑过]

--  作者:wei447221918
--  发布时间:2018/3/26 19:01:00
--  
  Select e.DataCol.Name
      Case "罐体编号"
           Dim sum2 As Double
           sum2 = DataTables("加油记录明细查询表").Compute("Sum(升数)","[日期] = \'" & e.DataRow("汇总日期") & "\'")
        e.DataRow("销售出库") = sum2
End Select

"加油记录明细查询表"是通过数据库查询表导入后,通过别名生成的。无法统计
[此贴子已经被作者于2018/3/26 19:01:18编辑过]

--  作者:有点蓝
--  发布时间:2018/3/26 20:37:00
--  
测试没有问题,日期条件有问题吧


--  作者:wei447221918
--  发布时间:2018/3/26 23:49:00
--  
日期确实有问题,时间格式是个长日期格式(datelongtime),那么如何按天统计呢,代码试了几个,没想出来。。。图片点击可在新窗口打开查看
--  作者:有点甜
--  发布时间:2018/3/27 8:51:00
--  
以下是引用wei447221918在2018/3/26 23:49:00的发言:
日期确实有问题,时间格式是个长日期格式(datelongtime),那么如何按天统计呢,代码试了几个,没想出来。。。图片点击可在新窗口打开查看

 

改成这样

 

Select e.DataCol.Name
      Case "罐体编号"
           Dim sum2 As Double
           sum2 = DataTables("加油记录明细查询表").Compute("Sum(升数)","[日期] >= #" & e.DataRow("汇总日期") & "# and [日期] < #" & cdate(e.DataRow("汇总日期")).AddDays(1) & "#")
           e.DataRow("销售出库") = sum2
End Select