当前位置: 首页 > Web与应用 > 正文

VBS 编写的PHP-CGI.EXE驻守程序

option Explicit
dim strComputer,objWMIService,objShell,colProcesses
strComputer = “.”
Set objWMIService = GetObject(“winmgmts:\\” & strComputer & “\root\cimv2”)
Set objShell = CreateObject(“Wscript.Shell”)

Do
        Set colProcesses = objWMIService.ExecQuery _
                (“Select * from Win32_Process Where Name = 'php-cgi.exe'”)

        '如果指定进程少于3个,就再添加一个进程
        If colProcesses.Count < 3 Then
                objShell.Run “RunHiddenConsole.exe  php\php-cgi.exe -b 127.0.0.1:9000 -c php\php.ini”
        End If

        '5秒检测一次
        Wscript.Sleep 5000

Loop

适合用于NGINX For WINDOWS上面,解决PHP-CGI.EXE经常挂掉的问题。

本文固定链接: http://blog.ich8.com/post/82 | 霸王硬上弓's Blog

avatar
该日志由 霸王硬上弓 于2009年10月26日发表在 Web与应用 分类下, 你可以发表评论,并在保留原文地址及作者的情况下引用到你的网站或博客。
原创文章转载请注明: VBS 编写的PHP-CGI.EXE驻守程序 | 霸王硬上弓's Blog

VBS 编写的PHP-CGI.EXE驻守程序:等您坐沙发呢!

发表评论

您必须 [ 登录 ] 才能发表留言!