Cargar imagen en un MovieClip con ASP y Flash
Vamos a intentar explicar como cargar una imagen en un clip de pelicula de Flash, trabajando con ASP, el componente ASPjpeg, SQL y un poco de ActionScript.
En este caso en particular trabajaremos con imágenes guardadas en una Base de Datos y no en una carpeta, para tal caso necesitaremos trabajar con el componente ASPjpeg que a su vez, nos permite trabajar sobre las imágenes, como por ejemplo redimensionarlas antes de pasarlas a flash.
- Como primer paso mostraré como trabajar desde ASP para rescatar las imágenes de la base de datos y utilizando el componente, redimensionarlas. Sin mas palabras vamos al código:
El archivo lo llamaremos por ejemplo, CargaImagenes.asp. El código estará comentado, si tienen alguna duda, dejen en los comentarios.
<%@ LANGUAGE = VBScript.Encode %>
<!--primer paso conexion a la base de datos-->
<!--#INCLUDE FILE="conexion/conectar.asp"-->
<%
'creo las variables a utilizar, no es necesario, pero es buena costumbre
Dim rsI,SQL, ImgID
'rescato el id de la Imagen enviada desde flash
ImgID=Request.QueryString("ImagenID")
'trabajo con store procedure para la consulta pero podria ser un simple select * from imagenes
SQL="PacienteImagen_Cons_sp " &amp; ImgID
'Aca uso el componente ASPjpeg
Set Jpeg = Server.CreateObject("Persits.Jpeg")
'---------------------------------------------
Set rsI = Server.CreateObject("ADODB.Recordset")
Set rsI = cnMHO.execute(SQL)
'pregunto si la consulta me arrojo al menos un registro
if not rsI.eof = true then
Response.Buffer = True
Response.Expires = 0
Response.ContentType = rs("ContentType")
Response.Clear()
Response.CacheControl = "private"
'con esta linea habro del archivo binario
Jpeg.OpenBinary rs("Archivo").Value
'dimensiono al tamaño que necesito
Jpeg.Width=70
Jpeg.Height=70
'doy salida al archivo
Jpeg.SendBinary
else
'si la consulta no arrojo resultados entonces muestro un sinfoto.jpg
Response.Redirect "imagenes/sinfoto.jpg"
end if
Response.End
%>
Como habran notado, no es muy complicado.
- El siguiente paso sería trabajar con flash y un poco de actionscript para levantar la imagen que extraimos con ASP en el paso enterior. Entonces manos a la obra con el código.
Como en paso anterior dejaré comentado las líneas, si surge alguna duda, dejen en los comentarios
//creamos un movieClip vacio llamado miMC1 donde cargaremos la imagen
var miMC1:MovieClip = _root.createEmptyMovieClip("miMC1", _root.getNextHighestDepth());
//proporcionan información de estado mientras se están cargando JPEG, GIF o PNG
var loader:MovieClipLoader = new MovieClipLoader();
var listener:Object = new Object();
listener.onLoadInit = function(target:MovieClip):Void{
//dimensionamos el clip y tambien su posicion
target._width = 30;
target._x=-15;
target._y=-33;
target._yscale = target._xscale;
}
loader.addListener(listener);
//si ya tenemos el clip, entonces cargamos la imagen de esta forma
loader.loadClip("CargaImagenes.asp?ImagenPacID=5", miMC1);
//en la línea anterior envio al archivo de asp la variable que necesito para luego realizar la consulta
//a la base de datos, para el ejemplo, envio el valor 5 pero bien podría ser una variable.
En mi caso particular me toco realizar un tooltip en flash algo parecido a esto:
Espero les sirva para algunos de sus proyectos. Utilizando el mismo criterio se podría realizar en PHP con la librería GD.
Como siempre cualquier duda o sugerencia dejenlos en los comentarios.
También te puede Interesar
¿Disfrutaste esta entrada? Por qué no dejas un comentario abajo y continúas la conversación, o te suscribes a mi feed y obtienes artículos como este enviados a tu lector de feeds.
hola me podrías facilitar el archivo fla, si no es mucha molestia, soy diseñadora y la programación se me escapa