最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
asp 利用Persits.jpeg组件生成图片
时间:2022-07-02 22:36:51 编辑:袖梨 来源:一聚教程网
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
Response.Expires = 0
Pic = Request("p")
PointX = CInt(Request("x"))
PointY = CInt(Request("y"))
Cutw"))
Cuth"))
Picpw"))
Picph"))
Set Jpeg = Server.CreateObject("Persits.Jpeg")
Jpeg.Open Server.MapPath(Pic)
'缩放切割图片
Jpeg.Width = PicWidth
Jpeg.Height = PicHeight
Jpeg.Crop PointX, PointY, CutWidth + PointX, CutHeight + PointY
'输出图片
Response.ContentType = "image/jpeg"
Jpeg.SendBinary
%>
相关文章
- 剑与黎明零氪萌新阵容搭配攻略 07-30
- 王者荣耀世界两生关逸事任务攻略详解 07-30
- 金铲铲之战s8怪兽入侵赛季何时返场? 07-30
- 魔兽世界征服印记购买地点-征服印记饰品在哪买 07-30
- 无畏契约好用准星推荐-准心代码大全 07-30
- 聪明开局吧第351关怎样找出19个常用字-聪明开局吧第351关找出19个常用字的过关方法 07-30