Foxtable(狐表)用户栏目专家坐堂 → 多文件列问题


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

主题:多文件列问题

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


加好友 发短信
等级:小狐 帖子:394 积分:6033 威望:0 精华:0 注册:2015/2/17 10:18:00
多文件列问题  发帖心情 Post By:2023/3/5 10:02:00 [只看该作者]

表A,有多文件列【 收文件】,文件均存放在  “ProjectPath &  收文件”  文件夹中,由于误操作原因,把通过【 收文件】列增加到文件夹中的某些文件删除了。

请教:1.找出表A中【收文件】列有文件记录,但”ProjectPath &  收文件“文件夹中实际不存在该文件的记录;
        2.删除表A中【收文件】列中该文件记录,同时同条记录中其他文件不删除。






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


加好友 发短信
等级:超级版主 帖子:110809 积分:563983 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/3/5 20:42:00 [只看该作者]

遍历所有行,后遍历文件列的lines,看看:http://www.foxtable.com/webhelp/topics/2717.htm

判断是否存在文件参考:http://www.foxtable.com/webhelp/topics/0337.htm

for each r as row in tables(A).rows
    Dim fls As List(of String)
    fls = r.DataRow.Lines(
"
文件")
for i as integer = fls.count - 1 to 0 step -1
If FileSys.FileExists(ProjectPath & "收文件\" & fls(i)) = false  Then
fls.removeat(i)
end if
next
r.DataRow.Lines("文件") = fls 
next

 回到顶部