繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > 简单的文件目录浏览源程序
- ASP
- 深入讲解 ASP+ 验证（一）
- 深入讲解 ASP+ 验证（二）
- 深入讲解 ASP+ 验证（三）
- 深入讲解 ASP+ 验证（四）
- 通过事例学习.net的WebForms技术(一)
- 通过事例学习.net的WebForms技术(二)
- StripNonNumeric函数源程序
- 通过事例学习.net的WebForms技术(三)
- 通过事例学习.net的WebForms技术(四)
- 将HTML表单数据存储为XML格式 - 1
- 将HTML表单数据存储为XML格式 - 2
- 将HTML表单数据存储为XML格式 - 3
- asp生日自动提醒小程式
- WEB页面简单进度记时器
- 在主页中编制音频播放器
- 图片数据的存和取示例
- 用ASPMail组件实现E_mail自动反馈
- 读取目录下的所有文件（源码）
- 制作我们自己的Ebay(拍卖系统)(1)
- 制作我们自己的Ebay(拍卖系统)(2)
ASP 中的 简单的文件目录浏览源程序
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 50 ::
收藏到网摘: 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
