Foxtable(狐表)用户栏目专家坐堂 → 【求助】fill


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

主题:【求助】fill

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


加好友 发短信
等级:幼狐 帖子:184 积分:1323 威望:0 精华:0 注册:2016/12/27 13:29:00
  发帖心情 Post By:2017/2/14 14:31:00 [只看该作者]

谢谢老师

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


加好友 发短信
等级:幼狐 帖子:184 积分:1323 威望:0 精华:0 注册:2016/12/27 13:29:00
  发帖心情 Post By:2017/2/15 8:31:00 [只看该作者]

老师,用fill查询后台数据库的多张表的代码怎么写??

 回到顶部
帅哥,在线噢!
有点蓝
  13楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107029 积分:544376 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/2/15 9:10:00 [只看该作者]

参考:http://www.foxtable.com/webhelp/scr/0688.htm,看、多表查询

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


加好友 发短信
等级:幼狐 帖子:184 积分:1323 威望:0 精华:0 注册:2016/12/27 13:29:00
  发帖心情 Post By:2017/2/15 9:18:00 [只看该作者]

蓝老师,保存数据的代码该怎么写呢??


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20170215091446.png
图片点击可在新窗口打开查看

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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/2/15 9:22:00 [只看该作者]

循环每一行,判断每一列的值,如果和原值不同,就是修改了。然后根据列名和主键值,去对应表找到那一行,修改值。

 

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

 


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


加好友 发短信
等级:幼狐 帖子:184 积分:1323 威望:0 精华:0 注册:2016/12/27 13:29:00
  发帖心情 Post By:2017/2/15 13:58:00 [只看该作者]

老师,看了还是不知道怎么写,老师可以写一段简单的让我参考参考吗??

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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/2/15 14:21:00 [只看该作者]

For Each dr As DataRow In DataTables("表A").datarows
    If dr.OriginalValue("第一列") <> dr("第一列") Then
        Dim fdr As DataRow = DataTables("表B").Find("_Identify = '" & dr("_Identify") & "'")
        If fdr IsNot Nothing Then
            fdr("第一列") = dr("第一列")
            fdr.save
        End If
    End If
Next

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


加好友 发短信
等级:幼狐 帖子:184 积分:1323 威望:0 精华:0 注册:2016/12/27 13:29:00
  发帖心情 Post By:2017/2/15 14:40:00 [只看该作者]

老师,"表B"是外部数据库中的表,第三行代码怎么改??

 回到顶部
帅哥,在线噢!
有点蓝
  19楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107029 积分:544376 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/2/15 16:11:00 [只看该作者]


 回到顶部
总数 19 上一页 1 2