Image
The Image object represents a single image in an Images collection.
Images.Item returns an Image object. Item is the default property
of Images, so, to set an Image object, use either:
Set objImage = Images("ImageName")
or,
Set objImage = Images.Item("ImageName")
Image Properties
| Image Properties |
| Format |
Returns one of five image file formats:
| SAJpeg | 0 |
| SAGif | 1 |
| SATif | 2 |
| SAWmf | 3 |
| SABmp | 4 |
| SAPcx | 5 |
| SAPng | 6 |
| SAPsd | 8 |
Example:
For Each Item in objImages
If Item.Ordinal <= objImages.Count Then
Response.Write Item.Name & "<br>"
Select Case Item.Format
Case 0
Response.Write "JPEG" & "<br><br>"
Case 1
Response.Write "GIF" & "<br><br>"
Case 2
Response.Write "TIF" & "<br><br>"
Case 3
Response.Write "WMF" & "<br><br>"
Case 4
Response.Write "BMP" & "<br><br>"
End Select
End If
Next
Go to: Top of page
|
| Image |
Returns an image's binary data.
Example:
Set objImages = Server.CreateObject("SoftArtisans.Images")
objImages.LoadImage "Starry Night", "d:\images\starrynight.gif"
objImages.LoadImage "Evening", "d:\images\evening.jpg"
objImages.LoadImage "House", "d:\images\house.jpg"
Set imgEvening = objImages("Evening")
'--- Display the image "Evening"
Response.BinaryWrite imgEvening.Image
Go to: Top of page
|
| Name |
Returns the name assigned to an image by
LoadImage.
Example:
Set objImages = Server.CreateObject("SoftArtisans.Images")
....
For Each Item in objImages
If Item.Ordinal <= objImages.Count Then
Response.Write Item.Name & "<br>"
End If
Next
Go to: Top of page
|
| Ordinal |
Returns the ordinal number of an image in an
Images collection.
Example:
Set objImages = Server.CreateObject("SoftArtisans.Images")
....
For Each Item in objImages
If Item.Ordinal <= objImages.Count Then
Response.Write Item.Name & "<br>"
End If
Next
Go to: Top of page
|
Copyright © 2001-2004, SoftArtisans, Inc.