最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
asp实现在线剪切图片代码
时间:2008-07-24 编辑:简简单单 来源:一聚教程网
<%DIM LEFT1,top1
left1=request.Form("left")
top1=request.Form("top")
left1=left(left1,len(left1)-2)
top1=left(top1,len(top1)-2)
w=request.form("width")
Set Jpeg = Server.CreateObject("Persits.Jpeg")
Jpeg.RegKey = "48958-77556-02411"
Path = Server.MapPath("pic") & "\200873141011.jpg"
Jpeg.Open Path
w1=w/Jpeg.OriginalWidth
h1=Jpeg.OriginalHeight*w1
Jpeg.Width=w
Jpeg.Height = h1
jpeg.crop left1,top1,left1+110,top1+135
filename=year(now)&month(now)&day(now)&hour(now)&minute(now)&second(now)
Jpeg.Save Server.MapPath("pic") & "\"+filename+".jpg"%>
-
上一个: aspjpeg缩略图更清楚
-
下一个: aspasp汉字转换成汉语拼音程序
相关文章
- ASP判断图片的格式 03-22
- asp图片采集代码 02-25
- aspjpeg缩小图片的组件使用介绍(1) 01-18
- aspjpeg缩小图片的组件使用介绍(2) 01-18
- ASP实现图片上存 01-18
- asp如何实现图片的动态翻动的效果 01-18