在ASP中如何解压缩文件？

[amyaming]

[stanely]

thanks!

[zuxian]

稍等，现在组件不再这儿，晚上发给你

[luoxxhh]

给我一个可以吗？
[e-mail]
谢谢谢谢！

[lifanxi]

我也想要，能给我一个吗？谢谢
[e-mail]

[Pasp]

还有我[e-mail]

[asp9553]

还有我[e-mail]

[xunge]

me too:
[e-mail]

[winnn]

[e-mail]
我也要一个

[zuxian]

以上我都把组件发过去了，因为组件还不完善，还有待改进。
组件是用java写的，我也是参考java版上一篇文章，
由于再解子目录时好想有问题，所以希望大家提出修改意见

import com.asp.dll.*;
import java.io.*;
import java.util.*;
import java.util.zip.*;

public class Class1
{public void unzip(String unzipfile)
{
try {
File olddirec = new File(unzipfile);//解压缩的文件路径(为了获取路径)
ZipInputStream zin = new ZipInputStream(
new FileInputStream(unzipfile));
ZipEntry entry;

//创建文件夹
while((entry = zin.getNextEntry()) != null)
if(entry.isDirectory())
{File directory = new File(olddirec.getParent(),entry.getName());
//System.out.println("Make directory " +directory.getParent()+"/"+entry.getName());
if(!directory.exists())
if(!directory.mkdirs())
System.exit(0);
zin.closeEntry();
}
zin.close();
//System.out.println("directory creat successful!");

zin = new ZipInputStream(new FileInputStream(unzipfile));

//解压缩文件
while(((entry = zin.getNextEntry()) != null)&&!entry.isDirectory())
{
FileOutputStream fout = new FileOutputStream(olddirec.getParent()+"/"+entry.getName());
DataOutputStream dout = new DataOutputStream(fout);

//System.out.println( "Writing file " + entry.getName());
byte [] b = new byte[1024];
int len = 0;
while ( (len=zin.read(b))!= -1 ) {
dout.write(b,0,len);
}
dout.close();
fout.close();
// System.out.println("End of Writing file " + entry.getName());
zin.closeEntry();
// System.out.println("Close entry successful!");
}
zin.close();

//System.out.println("Close File successful!");
}catch(IOException e)
{e.printStackTrace();
System.out.println(e);
}
}
}

[zxwcq]

可以写COM来实现

[woodkiller]

请给我一份，谢谢
[e-mail]

[ttt2]

给我一个可以吗？
[e-mail]

[zuxian]

[e-mail] 和stanelystudio的已发
请查收
下面的稍等
(不过的我的组件还有不完善的地方,希望大家收到后提出改进意见)

[ttch007]

恩 呵呵

[win1st]

看不明白，链你的思路我都没搞清楚

[lanying]

能把com的源代码给我吗？
多谢了

[neweb]

能给我一份吗？谢谢！
[e-mail]

[lanying]

我的email:[e-mail]

[TYmir]

[e-mail]

[chinajordan]

[e-mail] 谢谢！！