圖片：
圖片格式：
圖片尺寸：
圖片大小：
點擊次數：
下面，我們擷取圖片的絕對路徑。代碼如下：
<%
/////擷取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()沒有搞定，所以一直使用這個。
文章整理：站長天空 網址：http://www.z6688.com/
以上資訊與文章本文是不可分割的一部分,如果您要轉載本文章,請保留以上資訊，謝謝!
Start building with 50+ products and up to 12 months usage for Elastic Compute Service
1 on 1 presale consultation
24/7 Technical Support 6 Free Tickets per Quarter Faster Response
Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.
A comprehensive suite of global cloud computing services to power your business
Payment Methods We Support
