HOME > Atención al cliente > Programación > ASPIMAGE

ASPImage nos permite crear imagenes en el momento, utilizando ASP.

Características:

1. Crear GIF (Solo codificación RLE) formatos JPG, PNG, BMP, TGA y PCX.
2. Modificar imagenes existentes (JPG, BMP, PNG, TGA y PCX).
3. Gradiente.
4. Creación de Gif animados.
5. Gran variedad de métodos de dibujo.
6. Png y Gif transparentes.

Ejemplo Simple:

Usar el componente es tan simple como;

1. Crear el objeto
2. Colocar algunas propiedades
3. Llamar al metodo SaveImage

El siguiente código demuestra como utilizar AspImage desde VBScript. En este ejemplo crearemos una imagen de texto que diga "Welcome to" con un relleno gradiente.

Set Image = Server.CreateObject("AspImage.Image")

rem Set various font parameters
Image.FontColor = vbBlack
Image.Italic = True
Image.Bold = True
Image.FontName = "Arial"
Image.FontSize = 12
Image.PadSize = 10

rem Calculate how big our text info is and set the image to this size
rem This has to be done since we want to fill the area with a gradient
strMessage = "Welcome to"
Image.MaxX = Image.TextWidth (strMessage)
Image.MaxY = Image.TextHeight (strMessage)

rem Create a one way gradient
Image.GradientOneWay vbRed, vbWhite, 0

rem Print our string to the image
Image.TextOut strMessage, Image.X, Image.Y, false

rem Set the filename and save
Image.FileName = "d:\inetpub\wwwroot\images\msg1.jpg"
if Image.SaveImage then
rem The image was saved so write the tag out for the browser to pick up
Response.Write < img src=""/images/msg1.jpg"">
else
rem Something happened and we couldn't save the image so just use an HTML header
rem We need to debug the script and find out what went wrong. See Image.Error for details
Response.Write "Welcome to"
end if

Probando los resultados del método SaveImage podemos determinar si la imagen fue grabada exitosamente. Caso contrario el script puede estar grabando la imagen en un directorio inválido.

Más información en ServerObjets