Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Zippen
Autor: luet
Datum: 13.02.02 19:51
Hi, hab Probleme mit PKZip. Ich möchte den Zielort der Zip-File gezielt bestimmen können, aber PKZip erstellt die ZippFile immer in das Aktuelle Verzeichniss ( chdir ). Wie kann ich den Zielort bestimmen. Hier mein Source : Public Sub ZipFiles() Dim ………….. ZIPPath = App.Path & "PKZIP.EXE" ZipFileName = ZipName + ".zip " ZipFilePath = Dir1.Path OldDir = CurDir() ChDrive Left$(Zip_File_Path, 2) ChDir ZipFilePath Task = Shell(ZIPPath & " -add -dir=relative " & ZipFileName, vbHide) hProcess = OpenProcess(SYNCHRONIZE, False, Task) Result = WaitForSingleObject(hProcess, INFINITE) Result = CloseHandle(hProcess) ChDrive Left$(OldDir, 2) ChDir OldDir End Sub Danke für jeden Tipp luet

Zippen	90	luet	13.02.02 19:51
Hat keiner eine Ahnung ?	61	luet	14.02.02 17:33
Re: Hat keiner eine Ahnung ?	354	Dieter	14.02.02 17:40
Danke Dieter	44	luet	15.02.02 19:44

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen