<% Response.Buffer=True Set Jpeg = Server.CreateObject("Persits.Jpeg") Set Jpeg1 = Server.CreateObject("Persits.Jpeg") Jpeg.Open server.MapPath("/images/43935/43935.jpg") Jpeg1.Open server.MapPath("/webimages/watermark.jpg") Jpeg.DrawImage Jpeg.OriginalWidth - 80, Jpeg.OriginalHeight - 50, Jpeg1, 0.3, &HFF0000, 95 'Jpeg.Canvas.Font.Size = 12 'Jpeg.Canvas.Font.Color = &H000000 'Jpeg.Canvas.Font.Family = "Arial" 'Jpeg.Canvas.Font.Bold = True 'Jpeg.Canvas.Print Jpeg.OriginalWidth - 111, Jpeg.OriginalHeight - 11, "Houseviewonline.com." 'Jpeg.Save server.MapPath("/test.jpg") Jpeg.SendBinary Set Jpeg = Nothing Set Jpeg1 = Nothing %>