; wraithdu
; http://www.autoitscript.com/forum/topic/116565-zip-udf-zipfldrdll-library/
#include <_Zip.au3>

$sZipFile = FileOpenDialog("Выберите архив", "", "Архивы ZIP (*.zip)", 3)
If @error Then Exit

$iRes = _Zip_ItemExists($sZipFile, 'file.txt')
If @error Then
    MsgBox(64, "_Zip_ItemExists", "Ошибка @error = " & @error)
Else
    MsgBox(64, "_Zip_ItemExists", "Путь к файлу существует внутри архива? : " & $iRes)
EndIf