繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > 简单的文件目录浏览源程序
- ASP
- 深入研究“用ASP上载文件”(一)
- 深入研究“用ASP上载文件”(二)
- 一个投票系统的源程序(coveryourasp.com)
- 一 些 ASP 小 源 程 序
- 用ASP制作个性化的调查板（附源程序）
- 一些源程序 - 获得文件大小和字符串处理
- 用ASP创建日志文件（附源程序）
- 在一个ASP页面停留的多少时间的程序
- 用VB6做一个简单的文件上传组件(一)
- 用VB6做一个简单的文件上传组件(二)
- 构建你的网站新闻自动发布系统之七
- 实 现 滚 动 新 闻
- 网上“店铺”DIY(1)
- 网上“店铺”DIY(2)
- 网上“店铺”DIY(3)
- 负载平衡环境下的ASP会话管理(1)
- 负载平衡环境下的ASP会话管理(2)
- FrontPage创建HTML／ASP混合页面Ⅰ
- FrontPage创建HTML／ASP混合页面Ⅱ
- 在ASP应用中验证用户身份(1)
ASP 中的 简单的文件目录浏览源程序
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 62 ::
收藏到网摘: 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
