diddom 发表于 2012-6-6 05:11:42

Delete a folder

本帖最后由 diddom 于 2012-6-6 05:15 编辑

说明

删除一个名为 C:\Scripts 的资料夹。

范例指令码

strComputer = "."

Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")

Set colFolders = objWMIService.ExecQuery _
    ("Select * from Win32_Directory where Name = 'c:\\Scripts'")

For Each objFolder in colFolders
    errResults = objFolder.Delete
    Wscript.Echo errResults
Next
页: [1]
查看完整版本: Delete a folder