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


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

主题:appendload

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


加好友 发短信
等级:超级版主 帖子:110544 积分:562604 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/10/20 14:50:00 [显示全部帖子]

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

DataTables("染色生产表").AppendLoad("[缸号] = '" & r1("缸号") & "'")

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


加好友 发短信
等级:超级版主 帖子:110544 积分:562604 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/10/20 14:52:00 [显示全部帖子]

Dim dr As DataRow = DataTables("染色生产表").find("[缸号] = '" & r1("缸号") & "'")
If dr Is Nothing Then
    Dim drs As List(of DataRow) = DataTables("染色生产表").AppendLoad("[缸号] = '" & r1("缸号") & "'")
    If drs.count > 0 Then dr = drs(0)
End If
If dr IsNot Nothing Then
    Dim wz As Integer = Tables("染色生产表").findrow(dr)
    If wz >= 0 Then
        Tables("染色生产表").position = wz
    End If
End If

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


加好友 发短信
等级:超级版主 帖子:110544 积分:562604 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/10/20 15:43:00 [显示全部帖子]

就那样了

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


加好友 发短信
等级:超级版主 帖子:110544 积分:562604 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/10/20 16:03:00 [显示全部帖子]

e.DataTable.sqlcompute("max(缸号)","缸号 like '%-%'")

 回到顶部