冰楓論壇

 找回密碼
 立即註冊
搜索
查看: 1246|回覆: 0
打印 上一主題 下一主題

[求助] [出包中求助]sharpziplib空目錄解壓縮問題

[複製鏈接]

17

主題

1

好友

20

積分

新手上路

Rank: 1

UID
3587
帖子
185
主題
17
精華
0
積分
20
楓幣
799
威望
16
存款
722
贊助金額
0
推廣
0
GP
17
閱讀權限
10
性別
保密
在線時間
81 小時
註冊時間
2012-1-30
最後登入
2022-3-2

2015年紀念勳章 太陽勳章 神手勳章 私服達人 音樂勳章 懶人勳章 性別(男) instagram紀念勳章 2015中秋節紀念勳章 2018年紀念勳章

跳轉到指定樓層
1
發表於 2019-5-23 15:47:23 |只看該作者 |倒序瀏覽
本帖最後由 kevin001958 於 2019-5-23 23:08 編輯

如提,如果我的test.zip檔案內有1,2這兩個資料夾還有test3.txt3個檔案
1內有test1.txt,2為空資料夾
然後我解壓縮要怎麼解壓縮出1內含有test1,2(空資料夾)跟test3檔案
messageImage_1558597113354.jpg
1有test1 2為空目錄
解壓出來變成
QQ截图20190523154341.png
要怎麼作才能變成目的資料夾內含有1跟2資料夾
test1.txt在資料夾1內
test3.txt在目的資料夾內
class1.vb:
Imports System
Imports System.Collections.Generic
Imports System.Linq
Imports System.Text
Imports System.Threading.Tasks
Imports ICSharpCode.SharpZipLib.Zip
Imports ICSharpCode.SharpZipLib
Imports ICSharpCode.SharpZipLib.Core

Class Class1
    Public Shared Sub ZipUnpack(ByVal zipFileName As String, ByVal targetDir As String)
        Dim fastZip As FastZip = New FastZip()
        Dim fileFilter As String = Nothing
        fastZip.ExtractZip(zipFileName, targetDir, fileFilter)
    End Sub
End Class


事件觸發調用:

Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        Class1.ZipUnpack("test.zip", "test")
    End Sub

收藏收藏0 推0 噓0


把本文推薦給朋友或其他網站上,每次被點擊增加您在本站積分: 1鑰匙
複製連結並發給好友,以賺取推廣點數
簡單兩步驟,註冊、分享網址,即可獲得獎勵! 一起推廣文章換商品、賺$$
高級模式
B Color Image Link Quote Code Smilies |上傳

廣告刊登意見回饋關於我們管群招募本站規範DMCA隱私權政策

Copyright © 2011-2024 冰楓論壇, All rights reserved

免責聲明:本網站是以即時上載留言的方式運作,本站對所有留言的真實性、完整性及立場等,不負任何法律責任。

而一切留言之言論只代表留言者個人意見,並非本網站之立場,用戶不應信賴內容,並應自行判斷內容之真實性。

小黑屋|手機版|冰楓論壇

GMT+8, 2024-12-12 03:40

回頂部