以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]内部函数  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=112992)

--  作者:江南小镇
--  发布时间:2018/1/6 11:51:00
--  [求助]内部函数

Dim pth As String = args(0)
Dim nms As List(of String) = args(1)
For Each fl As String In filesys.GetFiles(pth)
    nms.add(fl)
Next
For Each dr As String In FileSys.GetDirectories(pth)
    nms.add(dr)
    Functions.Execute("listfile",dr,nms)
Next

 

老师,上面函数为什么为报出和本项目没有关系的错误,找不到报错的地方。


图片点击可在新窗口打开查看此主题相关图片如下:图像 1.png
图片点击可在新窗口打开查看

--  作者:有点蓝
--  发布时间:2018/1/6 12:02:00
--  
I盘是网络共享的映射?

不存在截图的这个路径,或者没有权限访问这个路径

--  作者:江南小镇
--  发布时间:2018/1/6 12:33:00
--  
我没有设置要访问这个路径的文件。现在找不到在哪个地方设置了要访问的这个路径。
--  作者:有点蓝
--  发布时间:2018/1/6 14:37:00
--  
这个函数不就是访问路径的吗?打开命令窗口,然后执行这个函数,看输出结果

Dim pth As String = args(0)
Dim nms As List(of String) = args(1)
For Each fl As String In filesys.GetFiles(pth)
Output.Show(fl)
    nms.add(fl)
Next
For Each dr As String In FileSys.GetDirectories(pth)
Output.Show(pth)
    nms.add(dr)
    Functions.Execute("listfile",dr,nms)
Next

--  作者:江南小镇
--  发布时间:2018/1/6 21:17:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:图像 1.png
图片点击可在新窗口打开查看

--  作者:江南小镇
--  发布时间:2018/1/6 22:07:00
--  
老师,搞好了。