Foxtable(狐表)用户栏目专家坐堂 → 加载


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

主题:加载

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


加好友 发短信
等级:七尾狐 帖子:1553 积分:10507 威望:0 精华:0 注册:2013/6/8 16:19:00
加载  发帖心情 Post By: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......追加数据

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


加好友 发短信
等级:七尾狐 帖子:1553 积分:10507 威望:0 精华:0 注册:2013/6/8 16:19:00
  发帖心情 Post By:2020/11/15 21:18:00 [显示全部帖子]

不加载可以刷新列吗

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


加好友 发短信
等级:七尾狐 帖子:1553 积分:10507 威望:0 精华:0 注册:2013/6/8 16:19:00
  发帖心情 Post By:2020/11/15 21:59:00 [显示全部帖子]

表a加载表b,表b第一列刷新对应表a的第一列,所以我现在表a要输入十行商品条码,表b要对应加载十行,然后表a十行第一列输入内容,表b第一列全部刷新内容

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


加好友 发短信
等级:七尾狐 帖子:1553 积分:10507 威望:0 精华:0 注册:2013/6/8 16:19:00
  发帖心情 Post By:2020/11/15 22:09:00 [显示全部帖子]

Dim id As Integer = DataTables("表A").Compute("Max(_Identify)")
Dim
 Filter As String = "[_Identify] > " & id
DataTables
("表A").AppendLoad(FilterFalse
)

我要追载商品条码列要什么改

 回到顶部