$var = IniReadSectionNames("我的.ini")
If @error Then
MsgBox(4096, "", "发生错误,可能目标文件并非标准的INI文件.")
exit
Else
For $a = 1 To $var[0]
$var2 = IniReadSection("我的.ini", $var[$a])
If @error Then
MsgBox(4096, "", "发生错误,可能目标文件并非标准的INI文件.")
exit
Else
For $b = 1 To $var2[0][0]
For $c = 1 To $var[0]
if $a <> $c then
$cf = IniRead("我的.ini", $var[$c], $var2[$b][0], "")
if $cf <> "" then
IniWrite("重复的关键字.txt","关键字:"&$var2[$b][0],"字段:"&$var[$c],"数据:"&$cf)
endif
endif
Next
Next
EndIf
Next
EndIf