Exportar a archivo tipo imagen..

20/04/2004 - 18:01 por Miramontes | Informe spam
Saludos a todos, le agradecería bastante a la persona que
me pudiera ayudar con el problema que tengo que es el
siguiente: Tengo una pagina en una intranet hecha con ASP
y Dashboard (Graficas) de MS, y pues todo esta bien hasta
que el usuario final desea exportar lo mostrado a un
archivo tipo imagen sin importar el tipo y pues no se como
hacer para que copie lo que esta en pantalla y exportarlo
a un archivo tipo imagen en el disco duro del usuario.

Agradezco su ayuda

Preguntas similare

Leer las respuestas

#6 Jhonny Vargas P.
21/04/2004 - 15:45 | Informe spam
mishhh... que buen código

Gracias

Saludos,
Jhonny Vargas P.


"Sashka" escribió en el mensaje
news:
Bueno... la única forma que sé hacerlo con cdo (no cdonts!) y dependerá


del
servidor que te hostee...

En todo caso éste es el código... la página se llama CreaMHT.asp

<% OPTION EXPLICIT
Dim iMsg, strm, iConf, Flds, strFileType

strFileType = "application/octet-stream"

Set iMsg = CreateObject("CDO.Message")
Set iConf = CreateObject("CDO.Configuration")
Set strm = Server.CreateObject("ADODB.Stream")
Set Flds = iConf.Fields
With Flds
.Item("http://schemas.microsoft.com/cdo/co...sing") = 1
.Item("http://schemas.microsoft.com/cdo/co...rver") > "localhost"




.Item("http://schemas.microsoft.com/cdo/co...ckupdirect
ory") = "C:\inetpub\mailroot\pickup" ' el que sea
.Update
End With
With iMsg
Set .Configuration = iConf
.CreateMHTMLBody "http://www.adamodiesel.com/Default.asp" ' la página que
quieras bajar, si es la misma en que estas.. pon un botón dentro de un
formulario y llama a ésta pasandole la dirección completa por querystring
(por ejemplo)
Set strm = iMsg.GetStream
End With

Response.Buffer = true
Response.Clear
Response.ContentType = "application/mht ; name=archivo.mht"
Response.Addheader "Content-Disposition", "attachment;


filename=archivo.mht"
response.Write strm.ReadText
strm.close
Set strm = Nothing
Set Flds = Nothing
Set iMsg = Nothing
Set iConf = Nothing
Response.End
%>

Sashka
MS MVP Access

"Miramontes" escribió en el mensaje
news:1b3c01c42704$4a558e90$
Si finalmente lo que presenta es html. Que es MHT?. Te
agradezco si me pudieras ayudar en decirme como guardarlo
en el disco duro del cliente..

Marco Miramontes
Desde Saltillo,México

>Pero finalmente lo que te presenta es html generado
con imagenes dentro
>de tag IMG.¿?
>Porque si es así no veo la forma de guardar la página
como imagen si lo
>que necesitas es un sólo archivo más bien pensaría en
guardarlo como MHT...
>
>Sashka
>MS MVP Access
>
>"Miramontes"
escribió en el mensaje
>news:1b3d01c426fe$30cd8320$
>En realidad el nombre verdadero es Microsoft® SQL ServerT
>Digital Dashboard, que no es mas que un web part que puede
>trabajar en linea y tu puedes desplegar graficas,
>documentos, etc...
>
>>:(... me encantaría que me expliques que es DashBoard y
>como se usa
>>Hasta hoy nio lo había escuchado (ni leido) nunca...
>>
>>Sashka
>>MS MVP Access
>>
>>"Miramontes"
>escribió en el mensaje
>>news:1b9f01c426f0$c7c0e2d0$
>>Saludos a todos, le agradecería bastante a la persona que
>>me pudiera ayudar con el problema que tengo que es el
>>siguiente: Tengo una pagina en una intranet hecha con ASP
>>y Dashboard (Graficas) de MS, y pues todo esta bien hasta
>>que el usuario final desea exportar lo mostrado a un
>>archivo tipo imagen sin importar el tipo y pues no se
como
>>hacer para que copie lo que esta en pantalla y exportarlo
>>a un archivo tipo imagen en el disco duro del usuario.
>>
>>Agradezco su ayuda
>>
>>
>>.
>>
>
>
>.
>


Respuesta Responder a este mensaje
#7 Sashka
21/04/2004 - 16:58 | Informe spam
Gracias :)))))

Sashka

"Jhonny Vargas P." escribió en el mensaje
news:%

mishhh... que buen código

Gracias

Saludos,
Jhonny Vargas P.


"Sashka" escribió en el mensaje
news:
> Bueno... la única forma que sé hacerlo con cdo (no cdonts!) y dependerá
del
> servidor que te hostee...
>
> En todo caso éste es el código... la página se llama CreaMHT.asp
>
> <% OPTION EXPLICIT
> Dim iMsg, strm, iConf, Flds, strFileType
>
> strFileType = "application/octet-stream"
>
> Set iMsg = CreateObject("CDO.Message")
> Set iConf = CreateObject("CDO.Configuration")
> Set strm = Server.CreateObject("ADODB.Stream")
> Set Flds = iConf.Fields
> With Flds
> .Item("http://schemas.microsoft.com/cdo/co...sing") = 1
> .Item("http://schemas.microsoft.com/cdo/co...rver") > > "localhost"
>
>



.Item("http://schemas.microsoft.com/cdo/co...ckupdirect
> ory") = "C:\inetpub\mailroot\pickup" ' el que sea
> .Update
> End With
> With iMsg
> Set .Configuration = iConf
> .CreateMHTMLBody "http://www.adamodiesel.com/Default.asp" ' la página


que
> quieras bajar, si es la misma en que estas.. pon un botón dentro de un
> formulario y llama a ésta pasandole la dirección completa por


querystring
> (por ejemplo)
> Set strm = iMsg.GetStream
> End With
>
> Response.Buffer = true
> Response.Clear
> Response.ContentType = "application/mht ; name=archivo.mht"
> Response.Addheader "Content-Disposition", "attachment;
filename=archivo.mht"
> response.Write strm.ReadText
> strm.close
> Set strm = Nothing
> Set Flds = Nothing
> Set iMsg = Nothing
> Set iConf = Nothing
> Response.End
> %>
>
> Sashka
> MS MVP Access
>
> "Miramontes" escribió en el


mensaje
> news:1b3c01c42704$4a558e90$
> Si finalmente lo que presenta es html. Que es MHT?. Te
> agradezco si me pudieras ayudar en decirme como guardarlo
> en el disco duro del cliente..
>
> Marco Miramontes
> Desde Saltillo,México
>
> >Pero finalmente lo que te presenta es html generado
> con imagenes dentro
> >de tag IMG.¿?
> >Porque si es así no veo la forma de guardar la página
> como imagen si lo
> >que necesitas es un sólo archivo más bien pensaría en
> guardarlo como MHT...
> >
> >Sashka
> >MS MVP Access
> >
> >"Miramontes"
> escribió en el mensaje
> >news:1b3d01c426fe$30cd8320$
> >En realidad el nombre verdadero es Microsoft® SQL ServerT
> >Digital Dashboard, que no es mas que un web part que puede
> >trabajar en linea y tu puedes desplegar graficas,
> >documentos, etc...
> >
> >>:(... me encantaría que me expliques que es DashBoard y
> >como se usa
> >>Hasta hoy nio lo había escuchado (ni leido) nunca...
> >>
> >>Sashka
> >>MS MVP Access
> >>
> >>"Miramontes"
> >escribió en el mensaje
> >>news:1b9f01c426f0$c7c0e2d0$
> >>Saludos a todos, le agradecería bastante a la persona que
> >>me pudiera ayudar con el problema que tengo que es el
> >>siguiente: Tengo una pagina en una intranet hecha con ASP
> >>y Dashboard (Graficas) de MS, y pues todo esta bien hasta
> >>que el usuario final desea exportar lo mostrado a un
> >>archivo tipo imagen sin importar el tipo y pues no se
> como
> >>hacer para que copie lo que esta en pantalla y exportarlo
> >>a un archivo tipo imagen en el disco duro del usuario.
> >>
> >>Agradezco su ayuda
> >>
> >>
> >>.
> >>
> >
> >
> >.
> >
>
>


Respuesta Responder a este mensaje
#8 Miramontes
21/04/2004 - 17:19 | Informe spam
Lo estoy probando, muchas Gracias...

Bueno... la única forma que sé hacerlo con cdo (no


cdonts!) y dependerá del
servidor que te hostee...

En todo caso éste es el código... la página se llama


CreaMHT.asp

<% OPTION EXPLICIT
Dim iMsg, strm, iConf, Flds, strFileType

strFileType = "application/octet-stream"

Set iMsg = CreateObject("CDO.Message")
Set iConf = CreateObject("CDO.Configuration")
Set strm = Server.CreateObject("ADODB.Stream")
Set Flds = iConf.Fields
With Flds
.Item


("http://schemas.microsoft.com/cdo/co...sing"
) = 1
.Item


("http://schemas.microsoft.com/cdo/co...smtpserver
") >"localhost"

..Item


("http://schemas.microsoft.com/cdo/co...smtpserver
pickupdirect
ory") = "C:\inetpub\mailroot\pickup" ' el que sea
.Update
End With
With iMsg
Set .Configuration = iConf
.CreateMHTMLBody "http://www.adamodiesel.com/Default.asp"


' la página que
quieras bajar, si es la misma en que estas.. pon un botón


dentro de un
formulario y llama a ésta pasandole la dirección completa


por querystring
(por ejemplo)
Set strm = iMsg.GetStream
End With

Response.Buffer = true
Response.Clear
Response.ContentType = "application/mht ;


name=archivo.mht"
Response.Addheader "Content-Disposition", "attachment;


filename=archivo.mht"
response.Write strm.ReadText
strm.close
Set strm = Nothing
Set Flds = Nothing
Set iMsg = Nothing
Set iConf = Nothing
Response.End
%>

Sashka
MS MVP Access

"Miramontes"


escribió en el mensaje
news:1b3c01c42704$4a558e90$
Si finalmente lo que presenta es html. Que es MHT?. Te
agradezco si me pudieras ayudar en decirme como guardarlo
en el disco duro del cliente..

Marco Miramontes
Desde Saltillo,México

Pero finalmente lo que te presenta es html generado


con imagenes dentro
de tag IMG.¿?
Porque si es así no veo la forma de guardar la página


como imagen si lo
que necesitas es un sólo archivo más bien pensaría en


guardarlo como MHT...

Sashka
MS MVP Access

"Miramontes"


escribió en el mensaje
news:1b3d01c426fe$30cd8320$
En realidad el nombre verdadero es Microsoft® SQL ServerT
Digital Dashboard, que no es mas que un web part que




puede
trabajar en linea y tu puedes desplegar graficas,
documentos, etc...

:(... me encantaría que me expliques que es DashBoard y


como se usa
Hasta hoy nio lo había escuchado (ni leido) nunca...

Sashka
MS MVP Access

"Miramontes"


escribió en el mensaje
news:1b9f01c426f0$c7c0e2d0$
Saludos a todos, le agradecería bastante a la persona






que
me pudiera ayudar con el problema que tengo que es el
siguiente: Tengo una pagina en una intranet hecha con






ASP
y Dashboard (Graficas) de MS, y pues todo esta bien






hasta
que el usuario final desea exportar lo mostrado a un
archivo tipo imagen sin importar el tipo y pues no se




como
hacer para que copie lo que esta en pantalla y






exportarlo
a un archivo tipo imagen en el disco duro del usuario.

Agradezco su ayuda


.





.





.

email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una pregunta AnteriorRespuesta Tengo una respuesta
Search Busqueda sugerida