共享问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 共享问题

共有10860人关注过本帖树形打印复制链接主题：共享问题

狐狸爸爸

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：管理员帖子：47448 积分：251054 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2011/12/26 10:56:00 [显示全部帖子]

看这个：

http://www.foxtable.com/help/topics/0682.htm

狐狸爸爸

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：管理员帖子：47448 积分：251054 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2011/12/26 11:55:00 [显示全部帖子]

原理一样，用一个文本文件存放路径，然后：

Dim trv As WinForm.TreeView = e.Form.Controls("产品目录")
Dim Fl As String = e.ProjectPath & "tr.txt"
fl = FileSys.ReadAllText(fl)
trv.Load(fl & "产品目录.foxtr")

狐狸爸爸

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：管理员帖子：47448 积分：251054 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2011/12/26 22:15:00 [显示全部帖子]

其实已经够清楚了，关键是你有没有理解。

显示一下你合成的文件是什么：

Dim trv As WinForm.TreeView = e.Form.Controls("产品目录")
Dim Fl As String = e.ProjectPath & "tr.txt"
fl = FileSys.ReadAllText(fl)

Messagebox.show(fl)
trv.Load(fl & "产品目录.foxtr")

而且上面的代码何来删除文件之说？

[此贴子已经被作者于2011-12-26 22:15:40编辑过]

狐狸爸爸

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：管理员帖子：47448 积分：251054 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2011/12/26 22:36:00 [显示全部帖子]

Dim trv As WinForm.TreeView = e.Form.Controls("产品目录")
Dim Fl As String = e.ProjectPath & "tr.txt"
fl = FileSys.ReadAllText(fl,Encoding.Default)
Messagebox.show(fl)
trv.Load(fl & "产品目录.foxtr")

看看这个：
http://www.foxtable.com/help/topics/0344.htm

下一主题 >> << 上一主题

主题：共享问题