以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]如何查找替换或删除后台表中某一字段中的指定字符串  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=95351)

--  作者:huangfanzi
--  发布时间:2017/1/17 14:41:00
--  [求助]如何查找替换或删除后台表中某一字段中的指定字符串
例如有一个后台表 _dt授权,表中有一字段名为用户名,
结构内容如下:
权限    用户列表
权限A  张三,李四,王五,赵六
权限B  李四,王五
权限C  张三,李四

现要求把用户列表中的李四删除掉,并且要注意李四前后的逗号也要进行相应的删除,一定要符合 用户名A,用户名B,用户名C 的规范。
谢谢老师!

--  作者:有点色
--  发布时间:2017/1/17 14:48:00
--  
dim name = "李四"
For Each dr As DataRow In DataTables("表A").Select("")
    Dim nstr As String = ""
    For Each s As String In dr("第一列").split(",")
        If s <> name Then nstr &= s & ","
    Next
    dr("第一列") = nstr.trim(",")
Next