自動在證書上點擊是安全警告和Windows安全警告

我寫了一個VBA代碼，它將從Excel工作表的一列中輸入（url），並返回其http狀態代碼。我面對的問題是，有些網站正在出現證書問題，而有些網站則出現Windows安全警報。我想要一個簡單的解決方案，自動爲所有這些警報（如果有的話）點擊是，因爲這些站點是完全可信的。我附上了檢查狀態碼的代碼。自動在證書上點擊是安全警告和Windows安全警告

`'Takes input url as String and return the status(200 is up ,rest all are down) 

    Function urlCheck(url As String) As Integer 
    On Error GoTo error_help 
    Dim http: Set http = CreateObject("MSXML2.XMLHTTP") 
    http.Open "GET", url, False 
    http.Send 
    If (Not http.Status = 200) Then 
    urlCheck = http.Status 
    Else 
    urlCheck = http.Status 
    End If 
    error_help: 
    'MsgBox "error" 
    End Function

我已經嘗試Application.DisplayAlerts =假，這是行不通的

來源

2014-02-24 user3347935

它是我的經驗，你不能自動解僱一個消息框，只有防止他們根本彈出（在某些情況下）它會產生一個錯誤號碼？錯誤是否會捕獲它？如果是這樣，你可以嘗試'錯誤恢復下一步.'我不知道這是否會工作。那些錯誤出現在瀏覽器中，他們不？就像在瀏覽它們時一樣，我不知道是否可以在Excel應用程序中處理這些消息，因爲它們並不是真正來自它們的位置，它的瀏覽器檢測到安全性的東西並不是它？ – user1759942

@ user1759942我嘗試過下一次恢復，但是這並沒有解決問題。如果我嘗試通過瀏覽器瀏覽這些錯誤 - 那就是證書問題確實出現在點擊繼續。但是對於某些網站來說，沒有瀏覽器錯誤出現，它只是當我使用這個宏，我面臨着下面的錯誤_Windows安全警告 - 此頁正在訪問不受其控制的信息。這帶來了安全風險。你想繼續嗎？_我認爲這些網址會重定向到另一個不會導致瀏覽器錯誤的頁面。不過，我不希望這些警報！ – user3347935

因此，如果你在瀏覽器中導航到它們，它會產生錯誤，或者它不會給出錯誤？再次，我認爲這些是Excel以外的錯誤，並且不能在Excel中處理。我認爲他們需要通過在瀏覽器或其他地方更改安全設置在Windows中進行處理。 – user1759942

我認爲這個問題是在this後回答。

這是一個重複的帖子。

來源

2018-02-27 14:26:07

自動在證書上點擊是安全警告和Windows安全警告

回答

相關問題