我做一個上傳檔案,這個檔案將存放在某目錄下,
但我想在上傳前先將目錄下所有的檔案先刪除後再存放目前上傳的檔。
目前只會刪除檔名相同的:
If FSO.FileExists(server.mappath(filename)) Then
FSO.DeleteFile(server.mappath(filename))
End If
有方法做到刪除所有檔嗎?
...全文
404打赏收藏
我想在上傳前先將目錄下所有的檔案先刪除後再存放目前上傳的檔
我做一個上傳檔案,這個檔案將存放在某目錄下, 但我想在上傳前先將目錄下所有的檔案先刪除後再存放目前上傳的檔。 目前只會刪除檔名相同的: If FSO.FileExists(server.mappath(filename)) Then FSO.DeleteFile(server.mappath(filename)) End If 有方法做到刪除所有檔嗎?
Set objFs=Server.CreateObject("Scripting.FileSystemObject")
Set objFdir=objFs.GetFolder(strPath)
strParentPath= objFs.GetParentFolderName(strPath)
for each strSubFiles in objFdir.files
FSO.DeleteFile(server.mappath(strSubFiles))
next