怎么忽视安全证书提示

如何忽视安全证书提示
想用VB的XMLHTTP登陆几百个网页，但是登陆时都会提示安全证书问题，因为每个网页的证书都不一样（颁发者一样），导入证书的方法没有用。有没有其他办法忽视这些提示，选择继续浏览网页。

------解决方案--------------------
改用winhttp如何？
.Option(6) =13056
忽略证书不安全提示。
------解决方案--------------------

Option Explicit

                                                                 


Function GetByWinHttp$(ByVal GetUrl$, ByVal Referer$, ByVal Cookie$)

    On Error Resume Next

    Dim XmlHttp As Object

    Set XmlHttp = CreateObject("WinHttp.WinHttpRequest.5.1")

    With XmlHttp

        .Option(4) = 13056

        .Open "GET", GetUrl, True

        .SetRequestHeader "Accept", "application/x-shockwave-flash, image/gif, image/jpeg, image/pjpeg, image/pjpeg, application/vnd.ms-powerpoint, application/vnd.ms-excel, application/msword, application/x-ms-application, application/x-ms-xbap, application/vnd.ms-xpsdocument, application/xaml+xml, */*"

        .SetRequestHeader "Accept-Language", "ko-KR,zh-cn;q=0.5"

        .SetRequestHeader "User-Agent", "Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 5.1; Trident/4.0; .NET CLR 2.0.50727; .NET CLR 3.0.04506.648; .NET CLR 3.5.21022; .NET4.0C; .NET4.0E)"

        If Referer <> "" Then .SetRequestHeader "Referer", Referer

        If Cookie <> "" Then .SetRequestHeader "Cookie", Cookie

        .SetRequestHeader "Connection", "Keep-Alive"