仓酷云

标题: ASP编程：一个ASP版的图片扫瞄办理器 [打印本页]

作者: 金色的骷髅 时间: 2015-1-16 23:36
标题: ASP编程：一个ASP版的图片扫瞄办理器
结论：和PHP一样，ASP简单而易于维护，很适合小型网站应用，通过DCOM和MTS技术，ASP甚至还可以完成小规模的企业应用，但ASP的致命缺点就是不支持跨平台的系统，在大型项目开发和维护上非常困难。这是我第一次翻译文章，不敷的地方，还请包涵。
印度，如今之以是成为软件出口年夜国，有良多中央都优于我们。个中一个主要的上风就是印度的官方言语是英语，这就为以英语作为编程言语的印度程序员带来得天独厚的优胜前提。关于我们处置IT业的人来讲，也应当增强自已英语练习。

导言
假如你有个已运转两个月以上工夫的网站，你大概会注重到你网站上已储蓄积累了良多的图片文件。只管我们都已全力为这些图片文件很好的定名，但当我们往扫瞄这些图片的文件名时，我们老是会很难想起一些图片文件名有何特别的寄义或用途。
这时候，我们一般会反复地用扫瞄器翻开那些图片，看看是甚么图片？这时候，这段ASP代码就能够做为图片扫瞄器(和清算器)来扫瞄这些图片并实行清算操纵。

编码：
现实上，这个程序就是包括某目次下的一切图片的一个列表页面，用FileSystemObject工具来枚举出这些图片文件(gif和jpeg文件).
在页面里加一个链接toggledisplay，来把持是不是显现图片。当你有良多文件而不想都加载它们，你能够只让页面的一个图片显现一个链接，相反，假如你不断定一些文件定名是寄义，这个功效将能很好的匡助你举行清算操纵。
上面是很简便的代码
<%@Language=VBScript%>
<%OptionExplicit%>
<%
ConstImageFilePath="images"
ConstDeleteButtonLabel="DeleteSelectedImages"

DimobjFSO
DimobjFolder
DimobjFile

DimstrFileName
DimstrFileExtension

DimblnShowImages

IfRequest.QueryString("ShowImages")=""Then
blnShowImages=False
Else
blnShowImages=CBool(Request.QueryString("ShowImages"))
EndIf

IfRequest.Form("btnDelete")=DeleteButtonLabelThen
SetobjFSO=Server.CreateObject("Scripting.FileSystemObject")

ForEachstrFileNameInRequest.Form("delete")
objFSO.DeleteFile(Server.MapPath(ImageFilePath&"/"&_
strFileName))
Next

SetobjFSO=Nothing
EndIf
%>
<html>
<head>
<title>ASP101ImageBrowser&Killer!</title>
</head>
<body>

<formaction="<%=Request.ServerVariables("URL")%>"method="post">

<tableborder="1">
<tr>
<th>ImageName</th>
<th>Image<ahref="<%=Request.ServerVariables("URL")%>?
ShowImages=<%=NotblnShowImages%>">(ToggleDisplay)</a></th>
<th>DeleteThisImage</th>
</tr>
<%
SetobjFSO=Server.CreateObject("Scripting.FileSystemObject")
SetobjFolder=objFSO.GetFolder(Server.MapPath(ImageFilePath))

ForEachobjFileInobjFolder.Files
strFileExtension=LCase(Mid(objFile.Name,_
InStrRev(objFile.Name,".",-1,1)+1))

IfstrFileExtension="gif"OrstrFileExtension="jpg"Or_
strFileExtension="jpeg"Then
Originalimagefileidentificationoption:
IfobjFile.Type="GIFImage"Or_
objFile.Type="JPEGImage"Then
%>
<tr>
<td>
<ahref="<%=ImageFilePath&"/"&objFile.Name%>">
<%=objFile.Name%></a>
</td>
<%
IfblnShowImagesThen
%>
<td>
<imgsrc="<%=ImageFilePath&"/"&objFile.Name%>"/>
</td>
<%
Else
%>
<td>
<ahref="<%=ImageFilePath&"/"&objFile.Name%>">
ViewImage</a>
</td>
<%
EndIf
%>
<tdalign="center">
<inputtype="checkbox"name="delete"
value="<%=objFile.Name%>"/>
</td>
<%
EndIf
Next

SetobjFolder=Nothing
SetobjFSO=Nothing
%>
<tr>
<tdcolspan="3"align="right">
<inputtype="submit"name="btnDelete"
value="<%=DeleteButtonLabel%>">
</td>
</tr>
</table>

</form>

</body>
</html>

实行删除操纵时，必定要注重，假如在程序里不加删除确认提醒，程序将不克不及取消删除操纵。

结论
人们老是不会拿asp来建年夜型的可晋级的网站。（译者注：这句不翻译不是很得当，依据我的事情履历，ASP完整能够建立年夜型的网站体系。在ASP方面中，自己曾参予建立过年夜型企业外部网，挪动行业使用等。)但偶然候你能够用这个简化你的事情,即便这代码从没在WEB上宣布。

猎取代码
你能够下载包括这个代码的会商的ZIP文件http://www.asp101.com/articles/john/imageviewer/imgview.zip。为了把持文件的巨细，我没有包括一个图片例子。我再一次提示你，用这个代码做损坏并删除良多相干图片是很简单的。要注重，没有删除确认时，要确认用图片复原本操纵。

代码更新
我已收到良多有关这个代码的EMAIL。看了今后，我仍是发明有良多成绩。</p>Access是一种桌面数据库，只适合数据量少的应用，在处理少量数据和单机访问的数据库时是很好的，效率也很高。但是它的同时访问客户端不能多于4个。access数据库有一定的极限，如果数据达到100M左右，很容易造成服务器iis假死，或者消耗掉服务器的内存导致服务器崩溃。

作者: 只想知道 时间: 2015-1-20 10:27
从事这个行业，那么你可以学ASP语言，简单快速上手，熟练dreamweav排版，写asp代码，熟练photoshop处理图片，打好基础就行了

作者: 山那边是海 时间: 2015-1-26 22:30
如何学好ASP,以前也有人问过,把回答给你转过来看看能否对你有帮助:

作者: 愤怒的大鸟 时间: 2015-2-4 21:02
ASP主要是用好六个对象，其实最主要的是用好其中两个：response和request，就可以随心所欲地控制网页变换和响应用户动作了。

作者: 飘飘悠悠 时间: 2015-2-10 10:25
如何学好ASP,以前也有人问过,把回答给你转过来看看能否对你有帮助:

作者: 第二个灵魂 时间: 2015-3-1 08:51
掌握asp的特性而且一定要知道为什么。

作者: 再见西城 时间: 2015-3-10 13:00
弱类型造成潜在的出错可能：尽管弱数据类型的编程语言使用起来回方便一些，但相对于它所造成的出错几率是远远得不偿失的。

作者: 海妖 时间: 2015-3-17 07:21
交流是必要的，不管是生活还是学习我们都要试着去交流，通过交流我们可以学到很多我们自己本身所没有的知识，可以分享别人的经验甚至经历。

作者: 透明 时间: 2015-3-24 01:50
Session:这个存储跟客户端会话过程的数据，默认20分钟失效

欢迎光临仓酷云 (http://ckuyun.com/)