Access Site By Loggin

Navigation
0

I am not able to access this site below because I can not find a way to enter the Login and password in VBA. Would anyone know how to access these fields  

link

I tried to access looking for frames, but still could not access

    
asked by anonymous 26.10.2017 / 20:48

1 answer

2

Try the following code: 

Private Sub AcessarSite()
    Dim driver As InternetExplorer
    Dim elem As HTMLBaseElement
    Dim url As String

    url = "https://www.newspace.com.br/pan/"

    Set driver = New InternetExplorer
    driver.Visible = True
    driver.Navigate url

 Set doc = driver.document.frames
 Set doc1 = doc.frames("Principal")

    doc1.document.getElementById("Usuario").innerText = "USUARIO CORRETO"
    doc1.document.getElementById("Senha").innerText = "SENHA CORRETA"
    doc1.document.getElementById("Ok").Click

    Set driver = Nothing
End Sub

I tested it here and it worked, the problem really was with the frames.

    
29.10.2017 / 19:31
Communication between two programs in PYTHON Height of row in bootstrap using percentage (%)