ServiceStop ( ServiceInfoName )
' 実行中のJP1/Script サービスを停止する。 Dim svStatus ServiceSetValue ( "JSService" ,Name::"JP1_Script" ) ServiceRefer ("JSService" ,svStatus ) If svStatus = SERVICE_RUNNING Then ServiceStop ( "JSService" ) End