想把这个函数写到ini中不知道是不是可行已解决

veve · 发表于 2011-10-15 04:05:35

本帖最后由 veve 于 2011-10-15 05:56 编辑

目的是方便加入数据不要改打包的EXE 改下INI就好。。。
ex
Func TS2id()
If $h12 == "AAA" Then
$TSID = "1876"
EndIf

If $h12 == "BBB" Then
$TSID = "7610"
EndIf

If $h12 == "AAC" Then
$TSID = "3622"
EndIf

If $h12 == "ABD" Then
$TSID = "29163"
EndIf

；可以接着加

endfunc

============================================

请教了。。。

veve · 发表于 2011-10-15 05:43:05

呵呵搞定。。。

veve · 发表于 2011-10-15 06:00:24

Func ts2id()
$var = IniReadSection($inipatch, "ts2id")
For $i = 1 To $var[0][0]
If $h12 == $var[$i][0] Then
$tsid = $var[$i][1]
      EndIf
      If $tsid <> "" Then
ExitLoop
EndIf
     Next
EndFunc

ini 内容。。。

[ts2id]
AAA=1876
BBB=7610
CCC=3622
XXX= yyyy

		自动登录	找回密码
密码			加入

[效率算法] 想把这个函数写到ini中 不知道是不是可行 已解决

[效率算法] 想把这个函数写到ini中不知道是不是可行已解决