(ja, ich weiß, dass das hier schon mein vierter thread in folge ist
ich versuche gerade, eine .zip-datei aus dem internet (dropbox) zu laden, diese in einem ordner zwischenzuspeichern und diese dann zu entpacken.
dabei hab ich diesen code:
'link zur datei wird definiert'
Dim datei1 As String = "https://www.dropbox.com/s/did9d41ctxw1q05/datei1.zip"
'zwischenordner wird erstellt'
Dim pSkinDir As String = mAppData & "\downloaded_skins"
MkDir(pSkinDir)
'angegebene datei wird in den erstellten ordner geladen'
My.Computer.Network.DownloadFile(sCB, pSkinDir & "\datei1.zip")
'zip datei wird gelesen und entpackt'
'dafür benutze ich dotnetzip'
Using archiv1 As ZipFile = ZipFile.Read(pSkinDir & "\datei1.zip")
Dim zEntry As ZipEntry
For Each zEntry In archiv1
zEntry.Extract(mSkinDir, ExtractExistingFileAction.OverwriteSilently)
Next
End Using
aber wenn ich dass ausführe, wird das archiv nicht entpackt.
Dieser Beitrag wurde von ::YC Tech:: bearbeitet: 01. Februar 2013 - 21:37

Hilfe
Neues Thema
Antworten

Nach oben


