VBS腳本混淆：結束部分先開始？

輸入計算機名並重新啓動它
等它拿出
發送新的命令

這一切，沒有第2步的偉大工程。發生的是，第二步先來，然後機器重新啓動（第一步）。我很困惑，這裏是代碼：

nomePosto = InputBox("Nome do posto:", _ 
    "Correção Cert DSM") 
intAnswer = _ 
MsgBox("Ao continuar o posto " & nomePosto & " vai reiniciar!",_ 
vbOkCancel, "ATENÇÃO") 
if intAnswer = vbOk Then 
CONST comm1 = " shutdown -r -f -t 1" 
CONST comm2 = " md c:\teste" 
set wshShell = WScript.CreateObject ("Wscript.Shell") 
wshShell.run "psexec \\" & nomePosto & comm1 
Set oIE = CreateObject("InternetExplorer.Application") 
With oIE 
    .navigate("about:blank") 
    .Document.Title = "Aguarde ..." & string(100, chrb(160)) 
    .resizable=0 
    .height=100 
    .width=100 
    .menubar=0 
    .toolbar=0 
    .statusBar=0 
    .visible=1 
End With 
Do while oIE.Busy 
wscript.sleep 500 
Loop 
oIE.document.body.innerHTML = "<div id=""countdown"" style=""font: 12pt sans-serif;text-align:center;""></div>" 
for i=56 to 0 step -1 
oIE.document.all.countdown.innerText= i 
wscript.sleep 1000 
next 
wshShell.run "psexec \\" & nomePosto & comm2 
oIE.quit 
else 
end if 
Wscript.Quit

來源

2013-01-09 brunobliss

Wscript.sleep 500在第一個命令之後。

我曾嘗試過這一點，完全忽略了它需要更長的時間才能拿出電腦，意味着所有事情都相應地進行了工作du

來源

2013-01-09 11:51:07 brunobliss

VBS腳本混淆：結束部分先開始？

回答

相關問題