以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp) --  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2) ----  [求助]删除文件的问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=172293)

--  作者：wusim --  发布时间：2021/10/7 7:17:00 --  [求助]删除文件的问题 For Each f As String In FileSys.GetFiles("D:\\bak")     If FileSys.GetName(f).contains("image1") Then         FileSys.DeleteFile(f, 2,2)     End If Next 如果文件夹下有两个文件时要删除含有“image1”没有问题，但是有多个文件时，代码不好写。实际上我想保留含有“image2“的文件，其他一律删除。 代码怎样写？

--  作者：z769036165 --  发布时间：2021/10/7 8:22:00 --   For Each f As String In FileSys.GetFiles("D:\\bak")     If FileSys.GetName(f).contains("image2") = false Then         FileSys.DeleteFile(f, 2,2)     End If Next