IMAGEN DINÁMICA
Publicado por Dark Airash (1 intervención) el 27/03/2007 08:16:38
Buenas, a ver si alguien puede ayudarme. gracias de antemano.
Set oDynImage = CreateObject("DynImage.DynImage")
//////////////////////////////////////////////////////////////////////////////////////
oDynImage.Open 200,200
oDynImage.LoadImage 0,0, "plano.bmp"
oDynImage.Color = &hFF0000
i = 0
while (i < total)
coorx = round(ConvierteaTwips(tabla(LON, i), LON_SI, LON_ID, ancho))
coory = round(ConvierteaTwips(tabla(LAT, i), LAT_SI, LAT_ID, alto))
oDynImage.Ellipse coorx,coory,coorx+10,coory+10
i = i + 1
wend
Response.ContentType = "image/png"
Response.BinaryWrite oDynImage.Image
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
Lo q quiero es cargar una imagen dinámica en una página web. Esta imagen tiene como fondo un mapa y sobre el mapa creo elipses de forma dinámica. Estoy intentando usar dynimage y consigo cargar las elipses, pero no me funciona cargar el mapa.
Encima, sólo me funciona si pongo en el código ASP:
Response.ContentType = "image/png"
Response.BinaryWrite oDynImage.Image
Este código me da como salida en el mavegador una imagen PNG en vez de una página web. En cuanto mezclo código HTML se me ofusca y no funciona.
Tampoco me carga "plano.bmp", y no sé por qué, porque las elipses sí q las crea.
Hay alguna otra forma de hacer todo esto¿?
Set oDynImage = CreateObject("DynImage.DynImage")
//////////////////////////////////////////////////////////////////////////////////////
oDynImage.Open 200,200
oDynImage.LoadImage 0,0, "plano.bmp"
oDynImage.Color = &hFF0000
i = 0
while (i < total)
coorx = round(ConvierteaTwips(tabla(LON, i), LON_SI, LON_ID, ancho))
coory = round(ConvierteaTwips(tabla(LAT, i), LAT_SI, LAT_ID, alto))
oDynImage.Ellipse coorx,coory,coorx+10,coory+10
i = i + 1
wend
Response.ContentType = "image/png"
Response.BinaryWrite oDynImage.Image
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
Lo q quiero es cargar una imagen dinámica en una página web. Esta imagen tiene como fondo un mapa y sobre el mapa creo elipses de forma dinámica. Estoy intentando usar dynimage y consigo cargar las elipses, pero no me funciona cargar el mapa.
Encima, sólo me funciona si pongo en el código ASP:
Response.ContentType = "image/png"
Response.BinaryWrite oDynImage.Image
Este código me da como salida en el mavegador una imagen PNG en vez de una página web. En cuanto mezclo código HTML se me ofusca y no funciona.
Tampoco me carga "plano.bmp", y no sé por qué, porque las elipses sí q las crea.
Hay alguna otra forma de hacer todo esto¿?
Valora esta pregunta


0