繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > 简单的文件目录浏览源程序
- ASP
- Microsoft SQL Server 7.0安全问题
- 最优化ASP程序性能
- Access数据库操作中出现的怪现象
- 将ASP代码移植为VB COM组件-1
- 将ASP代码移植为VB COM组件-2
- 将ASP代码移植为VB COM组件-3
- 将ASP代码移植为VB COM组件-4
- 使用ASP常见问题解答
- 数据库聊天室的“无刷新”技术要点
- 把ASP移植到ASP+
- 如何使用XQI？
- 一个普通的数据库例子源源程序
- 让Session对象在不同域名下实现共享
- 无组件图片与文本同步存入数据库的最简单的办法
- 在WAP网站上建立反馈表单
- 如何增强ASP程序性能(4)
- 关于在浏览器中执行*.exe文件的深入探讨!
- 用RecordSet实现分页(by Daniel Adrian)
- remote script文档(转载自微软)(九)
- Microsoft 脚本编码器Script Encoder介绍（1）全中文
ASP 中的 简单的文件目录浏览源程序
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 136 ::
收藏到网摘: 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
