ASP程序给上传的图片增添水印效果!(2)
if top<>"" then f_left=left '水印离图片左边位置
if left<>"" then f_top=top '水印离图片top位置
if content="" then '水印内容
response.write "水印什么内容呢,水印不成功!"
exit sub
else
f_content=content
end if
' 添加文字水印
Jpeg.Canvas.Font.Color = &hff0000 ' 红色
Jpeg.Canvas.Font.Family = font_family
jpeg.canvas.font.size= font_size
if isbold=1 then
内容版权声明:除非注明,否则皆为本站原创文章。