ARJ32 ist ein Zip-Program auf DOS Basis. Dieses kann man nutzen um *.arj zu erzuegen, bzw diese zu entpacken.
Ueber cmd kann man dies ohne Probleme machen.
Jedoch ist mir dies in Access mit Hilfe von VBA nicht moeglich gewesen.
Das benutzten einer seperaten Datei (Batch) ist leider kein Thema.
Wuerde mich freuen, wenn mir dabei jemand helfen kann.
ARJ32 ist ein Zip-Program auf DOS Basis. Dieses kann man
nutzen um *.arj zu erzuegen, bzw diese zu entpacken.
Ueber cmd kann man dies ohne Probleme machen.
Jedoch ist mir dies in Access mit Hilfe von VBA nicht moeglich
gewesen.
Das benutzten einer seperaten Datei (Batch) ist leider kein
Thema.
Hi Andy,
warum geht keine Batchdatei?
Gibts in Access-Vba auch den Shell Befehl?
Gruß
Reinhard
Danke Reinhard,
Gibts in Access-Vba auch den Shell Befehl?
Ich habe mich mit dem Befehl Shell noch mal ausgiebig befasst und habe es endlich hinbekommen.
entpacken = Shell („Pfad der ARJ32.EXE“ & " e -y " & „Pfad von ARJ-Archiv“ & " " & „Zielpfad“, Modus)
Das „e“ steht für entpacken, das „-y“ dafür, dass alle Meldungen/Fragen mit Ja beantwortet werden.
–>
Dim extract
Dim strArjPath As String
Dim strInputPath As String
Dim strOutputPath As String
strArjPath = „D:\users\qsfufgb583\Andy-Test\ARJ-Verteiler\arj.exe“
strInputPath = „D:\users\qsfufgb583\Andy-Test\ARJ-Verteiler\in*.arj“
strOutputPath = „D:\users\qsfufgb583\Andy-Test\ARJ-Verteiler\out“
extract = Shell(strArjPath & " e -y " & strInputPath & " " & strOutputPath, vbNormalFocus)