ASP教程之Asp无组件天生缩略图(2)
asp可以使用微软的activeX使得网页功能无比强大,不过安全性也较差,而且是基于的windows服务器,所以性能稳定性也一般缩略图|无组件如今我们先计划一个ShowImg.asp页面用来显现缩略图及相干信息。详细计划以下: 图片:图片格局:
图片尺寸:
图片巨细:
点击次数:
上面,我们猎取图片的相对路径。代码以下:
<%
/////猎取ShowImg.asp的相对路径/////
DimcurFile
curFile=Server.mappath(Request.servervariables("PATH_INFO"))
Dimcurfilename,filename
/////图片绝对路径(存于数据库中)
cufilename=rs("ImgURL")
/////由于ShowImg.asp与images在统一目次,以是我们用instrrev猎取images的路径/////
filename=left(curFile,instrrev(curFile,""))&cufilename
/////创建GPS类实体/////
DimGetPicSize
SetGetPicSize=newGPS
Setfs=Server.CreateObject("Scripting.FileSystemObject")
/////猎取图片范例/////
DimPicSuffixName
PicSuffixName=fs.GetExtensionName(filename)
DimPD//PictureDimension
DimPWidth,PHeight
SelectCasePicSuffixName
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高度
CaseElse
EndSelect
Setfs=Nothing
SetGetPicSize=Nothing
%>
将下面的代码复制到的下面就OK了!
固然,有人会说,猎取路径纷歧定要用PATH_INFO,间接用server.mappath()不就能够了嘛,呵呵,萝卜青菜各有所爱,次要是我用PATH_INFO能够完成FSO的一些功效而用server.mappath()没有弄定,以是一向利用这个。
</p>asp可以轻松地实现对页面内容的动态控制,根据不同的浏览者,显示不同的页面内容。而浏览者一点觉察不出来,就像为他专门制作的页面一样。使用各种各样的组件,asp可以完成无比强大的功能。 我想问如何掌握学习节奏(先学什么再学什么)最好详细点? 多看多学多思。多看一些关于ASP的书籍,一方面可以扩展知识面一方面可以鉴借别人是如何掌握、运用ASP的;多学善于关注别人,向同学老师多多学习,不论知识的大小;多思则是要将学到的知识灵活运用。 不能只是将它停留在纸上谈兵的程度上。 如何更好的使自己的东西看上去很不错等等。其实这些都不是问题的实质,我们可以在实践中不断提升自己,不断充实自己。 Request:从字面上讲就是“请求”,因此这个是处理客户端提交的东东的,例如Resuest.Form,Request.QueryString,或者干脆Request("变量名") 我可以结合自己的经验大致给你说一说,希望对你有所帮助,少走些弯路。 他的语法和设计思路和VB完全相同,导致很多ASP的书都留一句“相关内容请参考VB的相关教材....”更糟糕的是,相当多的ASP教程混合了Javascript,VBscript等等脚本语言,搞的初学者。 掌握asp的特性而且一定要知道为什么。 还有如何才能在最短的时间内学完?我每天可以有效学习2小时,双休日4小时。 还有如何才能在最短的时间内学完?我每天可以有效学习2小时,双休日4小时。
页:
[1]