运行VBA脚本时,在IE中禁用Windows安全证书validationpopup窗口

我有一个VBA代码,访问指定的链接,并获取HTML文本的计算目的使用IE9。

每次访问链接时,都会popup窗口中的“确定”,提示确认安全证书。

我必须多次访问该链接,因此每次单击确定都很麻烦。 有没有办法自动做到这一点,而不是搞乱IE设置? 这里是一些代码:

Set obj = CreateObject("InternetExplorer.Application") obj.Visible = False tempURL = "https://......." obj.Navigate tempURL Application.Wait Now() + TimeValue("0:00:00") ' wait a few seconds Do While obj.Busy = True Application.Wait Now() + TimeValue("0:00:01") DoEvents Loop ' set the document Set item = obj.Document Application.Wait Now() + TimeValue("0:00:01") ' get the document text bodyHTML = item.body.innertext obj.Application.Quit 

bodyHTML是一个变体。

我需要它来自动接受证书。 只有一个证书可供select。 也许有一种方法来检测popup窗口是否存在,然后单击确定。

谢谢!