- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助] FolderBrowserDialog 植入目录树里面 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=28637)
-- 发布时间：2013/2/6 10:50:00
-- [求助] FolderBrowserDialog 植入目录树里面
Dim
dlg As New FolderBrowserDialogIf dlg.ShowDialog = DialogResult.Ok Then
MessageBox.Show("你选择的目录是：" & dlg.SelectedPath,"提示")
End If.
老师们,请问现在有没 例子
把 FolderBrowserDialog 生成目录树的形式 显示在 目录树里面 我想达到下边的效果.
就是不用进入 我的电脑 能够 在 foxtable 里面显示 全部文件内容.
此主题相关图片如下：未命名.jpg
-- 发布时间：2013/2/6 12:34:00
--
显示文件夹文件的话，可以使用webbrowser控件。
对于你说的目录树，需要自己去弄一个的没有现成的例子。
-- 发布时间：2013/2/6 13:21:00
--
老师 我的想法是 探测 下级子目录的 文件名 然后填入一个 临时表,在用临时表生成 目录树.
但 不知道 每个子目录 里面 又是否 还包含子目录!
该循环多少次 才能探到底部的 最后一个文件夹!
For Each dir As String In FileSys.GetDirectories("f:\\")
For Each dir1 As String In FileSys.GetDirectories(dir)
Dim dr As Row = Tables("路径表").AddNew()
dr("第一列") = dir1
Next
Next
Dim tr As WinForm.TreeView = e.Form.Controls("TreeView1")
tr.CreateTree("路径表","第一列")
请指教一下!
-- 发布时间：2013/2/6 13:26:00
--
可以用递归来做。你要做的是某个文件夹下的所有子文件夹么？
如果是，这个比较简单。
http://www.foxtable.com/help/topics/2416.htm
-- 发布时间：2013/2/6 13:33:00
--
是哦 我只是操作单文件夹的内容,
文件名 可以自定.
但看不懂 递归 如何递!
能 帮忙 写下 代码 么 老师
例如 我 要找生成 F:\\ 盘 的 目录树
-- 发布时间：2013/2/6 15:10:00
--
做了一个获取文件下所有目录的例子。如果文件夹较多的话，要等待的时间久较长。
你也可以做成动态。比如点了目录树某个节点以后，再去查询这个节点的目录，这样做比较好，楼主你先做一下。
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:文件目录树.table |
-- 发布时间：2013/2/6 16:40:00
--
动态的例子。
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:目录文件信息.table |