ASP 缩略图（纠错版）

网上很多缩略的代码，不过很多都是错误的。这个是纠正版，本人已修改。

Code
<%

Function PicReSize(picURL)
FileName1=Mid(picURL,13,22)
Set Jpeg = Server.CreateObject("Persits.Jpeg")
' 获取源图片路径
Path = Server.MapPath(picURL)
' 打开源图片
'response.write(Path)
Jpeg.Open Path
' 设定生成缩略图细节这里有很多种设定方法下面的方法是先判断宽高比然后按比例缩放
If Jpeg.OriginalWidth / Jpeg.OriginalHeight > 1 then
Jpeg.Width = 120
Jpeg.Height = int((120/Jpeg.OriginalWidth)*Jpeg.OriginalHeight)
elseif Jpeg.OriginalWidth / Jpeg.OriginalHeight < 1 then
Jpeg.Height = 120
Jpeg.Width= int((120/Jpeg.OriginalHeight)*Jpeg.OriginalWidth)
end if
' 设定锐化效果
Jpeg.Sharpen 1, 130
' 向指定路径生成缩略图

Jpeg.Save Server.MapPath("UploadFiles/small")&"\"&FileName1
'response.write filename1
'response.write Server.MapPath("uploadpic/small")&"\"&filename1
' 注意这两个Session
'Session("PPP0")=GP_curPath&FileName
'Session("PPP1")=GP_curPath&"small"&FileName
Set Jpeg = Nothing
'自动产生缩掠图结束
PicReSize = "UploadFiles/small/"&FileName1
end Function
%>

转载于:https://www.cnblogs.com/tjsquall/archive/2009/04/21/1440390.html

ASP 缩略图（纠错版）相关推荐

小白开发微信小程序21--网络API（asp.net core版）
1.什么是网络API 在一个网站里面发起https请求是很常见的,但是,由于微信小程序是腾讯内部的产品,不能直接打开一个外部的链接,例如,您在微信小程序里面无法直接打开网站,但是,在做小程序开发的时候 ...
ASP Win7旗舰版中的IIS配置asp.net的运行环境
以前弄过好多次,都没有成功,昨天晚上不知怎么地就成功了,借用我同学的一句话,这叫"灵光一闪",废话不多说了,这个成功是有图有视频有真相地哈! 这篇博文发表都三个月了,我自认为算是很 ...
A CAPTCHA Server Control for ASP.NET C# 版
今晚看到了A CAPTCHA Server Control for ASP.NET , 一个非常棒的CAPTCHA控件, 因为它原来是VB写的, 我照着用C#抄了一遍.... 原版下载地址: Down ...
asp.net网页版斗地主(当前版本1.0 未完待续最后更新时间2010-06-21)
2010-06-21 以上传了,由于进行了整体的重构,耽误了10多天.目前还有BUG未修复,这个只能用与一起交流基本的选大厅,大厅在线聊天,选择牌桌,抢地主,出牌,牌型验证等逻辑功能和对应的效果都已 ...
分享144个ASP源码，总有一款适合您
ASP源码分享144个ASP源码,总有一款适合您下面是文件的名字,我放了一些图片,文章里不是所有的图主要是放不下..., 144个ASP源码下载链接:https://pan.baidu.com/s ...
请确保 ASP.NET State Service (ASP.NET 状态服务)已启动，并且客户端端口与服务器端口相同...
异常详细信息: System.Web.HttpException: 无法向会话状态服务器发出会话状态请求.请确保已启动 ASP.NET State service,并且客户端和服务器端口是相同的.如果 ...
ASP.NET MVC 框架路线图更新【转】
[原文地址]ASP.NET MVC Framework Road-Map Update [原文发表日期] Tuesday, February 12, 2008 1:05 PM 去年的十二月份,作为AS ...
让ASP.NET5在Jexus上飞呀飞
就在最近一段时间,"Visual Studio 2015 CTP 5"(以下简称CTP5)发布了,CTP5的发布不仅标志着新一代的VisualStudio正式发布又向前迈出了一步, ...
.net和php 哪个难,对于ASP.NET和PHP的性能对比
类型:源码相关大小:23KB语言:中文评分:5.0 标签: 立即下载 ---------------------------------------------------------------- ...

ASP 缩略图（纠错版）

ASP 缩略图（纠错版）相关推荐

最新文章

热门文章

ASP 缩略图 （纠错版）

ASP 缩略图 （纠错版）相关推荐

最新文章

热门文章

ASP 缩略图（纠错版）

ASP 缩略图（纠错版）相关推荐