重起tomcat 我也收益了
vbs脚本，双击运行即可on error resume Next
Dim a
a = True
set WshShell = WScript.CreateObject("WScript.Shell")
Do While a
set http = CreateObject("Microsoft.XMLHTTP")
http.open "POST","http://www.163.com(这里放你网站的页面地址)",false
http.send
if http.Status > 300 then
WshShell.Run("net stop tomcat5")
WScript.Sleep(10000)
WshShell.Run("net start tomcat5")
end if
WScript.Sleep(30000)
loop
页:
[1]