以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 加载 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=158307) |
-- 作者:qazlinle6 -- 发布时间:2020/11/15 18:06:00 -- 加载 Select Case e.DataCol.Name Case "商品条码" DataTables("FRID标签").LoadFilter = "商品条码 = \'" & e.newvalue & "\'" DataTables("FRID标签").Load Dim dr1 As DataRow \'否则在产品表查找同名的产品行,将找到的行赋值给变量dr dr1 = DataTables("FRID标签").Find("[商品条码] = \'" & e.DataRow("商品条码") & "\'") If dr1 IsNot Nothing Then \'如果找到了同名的产品行,也就是dr不是Nothing dr1("商品备注") = e.DataRow("销售退回") DataTables("FRID标签").Save() End If End Select 加载商品条码1=1,商品条码2=2,..........还保留1和2......追加数据
|
-- 作者:有点蓝 -- 发布时间:2020/11/15 20:46:00 -- "FRID标签"表其实可以不要加载数据,直接后台查询即可:dr1 = DataTables("FRID标签").SQLFind("[商品条码] = \'" & e.DataRow("商品条码") & "\'") |
-- 作者:qazlinle6 -- 发布时间:2020/11/15 21:18:00 -- 不加载可以刷新列吗 |
-- 作者:有点蓝 -- 发布时间:2020/11/15 21:53:00 -- 刷新列是什么意思?不加载的数据界面肯定是看不到的 |
-- 作者:qazlinle6 -- 发布时间:2020/11/15 21:59:00 -- 表a加载表b,表b第一列刷新对应表a的第一列,所以我现在表a要输入十行商品条码,表b要对应加载十行,然后表a十行第一列输入内容,表b第一列全部刷新内容 |
-- 作者:有点蓝 -- 发布时间:2020/11/15 22:05:00 -- 如果表B需要显示数据,就追载数据吧 |
-- 作者:qazlinle6 -- 发布时间:2020/11/15 22:09:00 -- Dim id As Integer = DataTables("表A").Compute("Max(_Identify)") Dim Filter As String = "[_Identify] > " & id DataTables("表A").AppendLoad(Filter, False) 我要追载商品条码列要什么改
|
-- 作者:有点蓝 -- 发布时间:2020/11/15 22:22:00 -- DataTables("表A").removefor("商品条码 = \'" & e.newvalue & "\'") DataTables("表A").AppendLoad("商品条码 = \'" & e.newvalue & "\'")
|