当前位置: 首页 > 图文教程 > 网络编程 > ASP > 简单的文件目录浏览源程序

ASP
十天学会ASP之第六天
十天学会ASP之第七天
十天学会ASP之第八天
十天学会ASP之第九天
十天学会ASP之第十天
三天学好ADO之第一天
三天学好ADO之第二天
三天学好ADO之第三天
在ASP中用集合成批操作数据库(一)
在ASP中用集合成批操作数据库(二)
ASP访问SQL Server内置对象
不通过数据源完全控制MDB数据库
ASP数据库简单操作教程
ASP 函数语法速查表
关于Win2K3中利用ASP上传文件的问题
ASP讲座之一:网页开发利器:高效易学的ASP
ASP讲座之二:读取通过表单发送的数据
ASP讲座之三:Application对象与Session对象
ASP讲座之四:ASP内置组件
ASP讲座之五:ASP组件(二)

ASP 中的 简单的文件目录浏览源程序


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 225 ::
收藏到网摘: 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