ServiceStart ( ServiceInfoName )
' JP1/Script サービスが存在しなかったら登録し,サービスを開始する。
ServiceSetValue ( "JSService" ,Name::"JP1_Script" )
If IsExistService ( "JSService" ) = False Then
OutDir = "C:¥Program Files¥Hitachi¥Script¥BIN¥"
ServiceSetValue ( "JSService" ,Name::"JP1_Script" _
,DispName::"JP1/Script" _
,Type::SERVICE_WIN32_OWN_PROCESS _
,Start::SERVICE_AUTO_START _
,Errctl::SERVICE_ERROR_NORMAL _
,Path::OutDir+"SPTHSV.EXE" )
ServiceCreate ( "JSService" )
End
ServiceStart ( "JSService" )