1、kill檔案"刪除檔案rmdir資料夾"刪除資料夾如果想要使用RmDir來刪除一個含有檔案的目錄或資料夾,則會發生錯誤。在試圖刪除目錄或資料夾之前,先使用Kill語句來刪除所有檔案。2、或者用物件的方法:Setfs=CreateObject("Scripting.FileSystemObject")fs.deletefile刪除檔案fs.deletefolder刪除資料夾3、用API也可以辦到DeclareFunctionDeleteFileLib"kernel32"Alias"DeleteFileA"(ByVallpFileNameAsString)AsLongdeletefile檔名"強制刪除一個檔案例子:PrivateDeclareFunctionDeleteFileLib"kernel32"Alias"DeleteFileA"(ByVallpFileNameAsString)AsLongPrivateSubForm_Load()DeleteFile"c:\test.txt"Setfs=CreateObject("Scripting.FileSystemObject")fs.DeleteFile"c:\test.txt"fs.deletefolder"c:\test"Kill"c:\test.txt"RmDir"c:\test"EndSub
1、kill檔案"刪除檔案rmdir資料夾"刪除資料夾如果想要使用RmDir來刪除一個含有檔案的目錄或資料夾,則會發生錯誤。在試圖刪除目錄或資料夾之前,先使用Kill語句來刪除所有檔案。2、或者用物件的方法:Setfs=CreateObject("Scripting.FileSystemObject")fs.deletefile刪除檔案fs.deletefolder刪除資料夾3、用API也可以辦到DeclareFunctionDeleteFileLib"kernel32"Alias"DeleteFileA"(ByVallpFileNameAsString)AsLongdeletefile檔名"強制刪除一個檔案例子:PrivateDeclareFunctionDeleteFileLib"kernel32"Alias"DeleteFileA"(ByVallpFileNameAsString)AsLongPrivateSubForm_Load()DeleteFile"c:\test.txt"Setfs=CreateObject("Scripting.FileSystemObject")fs.DeleteFile"c:\test.txt"fs.deletefolder"c:\test"Kill"c:\test.txt"RmDir"c:\test"EndSub