谁帮忙帮忙写个vbs

Dim wsset ws = CreateObject("wscript.shell")dows.Run "s.bat"wscript.sleep 600000ws.Run "C:\Windows\system32\cmd.exe /c tskill cmd",0loop想要结束这个vbs的话就打开C:\Windows\system32\cmd.exe，输入tskill wscript后回车