JP1 Version 8 JP1/Script(Windows(R)用)
ServiceCreate ( 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" )
EndAll Rights Reserved. Copyright (C) 2006, 2007, Hitachi, Ltd.