vb.net 폴더삭제오류
봄나
2023.04.01
Private Function Unzip() Me.진행상태.Text = Status : & Extracting Files... Dim zipPath As String = Debug.DownloadDir.Text Try Dim sc As New Shell32.Shell() Dim output As Shell32.Folder = sc.NameSpace(Debug.PatchDir.Text) Dim input As Shell32.Folder = sc.NameSpace(zipPath) RmDir(Debug.DeleteFolderDir.Text) output.CopyHere(input.Items, 4) IO.File.Delete(zipPath) Me.진행상태.Text = Status : & Extracting Success... Catch ex As Exception Me.진행상태.Text = Status : Extracting Failed IO.File.Delete(zipPath) End Try End Function
이렇게 코드를 짜줬는데 RimDIr 이 먹지않습니다.자꾸 Failed 로 넘어가 버리네요 ㅠㅠ 도와주세요.