使用這個腳本，可以隨時讓它歇下來。當然也可以讓它繼續工作。
前提是，你必須是本機管理員。
這個腳本使用一各很過時的終止程序方法：ntsd.exe -c q -p ProcessID。所以以前有過一個bat版，之所以用VBS是因為效率高一點，而且沒有太多的黑色窗口。
主要思想是：循環終止程序+停止服務

代碼如下：

' 程序初始化，取得參數
If WScript.Arguments.Count = 0 Then
    Call main()
    WScript.Quit
Else
    Dim strArg, arrTmp
    For Each strArg In WScript.Arguments
        arrTmp = Split(strArg, "=")
        If UBound( arrTmp ) = 1 Then
            Select Case LCase( arrTmp(0) )
                Case "sep"
                    Call sep( arrTmp(1) )
                Case "process_stop"
                    Call process_stop( arrTmp(1) )
                Case "process_start"
                    Call process_start( arrTmp(1) )
                Case "server_stop"
                    Call server_stop( arrTmp(1) )
                Case "server_start"
                    Call server_start( arrTmp(1) )
                Case "show_tip"
                    Call show_tip( arrTmp(1) )
                Case Else
                    WScript.Quit
            End Select
        End If
    Next
    WScript.Quit
End If

發表評論 共有條評論 用戶名: 密碼: 驗證碼: 匿名發表