源码网商城，靠谱的源码在线交易网站 我的订单 购物车 帮助

源码网商城

申请开店
全部源码分类
首页 源码街 任务需求 版权中心 备案服务 商家入驻

如何遍历目录及目录下的文件？

  • 时间：2021-10-15 05:33 编辑： 来源： 阅读：
  • 扫一扫，手机访问
摘要：如何遍历目录及目录下的文件？
<%@ 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("f:")

' 遍历F盘. %>

  • 全部评论(0)
上一篇：如何计算出当前日期属于定义时间段内的第几星期？
下一篇：如何实现全文检索？
关于我们 | 广告合作 | 联系我们 | 隐私条款 | 免责声明 | 网站地图

苏ICP备2024110244号-2      苏公网安备32050702011978号      增值电信业务经营许可证编号：苏B2-20251499   |  Copyright 2018 - 2025   源码网商城 (www.ymwmall.com) 版权所有

联系客服
客服电话：
400-000-3129
微信版

扫一扫进微信版
返回顶部