haijie1223 发表于 2014-8-16 18:19:51

[已解决]如何用对象方法屏蔽网页Cookies的提示

本帖最后由 haijie1223 于 2014-8-18 19:34 编辑

用下面的代码运行时,XP下会有ie的安全提示,在NT6.0的系统上提示是否允许放置cookies。在xp下将IE的隐私设置等级为最低时没有提示。
提示分别如图:
可不可以用对象方法将这个提示屏蔽掉?
Dim $string = _
'<div id="body">test ' & @CRLF & _
'<div class="test">' & @CRLF & _
'<script type="text/javascript">var cpro_id = "u1634448";</script>' & @CRLF & _
'<script src="http://cpro.baidustatic.com/cpro/ui/c.js" type="text/javascript"></script>' & @CRLF & _
'</div>'
Dim $ohtml = ObjCreate("htmlfile")
With $ohtml
        .open()
        .write($string)
        .close()
        Dim $text = .getElementById("body").innerText
EndWith
$ohtml=Null
MsgBox(0,"",$text)

kevinch 发表于 2014-8-17 12:41:28

试一下$ohtml.designMode="on"

haijie1223 发表于 2014-8-18 19:34:11

回复 2# kevinch


    解决~谢谢。.silent()似乎没有效果~

xjlijia 发表于 2014-8-23 19:41:44

刚看到,受教了,谢谢。
页: [1]
查看完整版本: [已解决]如何用对象方法屏蔽网页Cookies的提示