Trong môi trường IIS 6.0 sử dụng Application Pool, các bạn thỉnh thoảng hay bắt gặp các Application Pool tự động dừng lại vì một lý do nào đó mà ko xác định được.Dẫn đến thông báo lỗi SERVICE UNAVAILABLE khi truy cập website.
Để khắc phục lỗi này chỉ đơn giản là vào IIS và khởi động Application Pool nào bị stop lên là ok.
Nhưng nếu lỗi này xảy ra thường xuyên hơn mong đợi,thì mình giới thiệu các bạn một đoạn mã VB sau thật đơn giản,nhằm khắc phục lỗi này.
strComputer = “.”
Set objWMIService = GetObject (“winmgmts:\\” & strComputer & “\root\microsoftiisv2″)
Set objWMIService = GetObject (“winmgmts:\\” & strComputer & “\root\microsoftiisv2″)
Set colItems = objWMIService.ExecQuery (“Select AppPoolState,name from IISApplicationPoolSetting where AppPoolState = 4″)
For Each objItems In colItems
poolname=objItems.name
AppPoolStart(poolname)
Next
For Each objItems In colItems
poolname=objItems.name
AppPoolStart(poolname)
Next
Function AppPoolStart(PoolName)
set PoolcolItems = objWMIService.ExecQuery (“Select name from IISApplicationPool where name=’” & poolname & “‘”)
set PoolcolItems = objWMIService.ExecQuery (“Select name from IISApplicationPool where name=’” & poolname & “‘”)
For Each objItem In PoolcolItems
objitem.Start
Next
End Function
objitem.Start
Next
End Function
Các bạn copy đoạn mã trên lưu lại thành file có phần mở rộng .vbs, sau đó lên lịch cho file này chạy liên tục khoảng 2 hay 5 phút chạy một lần.
Chọn Start >> All Programs >> Accessories >> System Tools >> Scheduled Tasks >> Add Scheduled Task . . . Next . . .
Khi file này chạy thì nó sẽ kiểm tra các Application Pool nào stop thì nó sẽ start lên theo mong muốn của mình.
Cập nhật công nghệ từ Youtube tại link: https://www.youtube.com/channel/UCOxeYcvZPGf-mGLYSl_1LuA/videos
Để tham gia khóa học công nghệ truy cập link: http://thuvien.hocviendaotao.com
Mọi hỗ trợ về công nghệ email: dinhanhtuan68@gmail.com