Asp classic 如何将文件夹转换为zip。asp经典中的文件

Asp classic 如何将文件夹转换为zip。asp经典中的文件,asp-classic,vbscript,Asp Classic,Vbscript,任何人都可以帮助我在如何转换文件夹到经典的asp压缩文件 <% Dim objZip Response.write("new") Set objZip = Server.CreateObject("Scripting.FileSystemObject") Response.write("yahoo") objZip.Pack "C:\inetpub\wwwroot\NewZIp\Images\SMM.JPEG", "C:\inetpub\wwwroot\NewZIp\Images

任何人都可以帮助我在如何转换文件夹到经典的asp压缩文件

<% 
Dim objZip 
Response.write("new") 
Set objZip = Server.CreateObject("Scripting.FileSystemObject") 
Response.write("yahoo") 
objZip.Pack "C:\inetpub\wwwroot\NewZIp\Images\SMM.JPEG", "C:\inetpub\wwwroot\NewZIp\Images.zip" 
objZip.Pack "C:\inetpub\wwwroot\NewZIp\Images\IMS.JPEG", "C:\inetpub\wwwroot\NewZIp\Images.zip" 
Set objZip = Nothing 
%> 


我正在使用这一代码将文件夹转换为zip文件,这可以在asp.net中使用C#轻松完成。下面的代码将帮助您压缩文件夹

using System;
using System.IO;
using System.IO.Packaging;

namespace ZipSample
{
    class Program
    {
        static void Main(string[] args)
        {
            AddFileToZip("Output.zip", @"C:\Windows\ABC.exe");
            AddFileToZip("Output.zip", @"C:\Windows\System32\DEF.exe");
        }

        private const long BUFFER_SIZE = 4096;

        private static void AddFileToZip(string zipFilename, string fileToAdd)
        {
            using (Package zip = System.IO.Packaging.Package.Open(zipFilename, FileMode.OpenOrCreate))
            {
                string destFilename = ".\\" + Path.GetFileName(fileToAdd);
                Uri uri = PackUriHelper.CreatePartUri(new Uri(destFilename, UriKind.Relative));
                if (zip.PartExists(uri))
                {
                    zip.DeletePart(uri);
                }
                PackagePart part = zip.CreatePart(uri, "",CompressionOption.Normal);
                using (FileStream fileStream = new FileStream(fileToAdd, FileMode.Open, FileAccess.Read))
                {
                    using (Stream dest = part.GetStream())
                    {
                        CopyStream(fileStream, dest);
                    }
                }
            }
        }

        private static void CopyStream(System.IO.FileStream inputStream, System.IO.Stream outputStream)
        {
            long bufferSize = inputStream.Length < BUFFER_SIZE ? inputStream.Length : BUFFER_SIZE;
            byte[] buffer = new byte[bufferSize];
            int bytesRead = 0;
            long bytesWritten = 0;
            while ((bytesRead = inputStream.Read(buffer, 0, buffer.Length)) != 0)
            {
                outputStream.Write(buffer, 0, bytesRead);
                bytesWritten += bufferSize;
            }
        }
    }
}
使用系统;
使用System.IO;
使用System.IO.Packaging;
名称空间ZipSample
{
班级计划
{
静态void Main(字符串[]参数)
{
AddFileToZip(“Output.zip,@“C:\Windows\ABC.exe”);
AddFileToZip(“Output.zip”,@“C:\Windows\System32\DEF.exe”);
}
private const long BUFFER_SIZE=4096;
私有静态void AddFileToZip(字符串zipFilename,字符串fileToAdd)
{
使用(Package zip=System.IO.Packaging.Package.Open(zipFilename、FileMode.OpenOrCreate))
{
字符串destFilename=“.\\”+Path.GetFileName(fileToAdd);
uriuri=PackUriHelper.CreatePartUri(新Uri(destFilename,UriKind.Relative));
if(zip.PartExists(uri))
{
DeletePart(uri);
}
PackagePart=zip.CreatePart(uri,“,CompressionOption.Normal);
使用(FileStream FileStream=newfilestream(fileToAdd,FileMode.Open,FileAccess.Read))
{
使用(Stream dest=part.GetStream())
{
CopyStream(文件流、目的地);
}
}
}
}
私有静态void CopyStream(System.IO.FileStream inputStream、System.IO.Stream outputStream)
{
long bufferSize=inputStream.Length
您尝试了什么?快速的谷歌搜索让我看到了一个工作示例:嗨,我正在使用这一代码将文件夹转换为Zipt请求是针对经典ASP而不是.Net的