![]() ![]() ZipFile. Net 4.5 you can use the ZipFile Classĭim startPath As String = "c:\example\start"ĭim zipPath As String = "c:\example\result.zip"ĭim extractPath As String = "c:\example\extract" 'Extract the files from the zip file using the CopyHere command. Como vemos para el ejemplo se comprime todo lo que podamos ver en la parte izquierda. 'Declare the folder where the files will be extractedĭim output As Shell32.Folder = sc.NameSpace("D:\extractedFiles")ĭim input As Shell32.Folder = sc.NameSpace("d:\myzip.zip") IO.Directory.CreateDirectory ('D:extractedFiles') Declare the folder where the files will be extracted Dim output As Shell32.Folder sc.NameSpace ('D:extractedFiles') Declare your input zip file as folder. IO.Directory.CreateDirectory("D:\extractedFiles") From above article: Sub UnZip () Dim sc As New Shell32.Shell () Create directory in which you will unzip your files. 'Create directory in which you will unzip your files. If you are having specific problems you need to put the code and problem discription in your question. 0 Comments Darber hinaus haben einige verbundene Produkte (wie Tumblr) mglicherweise andere Datenschutzrichtlinien und. To be able to install this pack you have to MDAC (Microsoft Data Access Components) 2.5 or a later version installed. Requirements and additional information: Its necessary to have Visual Basic 6.0 installed. If you take a look at this CodeProject article it should help you. Download Visual Basic 6 SP6 for free and youll have the latest updates available for Visual Basic 6.
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |