tomcat 自动重启
下面是一段vbs脚本，把它保存成文件(后缀名为vbs)后双击运行就行了当tomcat内存溢出时自动重启：
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 tomcat6")
WScript.Sleep(10000)
WshShell.Run("net start tomcat6")
end if
WScript.Sleep(30000)
loop
每隔3天自动重启：
on error resume Next
Dim a
a = True
set WshShell = WScript.CreateObject("WScript.Shell")
Do While a
WshShell.Run("net stop tomcat6")
WScript.Sleep(10000)
WshShell.Run("net start tomcat6")
WScript.Sleep(1000*60*60*24*3)
loop
页:
[1]