ASP Image 使用范例

使用ASPImage组件仅需以下步骤：

建一个对象

设置若干属性

调用SaveImage方法

以下代码举例说明如何在vbscript中使用ASPImage组件，在这个例子中我们要建立一个渐进填充的字样为 "welcome to"的文字图片：

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

remThis 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

remNOTE: You should gen the filename dynamically for multiuser usage

Image.FileName = "d:inetpubwwwrootimagesmsg1.jpg"

if Image.SaveImage then

rem The image was saved so write the <img src> tag out for the browser to pick up

Response.Write "<img src="http://www.ddvip.net/web/ASP/searches/"/images/msg1.jpg""><br>"

else

rem Something happened and we couldn't save the image so just use an HTML header

remWe need to debug the script and find out what went wrong

Response.Write "<h2>Welcome to</h2>

end if

通过使用SaveImage方法我们可以得知图片是否已经正确保存了。一般导致图片不能正确保存的原因是图片的保存路径不合法或者对该路径没有写的权限。

GIF Animations

图片能被加载或进行处理，并且可以通过调用AddImage方法将这些修改保存到一个活动顺序的动画中。在soianim.asp中有个简单的GIF动画例子，这个文件已打包到ASPImage的ZIP文件中。