以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  向string中添加字符  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=185064)

--  作者:ygg8310
--  发布时间:2023/2/2 14:45:00
--  向string中添加字符

For Each dir As String In filesys.GetDirectories("E:\\测试")\'

For Each dir2 As String In filesys.GetDirectories(dir)\'

For Each dir3 As String In filesys.GetFiles(dir & dir2)\'

这个为啥会出错呢?要怎么写才正确?


--  作者:有点蓝
--  发布时间:2023/2/2 14:52:00
--  
要做什么功能?
--  作者:ygg8310
--  发布时间:2023/2/2 14:53:00
--  
想要把dir和dir2的文件路径合并起来再由For Each file As String In filesys.GetFiles(dir & dir2)\'
一起提取

--  作者:有点蓝
--  发布时间:2023/2/2 15:00:00
--  
完全没有必要,dir2已经包含dir,学会调试就看的出来:http://www.foxtable.com/webhelp/topics/1485.htm
……
msgbox(dir2)

For Each dir3 As String In filesys.GetFiles(dir2)\'


--  作者:ygg8310
--  发布时间:2023/2/2 15:09:00
--  
是这样的,那个递归函数还是不会弄,然后打算用最原始的方法来提取文件夹中的文件,有很多很多的子文件夹,所以那个把所有文件夹名汇总到一个string里面的代码还得咨询一下
--  作者:有点蓝
--  发布时间:2023/2/2 15:14:00
--  
1楼只适合2层目录,每多一层子目录就得加一个for循环。除非限定了用户只能使用2层目录,否则这个代码只有坑

这里都已经给出了完整的逻辑和用法:http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=185014&skin=0

只需要把【文件的处理】这几个字改为自己的业务逻辑即可,有什么难的?

自己加了什么代码,什么地方有问题解决不了,不如把您改后的代码完整发出来给别人看看什么地方有问题?
[此贴子已经被作者于2023/2/2 15:14:48编辑过]