以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助] 点击目录树节点打开指定窗口,主表更换  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=64011)

--  作者:kwkvi
--  发布时间:2015/2/3 13:14:00
--  [求助] 点击目录树节点打开指定窗口,主表更换
提示:未将对象引用设置到对象的实例

想根据表的数据动态生成目录树,已做好,
然后根据点击的节点打开窗口,并更改主表
但是在点击节点是,总是调不了,卡在这里………………

MAIN 表
 编号 项目 主窗口    所属表  …………  
1001客户管理   客户管理    客户资料表   
1002订单管理   订单   订单资料      
 1003采购管理    采购下单 采购单资料   


NodeMouseClick 代码

Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
If e.Node.Name = "桌面" Then
    Forms("项目").Open()
    MainTable = Tables("MAIN")
Else
    Dim sd As DataRow = e.Node.DataRow
    Dim Frm As WinForm.Form
    Dim a As String
    Dim b As String
    a=sd("窗口")
    b=sd("所属表")
    Frm = Forms(a)
    Frm.Open()
    MainTable=Tables(b)
    \'Forms(e.Node.Text).Open()
    \'MainTable = Tables(e.Node.Text)
End If

--  作者:Bin
--  发布时间:2015/2/3 14:06:00
--  
目录树如果不是来自表的,是米有node.datarow 这个属性的.
--  作者:kwkvi
--  发布时间:2015/2/3 14:25:00
--  
我把窗口名跟表名改成一样了,这样可以打开,  
但是我还是想知道有没办法调
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理系统更改窗口表名 - 副本.zip

用MAIN表某一列的值做动态表达式,

--  作者:Bin
--  发布时间:2015/2/3 14:31:00
--  
不明白你的意思,

不过你的例子代码不太严谨,给你改了一下.
这样就不会报错了

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理系统.foxdb



--  作者:kwkvi
--  发布时间:2015/2/3 14:58:00
--  
谢谢,