易语言超文本浏览框和程序交互源码

利用超文本浏览框的即将跳转事件作为中转，就可以获得从网页上点击后要跳转的地址，这个地址将作为exe要执行什么操作的指令。

利用javascript:协议，可以让超文本浏览框直接执行js脚本。

本例程只做抛砖之用，高手飘过。。。。。。

部分代码：

.版本 2
.支持库 HtmlView

.程序集 窗口程序集_演示窗口

.子程序 _超文本浏览框1_即将跳转, 逻辑型

.判断开始 (超文本浏览框1.地址 ＝ “about:test”)
    测试交互子程序test (超文本浏览框1.地址)
    输出调试文本 (“不允许跳转”)
    返回 (假)
.默认

.判断结束
输出调试文本 (“允许跳转”)
返回 (真)

.子程序 _按钮1_被单击

超文本浏览框1.地址 ＝ “about:<A href='about:test'>点击--〉网页执行对应EXE的子程序</a>”

.子程序 测试交互子程序test
.参数 参数文本, 文本型

信息框 (参数文本, 0, “由网页控件触发本消息框”, )

.子程序 _按钮2_被单击

超文本浏览框1.地址 ＝ “javascript:alert('hello world!\n这是由exe按钮触发的JS消息框')”

@易语言源码分享站