vbs怎么实现监视进程的运行时间,然后能够在进程间通讯
vbs怎么实现监视进程的运行时间,然后能够在进程间通讯
我需要要一个vbs监视另外多个vbs的运行时间,监视其启动和结束。
时间超过一定时间 就kill掉
然后保留一定的数据做一定的处理
做一些处理
[解决办法]
if Err WScript.Echo Err.Description是用来在运行中处理err的。
适当地wscript.echo可以了解脚本运行的状况。
就你的需要,用FSO写到临时文件中可以满足需求了。
例如在单个脚本内部判断是否结束:
On Error Resume Next Dim timeOut,timeDelay timeOut = 2000 '超时时间,单位为毫秒 timeDelay = 200 '每次等待时间,单位为毫秒Set oIE = CreateObject("InternetExplorer.Application") If Err Then WScript.Echo now & vbcrlf & "创建InternetExplorer.Application失败!" Err.Clear WScript.Quit End If oIE.Navigate "http://msdn.microsoft.com" For i = 1 To timeOut / timeDelay WScript.Sleep timeDelay WScript.Echo now & "第" & i & "次等待打开MSDN" Next If ((Not oIE.Busy) And oIE.ReadyState = 4) Then WScript.Echo oIE.Document.body.innerText Else WScript.Echo "白等了" & timeOut / 1000 & "秒,打不开!" End If oIE.QuitSet oIE = Nothing WScript.Quit