|
这是我第一次翻译文章,不足之处,还请见谅。 印度,现在之所以成为软件出口大国,有很多地方都优于我们。其中一个首要的优势就是印度的官方语言是英语,这就为以英语作为编程语言的印度程序员带来得天独厚的优越条件。对于我们从事IT业的人来说,也应该加强自已英语训练。
导言 如果你有个已运行两个月以上时间的网站,你也许会注意到你网站上已积聚了很多的图片文件。尽管我们都已尽力为这些图片文件很好的命名,但当我们去浏览这些图片的文件名时,我们总是会很难想起一些图片文件名有何特殊的含义或用处。 这时,我们通常会重复地用浏览器打开那些图片,看看是什么图片?这时,这段ASP代码就可以做为图片浏览器(和清理器)来浏览这些图片并执行清理操作。
编码: 事实上,这个程序就是包含某目录下的所有图片的一个列表页面,用FileSystemObject 对象来列举出这些图片文件(gif和jpeg文件). 在页面里加一个链接 toggle display ,来控制是否显示图片。当你有很多文件而不想都加载它们,你可以只让页面的一个图片显示一个链接,相反,如果你不确定一些文件命名是含义,这个功能将能很好的帮助你进行清理操作。


下面是很简洁的代码 <%@ Language=VBScript %> <% Option Explicit %> <% Const ImageFilePath = "images" Const DeleteButtonLabel = "Delete Selected Images"
Dim objFSO Dim objFolder Dim objFile
Dim strFileName Dim strFileExtension
Dim blnShowImages
If Request.QueryString("ShowImages") = "" Then blnShowImages = False Else blnShowImages = CBool(Request.QueryString("ShowImages")) End If
If Request.Form("btnDelete") = DeleteButtonLabel Then Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
For Each strFileName In Request.Form("delete") objFSO.DeleteFile(Server.MapPath(ImageFilePath & "/" & _ strFileName))   [1] [2] [3] [4] 下一页 |