如何禁止TWebBrowser执行脚本？

[lanshing]

在低版本的IE上执行用WebBrowser开发的软件老是提示“该网页中的脚本程序出错”－“不能在运行时设置属性”，而在高版本的IE机器上执行就没有这个问题。

请问：该怎样禁止 TWebbrowser执行脚本呢？

[heartache]

我有一个比较愚蠢的方法:

先是把html代码弄到,然后处理'<script' 和 '</script>'里的内容,全部去掉,然后把代码返回给webbrowser ,运行纯html代码

[freeas]

我用DHTML的对象方法，始终无法修改'<script' 和 '</script>'里的内容，能读出来，但是不能修改，提示'OLE error 800A0258'，代码如下，希望高手指点

if WebBrowser1.Document = nil then Exit;
tmenu := WebBrowser1.Document;
for k := 0 to tmenu.scripts.length - 1 do begin
Memo1.Lines.Clear;
Memo1.Lines.Add(tmenu.scripts.item(k).innerHTML); //这里已经确认读到了
ScriptTxt := Memo1.Lines.Text;
tmenu.scripts.item(k).innerHTML:=ScriptTxt ; //这里就出错了
end;

[lanshing]

up

[fenglic]

关注

[lanshing]

up

[lanshing]

怎么还是没有答案？没有人碰到这个问题吗？

[heartache]

突发灵感,这样就不执行<script>和</script>里的所有代码了

1.读取代码
2.寻找script开始的部分
3.在此代码前后插入'<!--'和'-->'

只是这样太过........

[lanshing]

楼上说的只能适用于浏览指定的文件，而不适于浏览指定URL。

[dancedog]

对IE进行设置。
应该有相应的API函数。但我确实不知。