[VBScript]
Set ca = Server.CreateObject("ImageGlue7.Canvas")
inpath = Server.MapPath("layers.psd")
outpath = Server.MapPath("drawfile.jpg")
ca.Color = "yellow"
ca.Width = 200
ca.Height = 200
ca.DrawFile inpath, "Image=4 Mode=transparent"
ca.SaveAs outpath, "Quality=high"
The code looks for a Photoshop file called 'layers.psd' in the
root directory of the web server. It pulls out the fourth image
(there is one composite image and three layers in the file) and
draws it transparent onto a yellow background. Finally it saves out
the image as a jpeg. The input and output is shown below.
layers.psd
drawfile.jpg
|