GetGV ( GlobalName 〔, CompName〕 )
HKEY_LOCAL_MACHINE¥SOFTWARE¥Hitachi¥JP1/Script¥SPTX
ParseDQ(DWORD)
' 自コンピュータ上のグローバル変数を取得し,レジストリを操作する。
If GetGV ( "Debug_Mode" ) = True Then
Dbflag = "DebugFlag"
RegWrite ( HKEY_CURRENT_USER _
, "Software¥Hitachi¥Script¥Option" , Dbflag , True )
End
' コンピュータ"SOP4A065 ( SCRIPT ) "上のグローバル変数を取得し,
' 更新する。
If GetGV ( "Debug_Mode" ,"SOP4A065 ( SCRIPT ) " ) = True Then
SetGV ( "Debug_Mode" ,False ,"SOP4A065 ( SCRIPT ) " )
End