解压指定的文件。语法：
Extract(FileName)
Extract(FileName, NewFileName)
FileName: 要解压的文件
NewFileName： 可选参数，指定新的文件名，必须包括路径
如果不指定NewFileName参数，则解压到压缩文件所在目录。
示例：
Dim zip As New zipFile
zip.Open("c:\data\backup.zip")
zip.Extract("Foxtable.exe")
zip.Extract("Images/Chart.ico")
zip.Extract("Images/Bold.ico", "c:\data\Images\Bold.ico")
zip.Close()
上面代码，将foxtable.exe和chart.ico两个文件解压到压缩文件所在的目录c:\data，尽管在压缩文件中,Chart.Ico位于子目录Images之下，而Bold.ico将解压到c:\data\Images目录下。
提示：
1、压缩文件内部的目录分割符号为"/"，而不是"\"。
2、如果要解压到指定的目录，必须先创建此目录，例如上例中的c:\data\Images。
解压指定文件,然后读取,再把文件删除即可.
加好友 
发短信
Post By：2013/9/30 16:23:00 [显示全部帖子]
