Foxtable(狐表)用户栏目专家坐堂 → [求助] 关于修改所有数据的问题【已解决】


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

主题:[求助] 关于修改所有数据的问题【已解决】

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


加好友 发短信
等级:三尾狐 帖子:629 积分:4927 威望:0 精华:0 注册:2014/2/25 15:50:00
[求助] 关于修改所有数据的问题【已解决】  发帖心情 Post By:2016/9/1 19:01:00 [只看该作者]

为什么这个只能更新当前页的数据,如果要更新所有包括没加载的数据该如何操作呢
For Each drss As DataRow In DataTables("部门管理").DataRows
    DataTables("用户管理").ReplaceFor("本部集合", drss("部门集合"), "部门名称 = '" & drss("部门名称") & "'")
Next
[此贴子已经被作者于2016/9/2 20:10:35编辑过]

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


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2016/9/1 20:37:00 [只看该作者]

'不如直接用sql更新,效率更高,

access

Dim cmd As new SQLCommand
cmd.Co nnectio nName = ""
cmd.CommandText = "upda te {用户管理},{部门管理} set {用户管理}.本部集合 = {部门管理}.部门集合 whe re {用户管理}.部门名称={部门管理}.部门名称"
Dim val As Integer = cmd.ExecuteNonQuery

sqlserver
Dim cmd As new SQLCommand
cmd.Con nection Name = "A"
cmd.CommandText = "upd ate 用户管理 set 用户管理.本部集合 = 部门管理.部门集合 fr om 用户管理,部门管理 where 用户管理.部门名称=部门管理.部门名称"
Dim val As Integer = cmd.ExecuteNonQuery

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


加好友 发短信
等级:三尾狐 帖子:629 积分:4927 威望:0 精华:0 注册:2014/2/25 15:50:00
  发帖心情 Post By:2016/9/2 17:33:00 [只看该作者]

cmd.CommandText = "upd ate 用户管理 set 用户管理.本部集合 = 部门管理.部门集合 fr om 用户管理,部门管理 where 用户管理.部门名称=部门管理.部门名称"
cmd.CommandText = "upd ate 用户管理 set 用户管理.本部集合 = 部门管理.部门集合 fr om 用户管理,部门管理 where 用户管理.group=部门管理.部门名称"
换成这样就提示语法错误  难道后台更新不能用英文名

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


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

where 用户管理.[group]=部门管理.部门名称"

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


加好友 发短信
等级:三尾狐 帖子:629 积分:4927 威望:0 精华:0 注册:2014/2/25 15:50:00
  发帖心情 Post By:2016/9/2 19:27:00 [只看该作者]

为什么登陆系统后,不自动进入‘首页’页面,而是在其他页面,害得每次都看不到主界面

 回到顶部