Ошибка выполнения 462 при попытке доступа к серверу https

Question

, поэтому я пытаюсь получить доступ к серверу https моей компании, чтобы загрузить некоторые файлы ... прямо сейчас он открывает страницу, но с тех пор он застревает в Do до IE .readystate = 4, выдавая ошибку 462 .

Я не понимаю, что я делаю не так

Option Explicit

Sub LogIn()
Dim IE As Object
Dim doc As Object
Dim frm As Object
Dim username As Object
Dim pwd As Object
Dim drop As Object
Dim strURL As String
Dim strUserName As String
Dim strPwd As String

    strURL = "https://plm.corp.int/enovia/emxLogin.jsp"

    strUserName = ""

    strPwd = ""

    Set IE = CreateObject("InternetExplorer.Application")

    IE.Visible = True

    IE.navigate strURL


    Do Until IE.readyState = 4
        DoEvents
    Loop

    Set doc = IE.document

    Set frm = doc.getElementById("loginForm")

    Set username = doc.getElementById("login_name")

    Set pwd = doc.getElementById("login_password")

    username.Value = strUserName

    pwd.Value = strPwd

    frm.submit

    Do While IE.Busy: DoEvents: Loop

    Do While IE.readyState <> 4: DoEvents: Loop

End Sub