FSO y archivos .zip

[pcarvajal]

Con FSO genero un archivo de texto.. todo bien
pero me preguntaba si puedo transformarlo en un archivo .zip utilizando FSO??

(la idea es que genero un archivo txt para que el usuario lo descarge, pero si pincha el enlace lo abrirá, en cambio si es un zip no ocurrira eso)

[u_goldman]

mmmhhhh...mas bien tendrías que hacer uso de un componente, busca en www.hotscripts.com me parece que allí debieras encontrar alguno, y creo que hay uno llamado ASPtoZip, aunque no estoy muy seguro.

Salu2,

[orharo2003]

Tal y como te dicen es cierto, no podrás hacer archivos comprimidos solo cambiando la extensión, necesitas un componente que te permita dar esta funcionalidad

[AlZuwaga]

Además, tené en cuenta que con FSO sólo vas a poder hacer archivos de texto.. ni zip's, ni doc's ni pdf's ni ná que no sea un archivo de texto, con la extensión que se te ocurra, pero archivos de texto plano al fin y al cabo

[pcarvajal]

a pesar de ser solo de texto, al cambiarle la extension txt a doc o xls se crean ese tipo de archivos. Office 2000 los reconoce altiro y los abre. Con la extension pdf he hecho lo mismo.. y funca...

[AlZuwaga]

si, pero que los reconozca y los abra no quiere decir que sea un archivo de word/excel correctamente formado

[pcarvajal]

ah! bueno, si po si ;)

[buliwyf]

... Y la luz se hizo!!!
no es necesario convertirlo a nada si lo que quieres es descargarlo....

Código:

<%
Set objtxt = Server.CreateObject("ADODB.Stream")
objtxt.Open
objtxt.Type = adTypeBinary
objtxt.LoadFromFile Server.MapPath("archivo.txt")
ContentType = "application/octet-stream"
Response.AddHeader "Content-Disposition", "attachment; filename=archivo.txt"
Response.Charset = "UTF-8"
Response.ContentType = ContentType
Response.BinaryWrite objtxt.Read
Response.Flush
objtxt.Close
Set objtxt = Nothing
%>

cuentanos como te fue

[pcarvajal]

sabes, me tira un error en la linea del ServerMapPath.
Le indique la ruta fisica y nada
Le indique la ruta http://localhost/blablabla y nada
Me asegure de tener un archivo llamado archivo.txt y tampoco
Asi que no entiendo que pasa

[u_goldman]

QUé error te envía?

[pcarvajal]

Tipo de error:
ADODB.Stream (0x800A0BB9)
Argumentos incorrectos, fuera del intervalo permitido o en conflicto con otros.
123.asp, line 4

:S

[u_goldman]

Para mi que este es un error en la constante

objtxt.Type = adTypeBinary

trata reemplazando esta constante por un 1

objtxt.Type = 1

A ver si así si se deja

Salu2,

[pcarvajal]

jaja, buena u_goldman!!
se entregó como una cualquiera!!!

[u_goldman]

Ser el 1 no es lo mas importante...es lo ÚNICO