最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
asp 给图片加水印代码
时间：2022-07-02 22:44:53 编辑：袖梨 来源：一聚教程网
Set Jpeg1 = Server.CreateObject("Persits.Jpeg")
Set Jpeg2 = Server.CreateObject("Persits.Jpeg")
Jpeg1.Open Server.MapPath("1.jpg")
Jpeg2.Open Server.MapPath("2.jpg")
iWidth=Jpeg1.OriginalWidth
iHeight=Jpeg1.OriginalHeight
iiWidth=Jpeg2.OriginalWidth
iiHeight=Jpeg2.OriginalHeight
iX=iWidth / 2
iY=iHeight / 2
iiX=iiWidth / 2
iiY=iiHeight / 2
iiiX=iX-iiX
iiiY=iY-iiY
response.write iiiX
response.write iiiY
'response.End
Jpeg1.Canvas.DrawImage iiiX, iiiY, Jpeg2 ' optional arguments omitted
jpeg1.save Server.mappath("123.jpg")