Asp无组件生成缩略图（2）
发布时间：2007-10-26 12:08:00
标签：缩略图,图片,无组件,asp
2.获取图片路径
由于不只一张图片，以及图片需分类存放，我们在数据库中设计了一个存放图片相对路径的字段ImgURL。我们把上传的图片都放在一个名为images的文件夹中（至于如何无组件上传图片心晴就不在多说了）。 现在我们先设计一个ShowImg.asp页面用来显示缩略图及相关信息。具体设计如下：
图片：
图片格式：
图片尺寸：
图片大小：
点击次数：
下面，我们获取图片的绝对路径。代码如下：
<％
'/////获取ShowImg.asp的绝对路径/////
Dim curFile
curFile=Server.mappath(Request.servervariables("PATH_INFO"))
Dim curfilename,filename
'/////图片相对路径（存于数据库中）
cufilename=rs("ImgURL")
'/////因为ShowImg.asp与images在同一目录，所以我们用instrrev获取images的路径/////
filename=left(curFile,instrrev(curFile,"\"))&cufilename
'/////建立GPS类实体/////
Dim GetPicSize
Set GetPicSize=new GPS
Set fs=Server.CreateObject("Scripting.FileSystemObject")
'/////获取图片类型/////
Dim PicSuffixName
PicSuffixName=fs.GetExtensionName(filename)
Dim PD '//Picture Dimension
Dim PWidth,PHeight
Select Case PicSuffixName
Case "gif","bmp","jpg","png":
'/////调用GPS通用类中的GetImageSize函数获取图片尺寸/////
PD=GetPicSize.GetImageSize(filename)
PWidth=PD(1) '//获取图片宽度
PHeight=PD(2) '//获取图片高度
Case "swf"
PD=GetPicSize.GetImageSize(filename)
PWidth=PD(1) '//获取Flash宽度
PHeight=PD(2) '//获取Flash高度
Case Else
End Select
Set fs=Nothing
Set GetPicSize=Nothing
％>
将上面的代码复制到<body>的上面就OK了！
当然，有人会说，获取路径不一定要用PATH_INFO，直接用server.mappath()不就可以了嘛，呵呵，萝卜青菜各有所爱，主要是我用PATH_INFO可以实现FSO的一些功能而用server.mappath()没有搞定，所以一直使用这个。
0
投稿猜你喜欢
- 如果你想让你的IIS支持wml,做个wap网站,只需作小小的改变就行了.虽然目前支持wml的虚拟主机极少,但是自己在本机上玩玩也好的.首先在
- 在默认的情况下，MySQL搜索不区分大小写（但某些字符集始终区分大小写，如czech）。这意味着，如果你使用col_name LIKE &#
百度有啊2009年情人节logo——大纸袋GG给大纸袋MM送了枝玫瑰花，大纸袋MM奖励了大纸袋GG一个吻，好可爱！淘宝网2009年情人节lo- 系列一：图片格式介绍Gif格式特点透明性Gif是一种布尔透明类型，既它可以是全透明，也可以是全不透明，但是它并没有半透明（alpha 透明）
- 也许已经有人发现可以这样写...CSS代码部分a.info { position:
- 从百度百科中扣去的这个图片轮播代码，图片向左不间断滚动，有停顿：<!DOCTYPE html PUBLIC "-//W3C/
- 总结了部分所学、所听、所看、所问的一些CSS写作经验，书写高效的CSS - 漫谈CSS的渲染效率，它们与渲染效率及所占用
- 去年淘宝做了个“胖子”项目，就是把网页的默认宽度从780提升到了950。也就是说，基本放弃了800×600的用户（没有完全放弃，如果你仔细研
- asp上传的时候出现这种 错误:Server 对象 错误 'ASP 0177 800401f3'Server.CreateO
- 写了几年代码，很少谈到javascript程序的执行效率问题，今天就举几个例子看看，让大家看看程序优化是多么重要。这节来看看createEl
- 网上有很多关于PHP在IIS下配置的教程,但都是一些很理性化的东西,我从里面整理出来这个教程 发出来为了方便参考,有什么问题也可以大家一起交
- 块级元素块级元素生成一个元素框，（默认地）它会填充其父级元素的内容，旁边不能有其他元素。换句话说，他在元素框之前和之后生成了“分隔”符。我们
- 最近重新温习了一次《javascript设计模式》，确实是一本好书，每次看都有不同的领悟，每次领悟到的都受益匪浅，无怪古圣人都说学无止镜了，
- 第一步一般是建立一个关键字替换表 如 id keyword url 等字段第二步是文章显示时把【文章】内容和【关键字替换表】对应的关键字替换
- this指针是面向对象程序设计中的一项重要概念，它表示当前运行的对象。在实现对象的方法时，可以使用this指针来获得该对象自身的引用。和其他
- 1.彻底弄懂CSS盒子模式一(DIV布局快速入门) 2.彻底弄懂CSS盒子模式二(导航栏实例) 3.彻底弄懂CSS盒子模式三(浮动的表演和清
- MySQL Proxy(MySQL代理)是一个通过MySQL网络协议，提供MySQL服务器与客户端之间连接的应用工具，在基本配置条件下，My
- AJAX应用因为它们的表现力的丰富、更加互动和更加迅速的响应得到了赞扬声；这些优点都是通过使用XMLHttpRequest对象来动态的载入数
- 做WEB前台开发也有两年多，在开发中经常要涉及到DOM编程，我想大家也跟我一样，经常要处理各种DOM编程的操作，今天我就拿一个lightbo
- 在HTML中，常见的URL有多种表示方式：相对URL： example.php demo
