以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp) --  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2) ----  目录树打开网址  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=120891)

--  作者：yifan3429 --  发布时间：2018/6/25 20:48:00 --  目录树打开网址 目录树打开网址  下载信息  [文件大小：   下载次数： ] 点击浏览该文件:管理项目1.foxdb

--  作者：有点蓝 --  发布时间：2018/6/25 20:57:00 --   NodeMouseClick事件 If e.Node.Level = 1 Then     Dim dr As DataRow = DataTables("网页").Find("分类=\'" & e.Node.DataRow("分类") & "\' And 网站名称=\'" & e.Node.DataRow("网站名称") & "\'")     If dr IsNot Nothing Then         Dim web As WinForm.WebBrowser = e.Form.Controls("WebBrowser1")         web.Address = dr("网址")     End If End If

--  作者：yifan3429 --  发布时间：2018/6/25 21:32:00 --   [此贴子已经被作者于2018/6/25 21:33:13编辑过]

--  作者：有点蓝 --  发布时间：2018/6/25 21:36:00 --   上传实例说明 http://www.foxtable.com/webhelp/scr/1485.htm