none
.rar datei entpacken!!! RRS feed

  • Frage

  • Hallo erstmal an alle die reinschauen, so ich bin ja wie schon berichtet noch ein ziemlich neuer fuchs bei VB und ich schreibe gerade so zum spass ein paar sachen zum herumexperementieren hald ( da mich das programieren ziemlich fasziniert ) und ich wollte mal fragen ob es eine möglichkeit gibt eine .rar datei zu extrahieren ich habe folgendes:

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    My.Computer.FileSystem.CreateDirectory("K:\test")
    My.Computer.FileSystem.CopyFile("D:\testdatei.rar", "K:\test\testdatei.rar")

    und würde jetzt noch etwas brauchen das diese testdatei.rar in dem test ordner entpackt!?!?!

    halso gibt es da irgendeine lösung, und villeicht auch nen code der mir den vorgang in ner progressbar anzeigt das archiev hat 2GB und das dauert ja paar sekunden bis das entpackt ist!!

    ich danke euch allen schon mal im vorraus hoffe jemand von euch PROFIS kann mir anfänger helfen!!


    THX NEO
    Mittwoch, 26. August 2009 21:36

Antworten

Alle Antworten

  • unrar.exe kann man als Batch laufen lassen. Das solltest du mit Process.Start ausführen.

    --
    Peter
    Donnerstag, 27. August 2009 09:31
  • Hallo Neo_Matrix,

    Hat Dir die Antwort geholfen?

    Grüße,
    Robert

    Dienstag, 22. September 2009 08:07
  • Hoi Robert,

    mich würde der umgekehrte Weg interessieren, also einen Verzeichnisbaum komplett mit Unterverzeichnissen und -pfadangaben in eine RAR oder ZIP-Datei schreiben.
    Diese will ich dann auf eine CD brennen (sieht Thread bzgl. XPBurn-Komponente) - dort scheint es ja nur möglich zu sein, EINE Datei zu brennen.

    Wenn ich also mein Verzeichnis in ein Archiv packen kann liesse sich dieses dann auch auf eine CD schmurgeln ;-)

    Doei
    Franz
    • Bearbeitet Trixi-N Dienstag, 22. September 2009 10:45 Edit
    Dienstag, 22. September 2009 10:45
  • Hallo Franz,

    Mit Hilfe des Hinweises von Peter habe ich zum Beispiel den ganzen Ordner C:\Temp zu C:\Temp\MyFolder.rar archieviert mit Hilfe der Rar.exe Anwendung die zusammen mit WinRar kommt. Es wird per Befehlszeile ausgeführt und verwendet Process.Start.

     

     

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    
            Dim exeFolder As String = "C:\Program Files\WinRAR"
            Dim exePath As String = String.Format("{0}\{1}", exeFolder, "Rar.exe")
            Dim sdp As New System.Diagnostics.ProcessStartInfo()
    
            sdp.Arguments = " a " & " C:\Temp\MyFolder.rar " & "C:\Temp"
    
            sdp.CreateNoWindow = False
    
            sdp.FileName = exePath
    
            sdp.WindowStyle = System.Diagnostics.ProcessWindowStyle.Hidden
    
            Dim process As System.Diagnostics.Process = System.Diagnostics.Process.Start(sdp)
    
            process.WaitForExit()
    
    End Sub


    Grüße,

    Robert

    • Als Antwort vorgeschlagen Okeanos_85 Donnerstag, 24. September 2009 06:24
    Dienstag, 22. September 2009 11:39
  • mich würde mal interessieren ob dazu jemand eine DLL gefunden hat, denn mit der könnte man das ganze auch ohne das kompl. RAR Programm realisieren.

    Weiss jemand ob das geht, oder es so etwas gibt?

    MfG

    Okeanos
    Mittwoch, 23. September 2009 07:59
  • Hallo Okeanos,

    Es gibt eine freie C# ZLib-Implementierung geschrieben von Mike Krueger die den Namen SharpZipLib.dll hat die man in den Bin Ordner des Projektes addieren muss.

    http://www.icsharpcode.net/OpenSource/SharpZipLib

    Grüße,

    Robert

    Mittwoch, 23. September 2009 08:19
  • Hy, danke erstmal für die rasche antwort, ich habe im momment lider viel um die ohren so dass ich leider keine zeit hatte es auszuprobieren sobald ich wieder paar tage ruhe vom job habe werde ich meine antwort posten vielen dank noch mal neo
    Mittwoch, 23. September 2009 08:34
  • Im Framework gibt es ab FW 3.0 im System.IO.Packaging-Namensraum Klassen zum Bearbeiten von Archivdateien (zip).

    --
    Peter
    Mittwoch, 23. September 2009 09:16
  • Danke für die Antworten, das hat mir sehr weitergeholfen.

    MfG

    Okeanos
    Mittwoch, 23. September 2009 09:41