Tengo un problema con ASP, tengo que comprimir los ficheros que mis clientes anexan a los pedidos. Para ello hago uso de la librería "XZip.dll" mediante un "Component Service" en Windows Server 2003 64Bits.
Luego, en el ASP creo lo siguiente:
Código asp:
Ver original
NombreFichero="ANX_" & Secuenciador & "." & file.FileExt file.SaveAs(Ruta & NombreFichero) 'Comprimimos el anexo antes de enviarlo y le damos el cambiazo Set AGZIP = Server.CreateObject("XStandard.Zip") AGZIP.Pack Ruta & NombreFichero,NombreFichero & ".zip" NombreFichero = NombreFichero & ".zip" Set AGZIP = Nothing CALL FTP.Enviar_Fichero ("/usuarios/" & Creador & "/" & NombreFichero, Ruta & NombreFichero)
Pues bien, mi problema es que, apesar de no da ningun tipo de error, no me comprime el fichero, y por FTP me sube el fichero sin comprimir cuando deberia dar error por que no existe el "NombreFichero & ".zip""
¿Alguien puede ayudarme por favor?