Here's my variation which works with the HTML saved locally.
Dim IE As Object
Dim frm As Object

    Set IE = CreateObject("InternetExplorer.Application")
    
    With IE
        .Visible = True
        .navigate "C:\test\logintest.html"

        While .busy Or .readyState <> 4: DoEvents: Wend
        
        Set frm = .document.forms(0)
         ' use either Item or all.
        frm.Item("USER").Value = "UNAME"
        frm.all("PASSWORD").Value = "PWORD"
        frm.submit
        
        While .busy Or .readyState <> 4: DoEvents: Wend
        
    End With