Rar Archiv erstellen

[X360 Andy]

Mal wieder eine frage von mir

Gibt es eine Lib , DLL ,Inculde oder einen Code der ein Rar Archiv erstellen kann ?
Also z.b sowas wie die PureZIP library.

Ich hab gestern ewig gesucht, im Deutschen Forum im Englishen im Code Archiv und sonst wo überall.

Dabei habe ich eine menge über die Unrar.dll gefunden auch passendes im Codearchiv allerdings kann ich ja mit dieser nur Rar´s Entpacken und nich Packen.

Auch kann ich mit der "rar.exe" nichts anfangen da ich immer eine Fehlermeldung bekomme wenn ich diese über PB starte.
(Meinen Code hab ich leider nicht mehr )
Und außerdem ist das auch nicht umbedingt schön auf ein externes Programm zu warten bis dieses ein Rar Archiv erstellt hat.

Falls es also eine (vorhande) möglichkeit gibt wie ich ein Rar Archiv erstellen kann würde ich mich einen Link / Code / DLL freuen.

[kswb73]

Mh, laut diesem Wikipedia Artikels (unter Verbreitung) sind zwar die Entpackroutinen quelloffen und dokumentiert, jedoch nicht die Packroutinen. Das heißt, du kannst höchsten inoffizielle Codes oder Dokumentationen suchen.

[X360 Andy]

Das wird warscheinlich heißen das es keine vorhande Lösung gibt.

Schade, aber kann mir jemand sagen wieeso das nicht geht ?

Code: Alles auswählen

RunProgram("C:\Program Files\WinRAR\rar.exe", "a C:\Users\Andreas\Desktop\test.rar C:\Users\Andreas\Desktop\screen.bmp", "")

Ich starte die Console Version von Rar.exe mit dem Paramerter ( a = add file ) und den beiden Pfaden, allerdings sagt er das die Datei nicht erstellt worden ist.

[cxAlex]

Soweit ich weis gibt es ein (inoffizielles ?) Plugin für 7-zip im DLL - Format um RAR-Dateien zu erstellen. Vlt. kannst du das benützen?

Gruß, Alex

[X360 Andy]

Nein leider nicht, hab das 7Zip eben runtergeladen und geschaut ob es dieses Format unterstützt, es kann es nur Entpacken.

Trotzdem danke

[tobe]

Code: Alles auswählen

RunProgram("c:\Programme\WinRAR\rar.exe", "a c:\Programme\WinRAR\test.rar c:\Programme\WinRAR\rar.exe", "")

hat bei mir erfolgreich eine test.rar datei erstellt

[X360 Andy]

Komisch auf dem Desktop kommt eine Fehlermeldung, aber das so erstelle Rar Archiv ist komisch , es ist der gesamte Programm Pfad drin ?

[tobe]

jo bei mir is auch der ganze pfad drin, so ist es nur die rar.exe:

Code: Alles auswählen

RunProgram("c:\Programme\WinRAR\rar.exe", "a c:\Programme\WinRAR\test.rar rar.exe", "c:\Programme\WinRAR\")

mfG
tobe

[ts-soft]

Am besten SetCurrentDirectory setzen!
Und noch besser, vorher eine filelist ( UTF-8 ) temporär erstellen und mit
@ davor übergeben. RTFM

Und die Tüdelchen nicht vergessen

[X360 Andy]

Code: Alles auswählen

  File$ = SaveFileRequester("Bitte Datei zum Speichern auswählen", "", "Alle Dateien (*.*)|*.*", 0)
  Rar_Pfad$ = Left(File$,Len(File$)-Len(GetExtensionPart(File$))) + "rar"
  RunProgram("c:\Programme\WinRAR\rar.exe", "a " + Rar_Pfad$ + " " + GetFilePart(File$), GetPathPart(File$),#PB_Program_Hide|#PB_Program_Wait)

So hab mal eben mit eurer Hilfe den Code erzeugt.

Vieleicht kann jemand der das gleiche Problem wie ich (hatte) damit was anfangen.

EDIT
In der Console wird die % angezeigt wie weit es fertig ist.
Könnte man das nicht rauslesen aus der Console ?