繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > 简单的文件目录浏览源程序
- ASP
- ASP+XML实例演练编程代码
- asp下利用XMLHTTP 从其他页面获取数据的代码
- asp下实现IP限制函数代码
- asp下IP地址分段计算函数
- asp身份证验证代码函数
- 用Asp隐藏文件路径，实现防盗链 的代码
- ASP生成柱型体，折线图，饼图源代码提供了
- 用asp实现网址和邮件地址的转换函数
- asp下最简洁的多重查询的解决方案
- asp下用datediff实现计算两个时间差的函数
- asp下实现记录集内随机取记录的代码
- asp下轻松实现将上传图片到数据库的代码
- [原创]站长感慨asp编程究竟何去何从
- fso asp生成静态html的代码
- ASP版实现cookies注入加速工具
- ASP实现网页打开任何类型文件都提示保存的方法附代码
- asp下使用数组存放数据的代码
- 一句话 asp木马加密版 彻底突破杀毒软件
- asp清空application的方法
- 使用asp下的adodb.stream 下载文件而不是打开
ASP 中的 简单的文件目录浏览源程序
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 204 ::
收藏到网摘: n/a
'**************************************
' Name: File / Directory Viewer
' Description:This Will Display All The
' Files, File Size and file date of every
' file in the directory you specify.
To make this work, paste the code into your favorite html editor, save it and Then view it.
' By: Thomas Michael
'
'
' Inputs:None
'
' Returns:None
'
'Assumes:File System Object Be Needed :)
' and it is setup to look for you my docum
' ents folder at "c:\mydocu~1" but you can
' change the line of code to look in any d
' irectory.
'
'Side Effects:None
'
'Warranty:
'code provided by Planet Source Code(tm)
' (http://www.Planet-Source-Code.com) 'as
' is', without warranties as to performanc
' e, fitness, merchantability,and any othe
' r warranty (whether expressed or implied
' ).
'Terms of Agreement:
'By using this source code, you agree to
' the following terms...
' 1) You may use this source code in per
' sonal projects and may compile it into a
' n .exe/.dll/.ocx and distribute it in bi
' nary format freely and with no charge.
' 2) You MAY NOT redistribute this sourc
' e code (for example to a web site) witho
' ut written permission from the original
' author.Failure to do so is a violation o
' f copyright laws.
' 3) You may link to this code from anot
' her website, provided it is not wrapped
' in a frame.
' 4) The author of this code may have re
' tained certain additional copyright righ
' ts.If so, this is indicated in the autho
' r's description.
'**************************************
<%@ LANGUAGE="VBSCRIPT" %>
<% Option Explicit %>
<HTML>
<HEAD> <TITLE>File Viewer</TITLE> </HEAD>
<BODY>
<TABLE width="100%" border=1 bordercolor="#000000" align="left" cellpadding="2" cellspacing="0">
<TR align="left" valign="top
评论 (0) All
