400-1100-266

9:00-24:00（工作日）
主页 > 知识库 > asp遍历目录及子目录的函数

asp遍历目录及子目录的函数
热门标签：Linux服务器 团购网站 阿里云 科大讯飞语音识别系统 服务器配置 银行业务 电子围栏 Mysql连接数设置
%@ Language=vbscript %> 
% 
 '遍历目录以及目录下文件的函数 
%> 
% 
  Function Bianli(path) 
    Set Fso=server.createobject("scripting.filesystemobject")   

    On Error Resume Next 
    Set Objfolder=fso.getfolder(path) 

    Set Objsubfolders=objfolder.subfolders 

    For Each Objsubfolder In Objsubfolders 

      Nowpath=path + "\" + Objsubfolder.name 

      Response.write Nowpath 

      Set Objfiles=objsubfolder.files 

      For Each Objfile In Objfiles 
        Response.write "br>---" 
        Response.write Objfile.name 
      Next 
      Response.write "p>" 
      Bianli(nowpath)'递归 

    Next 
    Set Objfolder=nothing 
    Set Objsubfolders=nothing 
    Set Fso=nothing 
  End Function 
%> 
% 
  Bianli("D:") '遍历d:盘 
%>

标签：萍乡 枣庄 江苏 衡水 广元 衢州 蚌埠 大理

巨人网络通讯声明：本文标题《asp遍历目录及子目录的函数》，本文关键词  ；如发现本文内容存在版权问题，烦请提供相关信息告之我们，我们将及时沟通与处理。本站内容系统采集于网络，涉及言论、版权与本站无关。
  • 相关文章
  • 推荐文章

    上一篇：asp生成不需要数据库的中奖码

    下一篇：asp数据库连接rs(user.id)

     
    微信咨询办理
    在线QQ客服
    ( 客服小王 )
    ( 客服小李 )
    ( 客服小刘 )
    ( 客服小张 )
    关于我们 | 荣誉资质 | 呼叫中心 | 代理加盟 | 客户案例 | 服务支持 | 产品介绍 | 行业资讯

    Copyright © 1999-2012 诚信 合法 规范的巨人网络 www.1330.cn 始建于2005年

    全国网站建设网站开发咨询热线：400-1100-266   0514-86177077

    江苏扬州巨人网络科技有限公司   总部地址：江苏省扬州信息产业基地11号楼4层

    《增值电信业务经营许可证》苏B2-20120278    苏ICP备15040257号 网站地图
    全国咨询热线
    400-1100-266
    在线客服( QQ：340506921 )
    版权所有：巨人网络(扬州)科技有限公司——拥有网站建设十年经验，具备独立网站开发能力，能够提供完善的网站设计及相关的网站制作服务！     全国统一服务热线：400-1100-266
    收缩
    • 微信客服
    • 微信二维码

    • 电话咨询

    • 400-1100-266