|
下面是我给图片加上水印的代码,其中红色的aaa是图片(这都没错)
bbb是加入水印的文字信息,但是输出来多了一对单引号 要怎么写?
现在主要的问题是蓝色的颜色部分,为什么000000是黑色 FFFFFF就提示错误??如果我要用一个表单的下拉列表ccc来替换这里的颜色要怎样写?
aaa=trim(request.form("pic"))
bbb=trim(request.form("count"))
ccc=trim(request.form("selectcolor"))
-----------------------------------------------------------------------
Set Jpeg = Server.CreateObject("Persits.Jpeg")
Jpeg.Open Server.MapPath(aaa)
'开始写文字
Jpeg.Canvas.Font.Color = &123456 '颜色
Jpeg.Canvas.Font.Family = "宋体" '字体
Jpeg.Canvas.Font.Bold = True '是否加粗
Jpeg.Canvas.Print 10, 10, "'"&bbb&"'"
'打印坐标x 打印坐标y 需要打印的字符
'以下是对图片进行边框处理
Jpeg.Canvas.Pen.Color = &H000000' 'black 颜色
Jpeg.Canvas.Pen.Width = 0 '画笔宽度
Jpeg.Canvas.Brush.Solid = False '是否加粗处理
Jpeg.Canvas.Bar 1, 1, Jpeg.Width, Jpeg.Height
'起始X坐标 起始Y坐标 输入长度 输入高度
Jpeg.Save Server.MapPath(aaa) '保存
----------------------------------------------------------------------- |
|