D_Master
29-03-2009, 10:35
Всем привет!
Подскажите, пожалуйста, как правильно сравнить два текстовых файла на предмет идентичности друг другу.
#NoTrayIcon
$ipfilter = "H:\Program Files\uTorrent\ipfilter.dat"
FileOpen($ipfilter, 0)
$oldIpFilter = FileRead($ipfilter)
FileClose($ipfilter)
FileOpen(@ScriptDir & "\ipfilter.dat", 0)
$newIpFilter = FileRead(@ScriptDir & "\ipfilter.dat")
FileClose(@ScriptDir & "\ipfilter.dat")
MsgBox(64, "Old IpFilter", $oldIpFilter)
MsgBox(64, "New IpFilter", $newIpFilter)
If $oldIpFilter==$newIpFilter Then
MsgBox(64, "", "IpFilter актуален")
Else
MsgBox(64, "", "IpFilter не актуален")
EndIf
Exit
Однако, в любом случае, выскакивает окно, что IpFilter не актуален. Даже если проверяю один и тот же файл :)
В чем ошибка?
Подскажите, пожалуйста, как правильно сравнить два текстовых файла на предмет идентичности друг другу.
#NoTrayIcon
$ipfilter = "H:\Program Files\uTorrent\ipfilter.dat"
FileOpen($ipfilter, 0)
$oldIpFilter = FileRead($ipfilter)
FileClose($ipfilter)
FileOpen(@ScriptDir & "\ipfilter.dat", 0)
$newIpFilter = FileRead(@ScriptDir & "\ipfilter.dat")
FileClose(@ScriptDir & "\ipfilter.dat")
MsgBox(64, "Old IpFilter", $oldIpFilter)
MsgBox(64, "New IpFilter", $newIpFilter)
If $oldIpFilter==$newIpFilter Then
MsgBox(64, "", "IpFilter актуален")
Else
MsgBox(64, "", "IpFilter не актуален")
EndIf
Exit
Однако, в любом случае, выскакивает окно, что IpFilter не актуален. Даже если проверяю один и тот же файл :)
В чем ошибка?