자료실

부자는 돈을 써서 시간을 아끼지만 가난한 사람은 시간을 써서 돈을 아낀다

vb.net

IT HUB를 찾아주셔서 감사합니다.

기타 [vb.net] 집(zip)파일 압축풀기/압축하기

페이지 정보

profile_image
작성자 하나를하더라도최선을
댓글 0건 조회 11,692회 작성일 20-05-06 20:01

본문

참조(System.IO.Compression.FileSystem.dll)를 추가 해주세요

        Dim MyDocuments As String = My.Computer.FileSystem.SpecialDirectories.MyDocuments & "\"
        Dim startPath As String = "." & Application.StartupPath.Substring(2)
        Dim zipPath As String = ".\result.zip"
        Dim extractPath As String = String.Concat(MyDocuments, Application.ProductName, "\User Data")
        'ZipFile.CreateFromDirectory(startPath, zipPath)    '// 압축하기
        Try
            ZipFile.ExtractToDirectory(zipPath, extractPath)    '// 압축풀기
        Catch ex As Exception
        End Try

댓글목록

등록된 댓글이 없습니다.