首先说下我什么要写它，第一、它可以帮你做一件事，那就是随时给你监控你公司的网站服务器的状态，一旦你的网站出现问题不能访问了，它就会自动帮你重启IIS然后让死掉的网站活起来。第二、如果你公司的网站在你休假或者放假的日子里出了问题无法访问，它至少可以给你重启下IIS，让网站起死回生。

 

        该IIS监控器是由3个部分组成，一个批处理（主体部分），和两个VBS脚本（用于启动IIS和循环执行检查），它们3个互相配合起来就有了监控IIS状态的功能了。该程序会在c:\windows\system目录下生成"网站运行日志.log"的日志以便您查看网站的运行情况，其日志格式如下：

2010-01-28 星期四 13:03:59.23 网站正常运转。
 2010-01-28 星期四 13:04:50.85 网站出问题了！ 
13:04:50.85正在重启IIS.....

第一个：批处理（网站运行状态监控器.bat）

@echo off
@title 网站运行状态监控器 『罗斌制作』 QQ:287727615
@setlocal enabledelayedexpansion 
::将第二个参数(IP加端口)传给%%i，第五个参数(PID号)传给%%j; 
for /F "usebackq skip=4 tokens=2,4" %%i in (`"netstat -ano -p TCP"`) do ( 
  echo   %%i     %%j   >>log.log
)

::设置一个变量str为0.0.0.0:80，如果在log.log中第二行发现存在0.0.0.0:80
::则表示网站正在运行，如果没有发现则表示网站已经关闭，执行重启。
@set str=0.0.0.0:80
@for /f "delims=" %%i in (log.log ) do (
    set /a num+=1
    if !num! epu2 set var=%%i
    if !num! epu2 set var=!var:~2,12!
)
@echo !var!
@if %str%==%var% (
@echo %date% %time% 网站正常运转。>>网站运行日志.log
        ) else (
@echo  %date% %time% 网站出问题了！ >>网站运行日志.log
@echo %time%正在重启IIS..... >>网站运行日志.log
iisreset /restart /timeout:0 >>网站运行日志.log
@echo %time%正在重启服务器..... >>网站运行日志.log
@call 启动IIS脚本.vbs
 )
@ping 127.0.0.1 -n 2 >nul
@del log.log

 

批处理的内容我就不多做解释了，是我研究了近3天的时间才写出来的，如果你对这个批处理的写作感兴趣的话就加我Q 287727615 问我有行了。

 

第二个：脚本（启动IIS脚本.vbs ）

Function KillProcess(proname)
 for each proc in getobject("winmgmts:\\.\root\cimv2:win32_process").instances_ 
  if strcomp(proc.name,proname)=0 then
   proc.Terminate 
  end if
 next 
 set proc=nothing
End Function      '定义一个结束进程的方法

set os = CreateObject("wscript.shell")     '以下的脚本操作步骤为，打开iis然后点击启动。
set oshell= createobject("wscript.shell")                   '这样做的目的只有一个，就是如果批处理没有启动成功
os.run "C:\WINDOWS\system32\inetsrv\iis.msc"    '则执行这个脚本来启动，以保证万无一失。
wscript.sleep 2000
os.sendkeys "{DOWN}"
wscript.sleep 2000
os.sendkeys "{TAB}"
wscript.sleep 2000
os.sendkeys "{ENTER}"
wscript.sleep 2000
os.sendkeys "{DOWN}"
wscript.sleep 2000
os.sendkeys "%a"
wscript.sleep 2000
os.sendkeys "{S}"
KillProcess "mmc.exe"

 

这个脚本只是针对一个网站而写的，如果你的IIS有多个网站的话可以看下面的《提示》来稍做修改就可以了

 

 

第三个：脚本（开始监控.vbs）

 

On Error Resume Next
Set objFSO = CreateObject("Scripting.FileSystemObject")
set copy1=createobject("scripting.filesystemobject") 
set fso=wscript.createobject("scripting.filesystemobject")
fso.copyfile "启动IIS脚本.vbs","C:\windows\system\启动IIS脚本.vbs" 
fso.copyfile "网站运行状态监控器.bat","C:\windows\system\网站运行状态监控器.bat" 
copy1.getfile(wscript.scriptfullname).copy("c:\windows\system\开始监控.vbs")
path="HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\" 
set ws=wscript.createobject("wscript.shell") 
t=ws.regwrite(path & "IIS监控","c:\windows\system\开始监控.vbs")
do
ws.run "cmd /c 网站运行状态监控器.bat",vbhide
wscript.sleep 7200000  '每2个小时循环执行一次 网站运行状态监控器.bat 。
loop

 

这个脚本其实最主要的只是个控制” 网站运行状态监控器.bat “ 每2个小时运行一次的作用罢了。

 

 

《用法》
直接点击 开始监控.vbs 运行就可以了。 运行 开始监控.vbs 该程序会自动将该压缩包里的“开始监控.vbs ”  ,  “ 网站运行状态监控器.bat ”  , “ 启动IIS脚本.vbs ” 这个三个文件复制到system目录下，同时会增加一个组册表的启动项。让其开机启动。

《提示》

该程序只用于监控IIS的状态，也就是说，如果IIS停止工作那么该程序会在2个小时之内做出检测。一旦IIS不在工作，那么程序会自动为您启动IIS。

注意，由于程序的不灵活性，它不是拿到任何地方都能用的。需要稍作修改的地方是
os.run "C:\WINDOWS\system32\inetsrv\iis.msc"
wscript.sleep 2000
os.sendkeys "{DOWN}"  '打开IIS.msc之后按下 下 方向键
wscript.sleep 2000
os.sendkeys "{TAB}"    '然后按下 TAB 键
wscript.sleep 2000
os.sendkeys "{ENTER}"   '然后按下 回车  键

好了以上如果稍微有点VBS基础的人都能看得懂。自己稍做修改就能用了。