一聚教程网:一个值得你收藏的教程网站

热门教程

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")

热门栏目