以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 从目录树打开在网页浏览器浏览的问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=80027) |
|
-- 作者:douglas738888 -- 发布时间:2016/1/14 10:36:00 -- 从目录树打开在网页浏览器浏览的问题 请老师帮忙看看,想实现从后台数据形成目录树点击NODE在网页浏览器显示的问题,做了个复合的例子,但是没有实现 另外,还请老师再看看用网页浏览器显示.doc和.docx的只能实现一个显示的问题 看了帮助没有得到解决的思路,请老师指导指导,谢谢!!
|
|
-- 作者:Hyphen -- 发布时间:2016/1/14 11:36:00 -- AfterLoad事件改改 ........ For Each File As String In FileSys.Getfiles(dir) Dim f As String =file Dim ext As String ext = f.SubString(f.LastIndexof(".") ) \'获得文件后缀 f = f.Replace(dir & "\\","") Dim f2 = f.replace(ext,"") Page.Links.Add(f,f2,"1602.ico") Next ......... TopicLinkClick 事件 Dim brw As WinForm.WebBrowser = e.Form.Controls("WebBrowser1") brw.Address = ProjectPath & "Attachments\\公共文件\\" & e.Page.Name & "\\" & e.Link.Name e.Form.Controls("Label1").text = e.Page.Name & "》" & e.Link.Name |
|
-- 作者:Hyphen -- 发布时间:2016/1/14 11:45:00 -- http://www.foxtable.com/help/topics/2903.htm 重要提示: 1、如果执行上面代码的时候,没有在WebBrowser显示Word报表,而是在一个新的IE窗口显示,那么请双击Foxtable目录下的Office.reg文件,将其添加到注册表中。 |
|
-- 作者:douglas738888 -- 发布时间:2016/1/14 14:44:00 -- 谢谢老师指导,上述代码中brw.Address = ProjectPath & "Attachments\\公共文件\\" & e.Page.Name & "\\" & e.Link.Name 黄色部分多了 \\ ,去掉后TOPICBAR在WebBrowser的显示就正常了; 另外,老师,目录树在WebBrowser的显示没有实现,上述代码老师指导的代码主要在TopicBar在WebBrowser的显示
还有,在TOPICBAR点击文件的时候会闪屏,是什么原因?
[此贴子已经被作者于2016/1/14 14:48:45编辑过]
|
|
-- 作者:Hyphen -- 发布时间:2016/1/14 15:10:00 -- NodeMouseDoubleClick Dim brw As WinForm.WebBrowser = e.Form.Controls("WebBrowser1") brw.Address = ProjectPath & "Attachments\\公共文件\\招标文件\\" & e.Node.Text 加载word是这样的了,会闪屏
|
|
-- 作者:douglas738888 -- 发布时间:2016/1/14 15:19:00 -- 根据老师指导的代码还是不显示,是否是我在AfterSelectNode的代码有问题,这里的代码好像不相干吧 Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1") For Each Node As WinForm.TreeNode In trv.AllNodes If Node.Name <> e.Node.Name Then Node.Checked = True End If Next |
|
-- 作者:Hyphen -- 发布时间:2016/1/14 15:30:00 -- 我测试么有问题 |
|
-- 作者:douglas738888 -- 发布时间:2016/1/14 15:44:00 -- 老师,是否能麻烦您,把您在我“测试”上做的文件发给我,我下载来看看试试行吗? |
|
-- 作者:Hyphen -- 发布时间:2016/1/14 16:17:00 -- 俺现在用的版本比正式发布的版本高,发了也打不开 |
|
-- 作者:douglas738888 -- 发布时间:2016/1/14 17:10:00 -- 非常感谢老师,我发现自己的问题在哪里了,无用的代码写多了; 最后一个问题,老师 现在点击目录树的节点,第一个节点是日期不让这个节点点击的时候出现“无法显示此页”,要点击文件的时候才在WebBrowser显示内容。
|