Foxtable(狐表)用户栏目专家坐堂 → SQL查询表不能及时查询


  共有1510人关注过本帖树形打印复制链接

主题:SQL查询表不能及时查询

帅哥哟,离线,有人找我吗?
chengjingliang
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:250 积分:1813 威望:0 精华:0 注册:2012/6/28 13:53:00
SQL查询表不能及时查询  发帖心情 Post By:2018/1/15 16:44:00 [只看该作者]

SQL查询表不能及时查询,我在SQL查询表内有一个入库与支付表,当我在支付款子表增加一行支付款,不能即时更新,如:
在工程项目表—支付款子表中新增一行,选择供应商“雍西龙”支付金额80000元,在入库与支付表内没有及时体现,重新刷新SQL也不能及时体现支付金额

[此贴子已经被作者于2018/1/16 9:10:52编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/1/15 16:50:00 [只看该作者]

支付表新增数据后,要保存数据后,再刷新查询表,才能看到最新的数据的。

 回到顶部
帅哥哟,离线,有人找我吗?
chengjingliang
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:250 积分:1813 威望:0 精华:0 注册:2012/6/28 13:53:00
  发帖心情 Post By:2018/1/16 9:29:00 [只看该作者]

我在设计窗口中用代码来编写,如何实现以上功能?

'重新生成入库与支付表
DataTables("入库与支付").Load

'入库与支付表按供应商计算余额
For Each h As String In  DataTables("入库与支付").GetValues("供应商")
    Dim drs As List(Of DataRow) = DataTables("入库与支付").Select("供应商='" & h & "'","日期")
    If drs.Count > 0 Then
        drs(0)("余额") = drs(0)("入库金额") - drs(0)("支付金额")
        If drs.Count > 1 Then
            For i As Integer = 1 To drs.Count - 1
                drs(i)("余额") = drs(i-1)("余额") + drs(i)("入库金额") - drs(i)("支付金额")
            Next
        End If
    End If
Next


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/1/16 9:35:00 [只看该作者]

DataTables("支付款").Save

DataTables("库明细").Save

DataTables("入库与支付").Load

 回到顶部