Hows it going everyone. Right now I am working on a project with VS2008 that parses directory and subdirectories and lists all filenames/paths/size/etc. This is working correctly, but I also need to parse the contents of zip files without actually unzipping them. What would be the easiest method to return the information on the files in a zip file? (Filename, Size, etc). Heres the code that I currently have to parse directories and subdirectories.
Sub Parse(ByVal ThisFolder As String) FSO = New Scripting.FileSystemObject Dim soFolder As Folder Dim soFile As File Dim soFolders As Folders soFolder = FSO.GetFolder(ThisFolder) ' Files in this directory For Each soFile In soFolder.Files ' TestdbDataSet.Table1.Rows.Add(CStr(ThisFolder), CStr(soFile.Name), CStr(soFile.Type), CStr(soFile.Size)) Table1TableAdapter.Insert(CStr(ThisFolder), CStr(soFile.Name), CStr(soFile.Type), CStr(soFile.Size)) Next soFile ' Recurse Subdirectories soFolders = soFolder.SubFolders ' parses subfolders For Each soFolder In soFolders Parse(soFolder.Path) Next soFolder soFolders = Nothing soFolder = Nothing soFile = Nothing End Sub