Отправка формы авторизации просто обновляет страницу

Question

Я пытаюсь написать макрос для открытия и входа на веб-страницу для загрузки определенного набора данных c, однако я застрял при отправке данных для входа.

Кажется, что все работает, как задумано, страница открывается, детали появляются в соответствующих полях имени пользователя / пароля, но вместо того, чтобы подписывать меня на странице, просто обновляется до пустого. Не могу отойти от жизни, понять, что заставляет это произойти.

Это сайт - https://www.caredata.co.uk/login_register.cfm

Вот мой код -

Sub Opensite()
'open caredata URL and login
    Dim IEapp As Object, WebURL As String, HTMLdoc As HTMLDocument
        Set IEapp = CreateObject("InternetExplorer.Application")
        WebURL = "https://www.caredata.co.uk/login_register.cfm"
    With IEapp
        .silent = True
        .Visible = True
        .Navigate WebURL
        Do Until IEapp.readyState = 4
            DoEvents
        Loop
        Set HTMLdoc = IEapp.document
    End With
    With HTMLdoc.forms(0)
        .UserName.Value = "myusername"
        .Password.Value = "mypassword"
        .submit
    End With
End Sub

Answer 1

Исправил это сам, понятия не имею, как мне не удалось решить это изначально. Рабочий код -

   Sub Opensite()
    'open caredata URL and login
        Dim IEapp As Object, WebURL As String, HTMLdoc As HTMLDocument
            Set IEapp = CreateObject("InternetExplorer.Application")
            WebURL = "https://www.caredata.co.uk/customer_downloads.cfm"
        With IEapp
            .silent = True
            .Visible = True
            .Navigate WebURL
            Do Until IEapp.readyState = 4
                DoEvents
            Loop
            Set HTMLdoc = IEapp.document
        End With
        With HTMLdoc.forms(0)
            .UserName.Value = "username"
            .Password.Value = "password"
            .btn_signin.Click
        End With
        downloadfile IEapp, HTMLdoc
    End Sub