Foxtable(狐表)用户栏目专家坐堂 → 如何根据条件替换重复数据


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

主题:如何根据条件替换重复数据

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


加好友 发短信
等级:小狐 帖子:350 积分:3412 威望:0 精华:0 注册:2015/5/12 15:33:00
如何根据条件替换重复数据  发帖心情 Post By:2016/7/17 17:46:00 [只看该作者]

户号是一户家庭成员的标志,如何只保留户主关系中年龄最大的一位为户主,而删除同户号中其他成员的户主关系为空白?

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:户主.table


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


加好友 发短信
等级:狐神 帖子:4752 积分:34568 威望:0 精华:0 注册:2008/8/31 22:44:00
  发帖心情 Post By:2016/7/17 23:20:00 [只看该作者]

Dim cmd As New SQLCommand
cmd.CommandText = "s elect [_Identify] from"
cmd.CommandText += "(s elect 户号, max(年龄) As 年龄 from {表A} group by 户号) as a"
cmd.CommandText += " inner join {表A} as b on a.户号 = b.户号 And a.年龄 = b.年龄"
Dim dt As DataTable = cmd.ExecuteReader()
DataTables("表A").DeleteFor("_Identify not in (" & dt.GetComboListString("_Identify").Replace("|",",") & ")")

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


加好友 发短信
等级:小狐 帖子:350 积分:3412 威望:0 精华:0 注册:2015/5/12 15:33:00
  发帖心情 Post By:2016/7/18 9:10:00 [只看该作者]

谢谢,非常妙。我只想把这些行“户主”替换成空白,并不想删除行,该如何写?原谅我是一小白,请不吝赐教。

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


加好友 发短信
等级:小狐 帖子:350 积分:3412 威望:0 精华:0 注册:2015/5/12 15:33:00
  发帖心情 Post By:2016/7/18 9:28:00 [只看该作者]

DataTables("表A").ReplaceFor("户主关系","","_Identify not in (" & dt.GetComboListString("_Identify").Replace("|",",") & ")")

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/7/19 1:16:00 [只看该作者]

DataTables("表A").ReplaceFor("户主关系", nothing,"_Identify not in (" & dt.GetComboListString("_Identify").Replace("|",",") & ")")

 回到顶部