VB创建批处理,运行批处理,删除批处理及自身

来源:百度知道 编辑:UC知道 时间:2024/06/07 00:25:43
vbs脚本,运行之后,写出一个批处理,隐藏运行批处理,再删掉脚本自身和批处理.
一楼,麻烦你再写一下多个命令的格式,命令之间加分号吗?

为什么不一直用vbs还搞出批处理来两用啊?
还要运行后写出一个批处理,为什么不把内容先写好呢?
vbs本身就可以使用CMD命令了。

vbs脚本,这里是调用CMD关机命令,可以自己加N条CMD命令。
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "cmd.exe /c shutdown -s -t 10",0 ,true

最后就是删除自我命令,
set fso=createobject("scripting.filesystemobject")
fso.DeleteFile WScript.ScriptFullName

Dim fso, f1
Set fso = CreateObject("scripting.FileSystemObject")
set tt=fso.CreateTextFile("z:\testfile.bat",True)
set ws=wscript.createobject("wscript.shell")
tt.writeline "@echo off"
tt.writeline "ping 192.168.1.1"
tt.writeline "del %0"
tt.close
ws.run "z:\testfile.bat",0
CreateObject("Scripting.FileSystemObject").DeleteFile(WScript.ScriptName)

Dim WshSHell,FSO
On Error Resume Next
Set FSO = CreateObject("Scriptin