asp 显示文件夹下面所有文件代码

<%  
Whichfolder=server.mappath("") &"/" 
Dim fs, f, f1, fc 
Set fs = CreateObject("Scripting.FileSystemObject") 
Set f = fs.GetFolder(Whichfolder) 
Set fc = f.files

For Each f1 in fc 
 Response.write (f1.name & "<BR>") 
Next 
%>

实例二.
<%  
Whichfolder=server.mappath("") &"/cgi-bin/" 
Dim fs, f, f1, fc 
Set fs = CreateObject("Scripting.FileSystemObject") 
Set f = fs.GetFolder(Whichfolder) 
Set fc = f.files

For Each f1 in fc 
 Response.write (f1.name & "<BR>") 
Next 
%>

好了就OK

时间: 2024-08-23 08:46:17

asp 显示文件夹下面所有文件代码的相关文章

一段ASP单页显示文件夹下所有图片的代码_应用技巧

复制代码 代码如下: <% dim fso,objFolder,objFiles dim filelist Set fso=Server.CreateObject("scripting.FileSystemObject") Set objFolder=fso.GetFolder(server.MapPath("thumbs")) Set objFiles=objFolder.Files '循环输出文件夹path下的文件的文件名 For each objFile

一段ASP单页显示文件夹下所有图片的代码

复制代码 代码如下: <% dim fso,objFolder,objFiles dim filelist Set fso=Server.CreateObject("scripting.FileSystemObject") Set objFolder=fso.GetFolder(server.MapPath("thumbs")) Set objFiles=objFolder.Files '循环输出文件夹path下的文件的文件名 For each objFile

ASP单页显示文件夹下所有图片的代码

<% dim fso,objFolder,objFiles dim filelist Set fso=Server.CreateObject("scripting.FileSystemObject") Set objFolder=fso.GetFolder(server.MapPath("thumbs")) Set objFiles=objFolder.Files '循环输出文件夹path下的文件的文件名 For each objFile in objFile

asp.net 中显示文件夹下的文件,并有链接地址的例子

using System; using System.Configuration; using System.Data.SqlClient; using System.IO; using System.Web;       protected void Page_Load(object sender, EventArgs e)     {         display_files("/j1", "*.asp");  //"all" 代表全部类型

求助,asp.net web.上传文件代码异常

问题描述 如图,上传文件到指定目录后没法点击"考贝路径"按钮.代码如下:aspx:<htmlxmlns="http://www.w3.org/1999/xhtml"><headrunat="server"><title>上传文件</title><linkhref="StyleSheet.css"rel="stylesheet"type="tex

python2.7删除文件夹和删除文件代码实例_python

复制代码 代码如下: #!c:\python27\python.exe# -*- coding: utf-8 -*- import osimport re from os import pathfrom shutil import rmtree DEL_DIRS = NoneDEL_FILES = r'(.+?\.pyc$|.+?\.pyo$|.+?\.log$)' def del_dir(p):    """Delete a directory.""&q

运行报路径找不到-.net mvc在视图上 显示文件夹内所有图片

问题描述 .net mvc在视图上 显示文件夹内所有图片 视图代码: @{ ViewBag.Title = "Image"; } @for (int i = 1; i @Url.Action("Image", new { id = "00"+i }) } ``//控制器代码 public class HomeController : Controller { // // GET: /Home/ public ActionResult Index(

java-以代码为什么不能实现显示文件夹下的所有文件和文件夹??使用了递归

问题描述 以代码为什么不能实现显示文件夹下的所有文件和文件夹??使用了递归 public class hello3 { public static void main(String[] args){ File dir=new File(""C:\Users\pc\Desktop\a""); outputFile(dir); } public static void outputFile(File file){ File[] aaa=file.listFiles();

ASP VBScript + Javascript 以字符串方式二级联显示文件夹

javascript|vbscript|显示|字符串 ASP VBScript + Javascript 以字符串方式二级联显示文件夹 作用: 列出当前设置目录中的子文件夹, 再列出子文件夹的下级文件夹, 当改变一级子文件夹的时候, 动态显示隶属于其的子文件夹. 注: Javascript 以字符串方法判断级联对象, 也就是一级子文件夹的名字. //并且在页面加载的时候以一级子文件夹选择的目标关联显示二级列表框中的内容. shawl.qiu 2006-7-28 ASP VBScript + Ja