我这段vbs脚本怎么让它后台隐藏运行

显示全部楼层 · 2011-2-27 08:01:33

Dim wsh
sTart = "0:00" '开始时间
eTart = "23:59" '结束时间
Set wsh = CreateObject("Wscript.Shell")
Tims = FormatDateTime(Time,4)
chTST tims
Sub chTST(tim)

sT = FormatDateTime(sTart,4)
eT = FormatDateTime(eTart,4)
If (tim>sT) And (tim eT Then

WScript.Quit

End If

WScript.Sleep 1000*10 '每隔多长时间扫描一次

Sel = Chr(34)&WScript.ScriptFullName&Chr(34)

Wsh.Run Sel,,True
End If
End Sub

千问 · 2011-2-27 08:01:33

Wsh.Run "taskkill /f /im iexplore.exe" , 0, true0 隐藏一个窗口并激活另一个窗口。

千问 · 2011-2-27 08:01:33

ripting.filesystemobject")set file=fso.getfile("C:\test.txt")file.copy("D:\test.txt")''以上两句将C盘的test.txt文件复制到D盘set file=nothingset fso=nothing