以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  删除指定文件夹下的所有文件夹及文件  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=142227)

--  作者:蓝蚂蚁
--  发布时间:2019/10/21 16:30:00
--  删除指定文件夹下的所有文件夹及文件
我想在窗口中建立一个按钮,点击这个按钮就删除项目下名为“临时文件”的文件夹下所有文件(这个“临时文件”不用删除,只删除它里面的所有文件),不知道代码怎么写,谢谢了
--  作者:有点蓝
--  发布时间:2019/10/21 16:46:00
--  
1、删除目录再重新添加目录:http://www.foxtable.com/webhelp/topics/0333.htm
--  作者:蓝蚂蚁
--  发布时间:2019/10/21 17:09:00
--  

    Dim pth As String = ProjectPath & "AllMyFiles\\检验科\\"
    For Each File As String In FileSys.GetFiles("& pth &")
        FileSys.DeleteFile("File",2,2)
    Next

麻烦老师帮修改一下?


--  作者:有点蓝
--  发布时间:2019/10/21 17:16:00
--  
FileSys.DeleteFile(File,2,2)