Foxtable(狐表)用户栏目专家坐堂 → 关于NAVbar的相关问题


  共有4677人关注过本帖树形打印复制链接

主题:关于NAVbar的相关问题

帅哥哟,离线,有人找我吗?
wealthwind
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:660 积分:3965 威望:0 精华:0 注册:2014/3/16 20:34:00
关于NAVbar的相关问题  发帖心情 Post By:2014/4/20 21:41:00 [显示全部帖子]

有两个问题,
第一:窗口中,我想达到,就是在下面个案申请表中,选中其中一行,然后按左边的打开按钮,可以在上面的WEBBROWER打开相关的HTML;(已经能实现,双击表能显示不同的HTML了,但我想用同一一个窗口的表,用打开按钮打开)
图片点击可在新窗口打开查看此主题相关图片如下:360截图20140420213636703.jpg
图片点击可在新窗口打开查看
第二:
以下代码不能显示,不同的CASE设置不同的高度
Dim split As WinForm.SplitContainer = e.Form.Controls("SplitContainer2")
Select e.Sender.SelectedPage.Name
    Case "个案提报"
        split.SplitterDistance = split.Height
    Case "文件查询"
        split.SplitterDistance = split.Height * 3 / 4
End Select


 回到顶部
帅哥哟,离线,有人找我吗?
wealthwind
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:660 积分:3965 威望:0 精华:0 注册:2014/3/16 20:34:00
  发帖心情 Post By:2014/4/20 21:43:00 [显示全部帖子]

例子~请帮我修改一下例子,谢谢
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.zip


 回到顶部
帅哥哟,离线,有人找我吗?
wealthwind
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:660 积分:3965 威望:0 精华:0 注册:2014/3/16 20:34:00
  发帖心情 Post By:2014/4/20 22:15:00 [显示全部帖子]

窗口”功能栏“作为主窗口;
第一:点击”个案申请“CASE,窗口右侧,显示上下两分区,上分区占4分3,下分区占4分1,上分区是”Kindeditor“的空白页,下分区是”个案申请“表;然后点击”个案申请“表的某一行,上分区的窗口就会显示相关的植入内容;
第二:点击”文件查询“CASE,窗口右侧,显示一个分区,页面是空白;随着目录树的选择可以显示不同内容;
[此贴子已经被作者于2014-4-20 22:16:06编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
wealthwind
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:660 积分:3965 威望:0 精华:0 注册:2014/3/16 20:34:00
  发帖心情 Post By:2014/4/20 22:20:00 [显示全部帖子]

有点甜老师,还差一点点

具体要求如下::
窗口”功能栏“作为主窗口;
第一:点击”个案申请“CASE,窗口右侧,显示上下两分区,上分区占4分3,下分区占4分1,上分区是”Kindeditor“的空白页,下分区是”个案申请“表;然后点击”个案申请“表的某一行,上分区的窗口就会显示相关的植入内容;
第二:点击”文件查询“CASE,窗口右侧,显示一个分区,页面是空白;随着目录树的选择可以显示不同内容;

 回到顶部
帅哥哟,离线,有人找我吗?
wealthwind
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:660 积分:3965 威望:0 精华:0 注册:2014/3/16 20:34:00
  发帖心情 Post By:2014/4/20 22:21:00 [显示全部帖子]

就是说,点那个CASE。原始显示都是空白页

 回到顶部
帅哥哟,离线,有人找我吗?
wealthwind
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:660 积分:3965 威望:0 精华:0 注册:2014/3/16 20:34:00
  发帖心情 Post By:2014/4/20 22:25:00 [显示全部帖子]

另外还有一个要求就是,能否将

Dim web As WinForm.WebBrowser = e.Form.Controls("WebBrowser1")
'web.OfficeToolBar = True
web.Address =  "http://qqzg.org/mysystem/editor/examples/default.html"
e.Form.Controls("TextBox1").text = Tables("个案申请").current("内容")
e.Form.TimerEnabled = True
e.Form.TimerInterval = 500

这段代码中web.Address =  "http://qqzg.org/mysystem/editor/examples/default.html"     的default.html换成,项目里面的路径,比如:PROJECTPATH & 个案申请\default.html.....
我尝试过很多次,但是都不成功,是否我的设置有错误,(个人认为是不是”web.Address“与 ”BRW .Address““,设置的差别)





 回到顶部
帅哥哟,离线,有人找我吗?
wealthwind
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:660 积分:3965 威望:0 精华:0 注册:2014/3/16 20:34:00
  发帖心情 Post By:2014/4/21 10:09:00 [显示全部帖子]

这个已经解决了,谢谢老师

 回到顶部
帅哥哟,离线,有人找我吗?
wealthwind
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:660 积分:3965 威望:0 精华:0 注册:2014/3/16 20:34:00
  发帖心情 Post By:2014/4/21 15:49:00 [显示全部帖子]

老师你的例子我看到了,就是我打开例子,点击“文件查询”后,然后在目录树中点击需要打开的文件,文件在WEBBROWER打开后,然后我点击“个案提报”WEBBROWER不会清空,而且,“打开”按钮也失效了。。

 回到顶部
帅哥哟,离线,有人找我吗?
wealthwind
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:660 积分:3965 威望:0 精华:0 注册:2014/3/16 20:34:00
  发帖心情 Post By:2014/4/21 15:50:00 [显示全部帖子]

老师你的例子我看到了,就是我打开例子,点击“文件查询”后,然后在目录树中点击需要打开的文件,文件在WEBBROWER打开后,然后我点击“个案提报”WEBBROWER不会清空,而且,“打开”按钮也失效了。。

 回到顶部
帅哥哟,离线,有人找我吗?
wealthwind
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:660 积分:3965 威望:0 精华:0 注册:2014/3/16 20:34:00
  发帖心情 Post By:2014/4/21 16:09:00 [显示全部帖子]

可以了,老师谢谢~~~~~

 回到顶部
总数 11 1 2 下一页