主页 > 知识库 > ASP,FSO遍历目录及目录下文件

ASP,FSO遍历目录及目录下文件

热门标签:科大讯飞语音识别系统 银行业务 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,FSO遍历目录及目录下文件》,本文关键词  ;如发现本文内容存在版权问题,烦请提供相关信息告之我们,我们将及时沟通与处理。本站内容系统采集于网络,涉及言论、版权与本站无关。
  • 相关文章
  • 收缩
    • 微信客服
    • 微信二维码
    • 电话咨询

    • 400-1100-266