\t\t执行网页中的函数

获取网页中变量的值

例如：htm中<script> var currIDS=123</script>      程序中可以这样调用 id := Form1.WebBrowser1.OleObject.Document.script.currIDS      备注：变量可以是javascript定义的,也可以是vbscript定义的,如果Webbrowser1中找不到该变量,调用会触发一个异常事件,即变量currIDS不存在。

执行网页中的函数

tmpf := 'currID = getNextID(currID)'+#13#10;      Form1.WebBrowser1.OleObject.Document.parentWindow.execScript(tmpf,'JavaScript');      调用函数的方法就是execScript接口,同样,如果函数不存在,或者运行错误也会触发脚本错误异常