Как ввести данные в форму браузера Chrome? - VB

Формулировка задачи:

Вот пример открытия адреса и ввода значений в форму на примере

Internet Explorer

                    Листинг программы
                
 
                        
                          
                    
Private Sub Form_Load()
   Set ie = CreateObject("InternetExplorer.Application")
   ie.Top = -1: ie.Left = -5: ie.Width = Screen.Width: ie.Height = Screen.Height
   ie.Visible = True
   ie.navigate ("webmail.sweb.ru")
    
   Do Until ie.ReadyState = 4
       DoEvents  'ждём когда завершится загрузка и будет активна кнопка "Обновить"
   Loop
  
   ie.document.getelementbyID("login").Value = "removed@mail.ru"
   ie.document.getelementbyID("pass").Value = "MyPassword"
'   ie.document.getelementbyID("quick_login_button").Click
End Sub

Как тоже самое сделать в браузере

Chrome

? И как нажать на кнопку, если для неё не назначен ID в HTML-коде страницы?

Решение задачи: «Как ввести данные в форму браузера Chrome?»

textual
                            Листинг программы 
                        
 
                        
                          
                    
  Dim xml As MSXML2.ServerXMLHTTP:  Set xml = New MSXML2.ServerXMLHTTP
  With xml
    data='тут формируете передаваемую строку POST значений со своими логин-пароль
    .Open "POST", url, False
    .setRequestHeader "Accept", "text/html"
    .setRequestHeader "Accept-Charset", "windows-1251"
    .setRequestHeader "Keep-Alive", "300"
    .setRequestHeader "Connection", "keep-alive"
    .setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
    .send data
  End With
    html=xml.responseText' тут исходный код страницы будет