Salve a tutti ho la necessità di creare nella cartella public del server un file zip.
Sotto la cartella public ho un'altra cartella ricevute la quale contiene vari file pdf, quello che vorrei fare è creare lo zip della cartella ricevute (es. ricevute.zip), dove al suo interno ci sono tutti i file pdf contenuti nella cartella originale ricevute. Premetto che nella cartella public ho tutti i permessi, infatti riesco a creare il file ricevute.zip, ma al suo interno non ci trovo niente.
Vi posto il codice così da farvi capire e magari segnalarmi dove sbaglio.
P.S Non voglio installare sul server niente di terze parti.
codice:
<%@LANGUAGE="VBSCRIPT"%>
<%' Controllo se l'utente si è logato
If Session("status") <> "login" Then
response.redirect "software.asp"


Response.expires = 0
Response.expiresabsolute = Now() - 1
Response.addHeader "pragma", "no-cache"
Response.addHeader "cache-control", "private"
Response.CacheControl = "no-cache"
End If
%>
<!--#include file="aspZip.class.asp" -->
<HTML>
<HEAD>
<TITLE></TITLE>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</HEAD>
<BODY>
<%
strPath = server.mappath("/public/Ricevute/")
filepath = "/public/Ricevute/Ricevute.zip"
Set objFso = Server.CreateObject("Scripting.FileSystemObject")
Set folderfs=objFso.getfolder(strPath)
set zip = new aspZip
zip.OpenArquieve(filepath)	
for each f in folderfs.Files 
zip.Add(f)
next
zip.CloseArquieve()
set zip = nothing
%>	
<a href="<%=filepath%>">OK Scarica il file</a>
</BODY>
</HTML>