IIS應(yīng)用程序池自動(dòng)回收作業(yè)
vb:
appPoolName = WScript.Arguments(0) Set oWebAdmin = GetObject("winmgmts:root\WebAdministration") Set oAppPool = oWebAdmin.Get("ApplicationPool.Name='" + appPoolName + "'") oAppPool.Recycle set fso=createobject("scripting.filesystemobject") if (fso.fileexists("C:\WebRoot\WebSite\FLFTask\Logs\recycleIISPool.log")) then '1-forreading,2-forwriting,8-appending set file=fso.opentextfile("C:\WebRoot\WebSite\FLFTask\Logs\recycleIISPool.log",8,ture) else set file=fso.createtextfile( "C:\WebRoot\WebSite\FLFTask\Logs\recycleIISPool.log",8,ture) end if 'write(x)寫(xiě)入x個(gè)字符,writeline寫(xiě)入換行,writeblanklines(n)寫(xiě)入N個(gè)空行 file.writeline now&" 應(yīng)用程序池“"&appPoolName &"”已經(jīng)回收成功。" file.close
并寫(xiě)bat
cscript recyclepool.vbs EduWebApi
并放入任務(wù)計(jì)劃程序中 執(zhí)行Bat
追加:
回收之后,但還是解決不了,回收第一次的請(qǐng)求卡,再追加一個(gè)Bat,調(diào)起url請(qǐng)求訪問(wèn),借用curl實(shí)現(xiàn):
@echo off color 1f echo 正在調(diào)起程序 echo.>>check.txt echo.正在調(diào)起程序 %date% >>check.txt echo 開(kāi)始執(zhí)行baidu.com %date% %time% >>check.txt curl -s http://www.baidu.com/api/Common/CheckProveStatus>>check.txt echo. 執(zhí)行完成 %time% >>check.txt

浙公網(wǎng)安備 33010602011771號(hào)