Sw-Ags12
01-06-2018, 07:55 PM
Here is the site: https://bao.arcgis.com/esriBAO/login/index.html
Here is the code that I can't seem to figure out.:(
Sub BrowseToSiteToDoBusiness()
Dim IE As New SHDocVw.InternetExplorer
IE.Visible = True
IE.Navigate "bao.arcgis.com/esriBAO/login/index.html"
Do While IE.ReadyState <> READYSTATE_COMPLETE
Loop
IE.Document.forms("oauth").elements("user_username").UserName = "me"
End Sub
Here is the code that I can't seem to figure out.:(
Sub BrowseToSiteToDoBusiness()
Dim IE As New SHDocVw.InternetExplorer
IE.Visible = True
IE.Navigate "bao.arcgis.com/esriBAO/login/index.html"
Do While IE.ReadyState <> READYSTATE_COMPLETE
Loop
IE.Document.forms("oauth").elements("user_username").UserName = "me"
End Sub