ServiceQuery ( ServiceInfoName )
' JP1/Script サービスの設定情報(サービスの種類)を取得する。
Dim svType
ServiceSetValue ( "JSService" ,Name::"JP1_Script" )
ServiceQuery ( "JSService" )
ServiceGetValue ("JSService" ,Type::svType )
MessageBox ( "JP1/Scriptサービスの種類:"+svType )