[Creat0R]

amel27,

сходу тоже не нашел »

Вот вроде что-то похожее, но это не совсем оно....
Но пока мой последний метод подходит, не думаю что будут с ним проблемы.

[Maza Faka]

amel27
Помоги пожалуйста, пытаюсь создать zip-архив:

Код:

$hDLL = DllOpen("zip32.dll")

$hCallBack_Print = DllCallbackRegister("_Print", "int", "str;long")
$hCallBack_Password = DllCallbackRegister("_Password", "int", "str;int;str;str")
$hCallBack_Comment = DllCallbackRegister("_Comment", "int", "str")
$hCallBack_Progress = DllCallbackRegister("_Progress", "int", "str;long")

$ZIPUSERFUNCTIONS = DllStructCreate("ptr print;ptr pwd;ptr comment;ptr progress")

DllStructSetData($ZIPUSERFUNCTIONS, "print", DllCallbackGetPtr($hCallBack_Print))
DllStructSetData($ZIPUSERFUNCTIONS, "pwd", DllCallbackGetPtr($hCallBack_Password))
DllStructSetData($ZIPUSERFUNCTIONS, "comment", DllCallbackGetPtr($hCallBack_Comment))
DllStructSetData($ZIPUSERFUNCTIONS, "progress", DllCallbackGetPtr($hCallBack_Progress))

$ZPOPT = DllStructCreate("ptr Date;ptr szRootDir;ptr szTempDir;int fTemp;int fSuffix;int fEncrypt;int fSystem;int fVolume;" & _
                         "int fExtra;int fNoDirEntries;int fExcludeDate;int fIncludeDate;int fVerbose;int fQuiet;int fCRLFLF;" & _
                         "int fLFCRLF;int fJunkDir;int fGrow;int fForce;int fMove;int fDeleteEntries;int fUpdate;int fFreshen;" & _
                         "int fJunkSFX;int fLatestTime;int fComment;int fOffsets;int fPrivilege;int fEncryption;int fRecurse;" & _
                         "int fRepair;byte fLevel")

$Date = DllStructCreate("char[256]")
DllStructSetData($Date, 1, "07/10/08")

$RootDir = DllStructCreate("char[256]")
DllStructSetData($Date, 1, "D:\Work\UnZIP")

$TempDir = DllStructCreate("char[256]")
DllStructSetData($TempDir, 1, "D:\Work\UnZIP")

$Level = DllStructCreate("char[1]")
DllStructSetData($Level, 1, 9)

DllStructSetData($ZPOPT, "Date", DllStructGetPtr($Date))
DllStructSetData($ZPOPT, "szRootDir", DllStructGetPtr($RootDir))
DllStructSetData($ZPOPT, "szTempDir", DllStructGetPtr($TempDir))
DllStructSetData($ZPOPT, "fTemp", 0)
;DllStructSetData($ZPOPT, "fSuffix", 0)
DllStructSetData($ZPOPT, "fEncrypt", 0)
DllStructSetData($ZPOPT, "fSystem", 1)
DllStructSetData($ZPOPT, "fVolume", 0)
DllStructSetData($ZPOPT, "fExtra", 1)
DllStructSetData($ZPOPT, "fNoDirEntries", 0)
DllStructSetData($ZPOPT, "fExcludeDate", 1)
DllStructSetData($ZPOPT, "fIncludeDate", 0)
DllStructSetData($ZPOPT, "fVerbose", 0)
DllStructSetData($ZPOPT, "fQuiet", 0)
DllStructSetData($ZPOPT, "fCRLFLF", 0)
DllStructSetData($ZPOPT, "fLFCRLF", 0)
DllStructSetData($ZPOPT, "fJunkDir", 0)
DllStructSetData($ZPOPT, "fGrow", 0)
DllStructSetData($ZPOPT, "fForce", 0)
DllStructSetData($ZPOPT, "fMove", 0)
DllStructSetData($ZPOPT, "fDeleteEntries", 0)
DllStructSetData($ZPOPT, "fUpdate", 0)
DllStructSetData($ZPOPT, "fFreshen", 0)
DllStructSetData($ZPOPT, "fJunkSFX", 0)
DllStructSetData($ZPOPT, "fLatestTime", 0)
DllStructSetData($ZPOPT, "fComment", 0)
DllStructSetData($ZPOPT, "fOffsets", 0)
DllStructSetData($ZPOPT, "fPrivilege", 0)
DllStructSetData($ZPOPT, "fEncryption", 0)
DllStructSetData($ZPOPT, "fRecurse", 1)
DllStructSetData($ZPOPT, "fRepair", 0)
DllStructSetData($ZPOPT, "fLevel", 0)

$aRet = DllCall($hDLL, "int", "ZpSetOptions", "ptr", DllStructGetPtr($ZPOPT))
ConsoleWrite($aRet[0] & @LF)

;$aRet = DllCall($hDLL, "int", "ZpGetOptions", "ptr", DllStructGetPtr($ZPOPT))
;ConsoleWrite($aRet[0] & @LF)

$aRet = DllCall($hDLL, "int", "ZpInit", "ptr", DllStructGetPtr($ZIPUSERFUNCTIONS))
ConsoleWrite($aRet[0] & @LF)

;============================ZpArchive()==========================================================
$ArchName = DllStructCreate("char[256]")
DllStructSetData($ArchName, 1, "test.zip")

$FileName = DllStructCreate("char[256]")
DllStructSetData($FileName, 1, "test.jpg")

$ZpArchive_Struct = DllStructCreate("int count;ptr arc;ptr file")

DllStructSetData($ZpArchive_Struct, "count", 1)
DllStructSetData($ZpArchive_Struct, "arc", DllStructGetPtr($ArchName))
DllStructSetData($ZpArchive_Struct, "file", DllStructGetPtr($FileName))

$aRet = DllCall($hDLL, "int", "ZpArchive", "ptr", DllStructGetPtr($ZpArchive_Struct))

ConsoleWrite("!> ZpArchive: " & $aRet[0] & @LF)

;=============================================================================================

DllCallbackFree($hCallBack_Print)
DllCallbackFree($hCallBack_Password)
DllCallbackFree($hCallBack_Comment)
DllCallbackFree($hCallBack_Progress)

Func _Print($sFile, $sPos)
    ConsoleWrite($sFile & @LF)
EndFunc

Func _Password($sPWD, $sX, $sS2, $sName)
    ConsoleWrite("Password" & @LF)
EndFunc

Func _Comment($sComment)
    ConsoleWrite("!> File " & $sComment & " is overwrite" & @LF)
EndFunc

Func _Progress($sName, $sSize)
    ConsoleWrite("---> Arch name: " & $sName & @LF & _
                 "---> Pos: " & $sSize & @LF)
EndFunc

Прилагаю dll-ку и help-файл

[Creat0R]

Maza Faka,
На оф. форуме много раз приводили примеры, вот например: Zip plugin.

[Maza Faka]

Creat0R
Знаю, скачал недавно, распаковал архив, а там каша из файлов и директорий, непонятно, что куда "втыкать", примеров нет, можно конечно разобраться, но попробовал запустить и получив вот такое окно

от дальнейшего "ковыряния" отказался

amel27
Вопрос снимается (временно?) С основными функциями разобрался, есть конечно пара проблемных параметров, попробую разобраться сам, если не получиться придётся тебя побеспокоить

[chumova9I]

привет!
учусь работать с autoit.
возник вопрос.
вот код:
Run("C:\WINDOWS\system32\cmd.exe /k chcp 866 && set PGPORT=5432")
WinActivate("C:\WINDOWS\system32\cmd.exe")
Send("pg_dumpall -U postgres -f atest2.dump")
Send("{ENTER}")
Send("irishka")
Send("{ENTER}")
Send("psql -U postgres < atest2.dunp")
Send("{ENTER}")

после запуска получаю ошибку, обьясните что не правильно и как решить проблему!
вот ошибка :
Текущая кодовая страница: 866

C:\Program Files\PostgreSQL\8.2\bin>_dumpall -U postgres -f atest2.dump
"_dumpall" не является внутренней или внешней
командой, исполняемой программой или пакетным файлом.

C:\Program Files\PostgreSQL\8.2\bin>irishka
"irishka" не является внутренней или внешней
командой, исполняемой программой или пакетным файлом.

C:\Program Files\PostgreSQL\8.2\bin>psql -U postgres < atest2.dunp
Не удается найти указанный файл.

C:\Program Files\PostgreSQL\8.2\bin>

заранее спасибо!

[chumova9I]

все разобралась, это был глюк!

C:\Program Files\PostgreSQL\8.2\bin>_dumpall -U postgres -f atest2.dump
"_dumpall" не является внутренней или внешней
командой, исполняемой программой или пакетным файлом

простоне отображал первые два символа, поставила парочку пробелов и все пашет!!!

[AlexNeo]

Кок создат форму с двумя кнопками а на кнопках функции запуска установки, например (Setup.exe).

[Creat0R]

AlexNeo,

создат форму с двумя кнопками а на кнопках функции запуска установки, например (Setup.exe). »

Пример:

Код:

#include <GuiConstantsEx.au3>

$GUI = GUICreate("Setup Demo", 300, 200)

$MyApp_Button = GUICtrlCreateButton("My App", 20, 40, 60, 20)
$OtherApp_Button = GUICtrlCreateButton("Other App", 20, 70, 60, 20)

GUISetState(@SW_SHOW, $GUI)

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $MyApp_Button
            Run("MySetup.exe")
        Case $OtherApp_Button
            Run("OtherSetup.exe")
    EndSwitch
WEnd

[SvetlanaK]

Здравствуйте! а не подскажет ли кто, как обратиться к фтп и считать с него файлы для последующей записи на другой сервер?
$oIE = _IECreate ()
_IENavigate ($oIE, "ftp://ё.ёёё.ёё.ёё") -это в принципе иногда срабатывает, но меня интересует что-то вроде UDF, как ExcelCOM_UDF.au3, чтобы можно было папку с файлами на фтп обработать как объект, определить имена файлов, даты и т.д, списком. Нарыла FTP.au3 - не то по-моему( он только несколько команд выполняет - удалить, апгрейдить и сконнектить( Перерыла архивы форума тоже к сожалению ничего не нашла( Буду благодарна за любой совет.

[AlexNeo]

Creat0R, Спасибо.