If @error Then
MsgBox(4096, "", "读ini文件错误.")
Else
For $i = 2 To $tmp[0][0]
IniWrite($filename,"IDAFiPaths",$tmp[$i][0],@ScriptDir &"\"& StringMid($tmp[$i][1],StringInStr ($tmp[$i][1], "Tools\" ,2 ,-1 )))
Next
EndIf
If @error Then
MsgBox(4096, "", "读ini文件错误.")
Else
For $i = 1 To $tmp[0][0]
IniWrite($filename,"Import libraries",$tmp[$i][0],@ScriptDir &"\"& StringMid($tmp[$i][1],StringInStr ($tmp[$i][1], "Lib\" ,2 ,-1 )))
Next
EndIf