Desktop Management スクリプト言語 › 関数 › MIF および Inv ファイル関数 › GetMIFValue - 属性値を取得します。

GetMIFValue - 属性値を取得します。

UNIX および Windows で有効です。

GetMIFValue は、MIF ファイルの特定の属性の値を取得します。

この MIF および Inv ファイル関数の形式は、以下のとおりです。

GetMIFValue(Filename as string, GroupName as string, AttrName as string) as string

GetMIFValue(Filename as string, GroupID as integer, AttrID as integer) as string

GetMIFValue(Filename as string, GroupName as string, GroupID as integer, AttrName as string, AttrID as integer) as string

Filename

MIF ファイルの名前を指定します。

GroupName

属性が属しているグループの名前を指定します。

GroupID

属性が属しているグループの ID を指定します。

AttrName

値を取得する属性の名前を指定します。

AttrID

値を取得する属性の ID を指定します。値がテキスト文字列の場合、戻り値は引用符で囲まれます。

指定された属性が MIF ファイルにある場合、GetMIFValue はその属性値を表す文字列を返します。それ以外の場合は、空の文字列を返します。

例： GetMIFValue 関数

以下に、GetMIFComponent、GetMIFInteger、GetMIFString、GetMIFValue、および SetMIFValue 関数の例を示します。

Dim file, gname, aname as string
Dim gid as integer

ClrScr()
file = "h:¥test¥miffus¥file.mif"

Print("Component of """ + file + """: """ + GetMIFComponent(file) + """")

gname = "Strings"
gId = 1
aname = "string_1"
Print(gname + "." + aname + " = " + GetMIFString(file, gname, gId, aname, 1))
aname = "string_2"
Print(gname + "." + aname + " = " + GetMIFValue(file, gname, gId, aname, 2))

if SetMIFValue(file, gname, gId, aname, 2, "Text_new") then
	Print(gname + "." + aname + " = " + GetMIFValue(file, gname, gId, aname, 2))
else
	Print("1. SetMIFValue failed.")
	exit
endif

gname = "Numbers"
gId = 2
aname = "number_1"
Print(gname + "." + aname + " = " + Str(GetMIFInteger(file, gname, gId, aname, 1)))
aname = "number_2"
Print(gname + "." + aname + " = " + GetMIFValue(file, gname, gId, aname, 2))
if SetMIFValue(file, gname, gId, aname, 2, "999999") then

Print(gname + "." + aname + " = " + GetMIFValue(file, gname, gId, aname, 2))
else
	Print("2. SetMIFValue failed.")
	exit

endif