以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 有几个问题请教一下 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=144751) |
||||
-- 作者:BG小白 -- 发布时间:2019/12/28 17:11:00 -- 有几个问题请教一下 我是一个初学者,而且之前没有接触过这些代码编程,所以在看帮助文件的时候很多东西记不住,所以想着按照自己的办法整理出来一份帮助文件,这样便于自己查询,学习,在论坛上找到一个类似的一个程序,但是安装后老是报错,所以就模仿着做了一个,但是有几个问题解决不掉 问题1:这里原来是外部数据源,可以正常显示,现在改到内部数据源就不显示了 问题2:这里我点保存的时候,无法保存两个html到对应的列,并且会错行,点问题1那里统计的时候也不能显示出来 问题3:点击打开网址这个按键,不能独立窗口打开网页 问题4:除了导出和导入,其余按键我按照文档输入都不对 问题5:我关闭项目的时候老是提示错误。
麻烦哪位老师教我一下,如何修改能正常,谢谢
|
||||
-- 作者:BG小白 -- 发布时间:2019/12/29 9:57:00 -- 有人帮我看下吗? |
||||
-- 作者:BG小白 -- 发布时间:2019/12/29 16:43:00 -- 顶一下 |
||||
-- 作者:wei0769 -- 发布时间:2019/12/29 16:46:00 -- 顶一下 |
||||
-- 作者:有点蓝 -- 发布时间:2019/12/29 20:31:00 -- 1、没有看到有根据内部数据源的表格生成目录树的代码,用法可以参考:http://www.foxtable.com/webhelp/topics/0893.htm 2、保存按钮只看见保存了一个html。再说使用了2个浏览器控件,必须要定义2个ObjectForScriptingHelper变量来绑定不同的浏览器控件 3、打开按钮这个代码只是给浏览器控件设置了地址,和打开窗口没有任何关系,打开窗口的用法参考:http://www.foxtable.com/webhelp/topics/0708.htm,或者看导航窗口狐表论坛按钮代码 4、比如新增按钮 For Each cl As Col In Tables("hbdmcx").cols Select Case cl.name Case "标题","内容","网址","明细" End Select If r.isnull(cl.name) Then msgbox(cl.name & "有空值") Return End If Next 改为 For Each cl As Col In Tables("hbdmcx").cols Select Case cl.name Case "标题","内容","网址","明细" If r.isnull(cl.name) Then msgbox(cl.name & "有空值") Return End If End Select Next 5、把导航窗口改为模式窗口 最后,这种把窗口嵌入其它窗口的用法,是不受官方的支持的。 |
||||
-- 作者:BG小白 -- 发布时间:2019/12/30 22:45:00 -- 蓝老师,其余问题已经研究明白了,就是这个第二项搞不明白,能具体指点下吗?或者有实例吗? 2、保存按钮只看见保存了一个html。再说使用了2个浏览器控件,必须要定义2个ObjectForScriptingHelper变量来绑定不同的浏览器控件
|
||||
-- 作者:BG小白 -- 发布时间:2019/12/30 22:54:00 -- html现在是可以保存一个列,但是会错行,这个变量我是直接搞不明白 |
||||
-- 作者:有点蓝 -- 发布时间:2019/12/30 22:55:00 -- 全局代码: Public EditorHelper1 As ObjectForScriptingHelper Public EditorHelper2 As ObjectForScriptingHelper 参考窗口afterload的用法,EditorHelper1变量初始化后绑定一个浏览器,EditorHelper2绑定另外一个浏览器 EditorHelper1 = new ObjectForScriptingHelper webBrowser1.ObjectForScripting = EditorHelper EditorHelper2 = new ObjectForScriptingHelper webBrowser2.ObjectForScripting = EditorHelper |