Ver Mensaje Individual
  #1 (permalink)  
Antiguo 10/11/2010, 02:38
Avatar de ildelian
ildelian
 
Fecha de Ingreso: noviembre-2010
Ubicación: España
Mensajes: 16
Antigüedad: 13 años, 5 meses
Puntos: 0
Pregunta Comprimir con ASP. Ayuda

Buenas.

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
  1. NombreFichero="ANX_" & Secuenciador & "." & file.FileExt
  2. file.SaveAs(Ruta & NombreFichero)
  3.  
  4. 'Comprimimos el anexo antes de enviarlo y le damos el cambiazo
  5. Set AGZIP = Server.CreateObject("XStandard.Zip")
  6. AGZIP.Pack Ruta & NombreFichero,NombreFichero & ".zip"
  7. NombreFichero = NombreFichero & ".zip"
  8. Set AGZIP = Nothing
  9. 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?