返回列表 上一主題 發帖

[發問] 語法問題

本帖最後由 kimbal 於 2012-1-5 00:21 編輯

...你說的應該是FILESYSTEMOBJECT

以下是刪檔的:
object.DeleteFile "filename", force
force是true的話, 檔案唯讀時也可delete

dim filesys
Set filesys = CreateObject("Scripting.FileSystemObject")
If filesys.FileExists("c:\somefile.txt") Then
   filesys.DeleteFile "c:\somefile.txt",TRUE
End If

編輯: 看漏了題目,是時候睡了
以下是刪文件夾的:
FORCE是TRUE的話,文件夾有東西都會DELETE

Dim filesys
    Set filesys = CreateObject("Scripting.FileSystemObject")
    If filesys.FolderExists("c:\FOLDER\") Then
       filesys.DeleteFolder "c:\FOLDER", True
    End If
懂得發問,答案就會在其中

今日の一秒は  明日にない
http://kimbalko-chi.blogspot.com
http://kimbalko.blogspot.com

TOP

        靜思自在 : 口說好話、心想好意、身行好事。
返回列表 上一主題