gpt4 book ai didi

遍历目录以及目录下文件的函数

转载 作者:qq735679552 更新时间:2022-09-29 22:32:09 26 4
gpt4 key购买 nike

CFSDN坚持开源创造价值,我们致力于搭建一个资源共享平台,让每一个IT人在这里找到属于你的精彩世界.

这篇CFSDN的博客文章遍历目录以及目录下文件的函数由作者收集整理,如果你对这篇文章有兴趣,记得点赞哟.

  1. <%@ Language=VBScript%>  
  2. <%function bianli(path)  
  3. set fso=server.CreateObject("scripting.filesystemobject")  
  4.  
  5. on error resume next  
  6. set objFolder=fso.GetFolder(path)  
  7.  
  8. set objSubFolders=objFolder.Subfolders  
  9.  
  10. for each objSubFolder in objSubFolders  
  11.  
  12. nowpath=path + "\" + objSubFolder.name  
  13.  
  14. Response.Write nowpath  
  15.  
  16. set objFiles=objSubFolder.Files  
  17.  
  18. for each objFile in objFiles  
  19. Response.Write "<br>---"  
  20. Response.Write objFile.name  
  21. next  
  22. Response.Write "<p>"  
  23. bianli(nowpath)'递归  
  24.  
  25. next  
  26. set objFolder=nothing  
  27. set objSubFolders=nothing  
  28. set fso=nothing  
  29. end function  
  30. %>  
  31. <%  
  32. bianli("d:") '遍历d:盘  
  33. %>  

最后此篇关于遍历目录以及目录下文件的函数的文章就讲到这里了,如果你想了解更多关于遍历目录以及目录下文件的函数的内容请搜索CFSDN的文章或继续浏览相关文章,希望大家以后支持我的博客! 。

26 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com