最新下载
热门教程
- 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
%>
相关文章
- 1元10抖币官网直充入口-抖币充值iOS专享通道 10-28
- workbuddy电脑版官网下载-腾讯AI工作台官方入口直达 10-28
- workbuddy官网登录入口直达-腾讯workbuddy官方版下载获取 10-28
- mcjs网页版畅玩-mcjs极速秒玩 10-28
- yandex在线登录官网-俄罗斯引擎yandex官方入口 10-28
- 超星网页版登录入口-超星学习通官方登录地址 10-28