Helpful to verify reports of your own downtime, or to double check a downed website you are trying to access.
One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.
Private Sub Command0_Click() With CreateObject("InternetExplorer.Application") .Navigate "http://www.login.com/Ext_Login.aspx" Do Until .ReadyState = 4 DoEvents Loop DoEvents With .Document Document.items("frmLogin$UserName") = "username" .items("frmLogin$Password") = "12345" .items("frmLogin$LoginButton").submit End With End With End Sub
Document.items("frmLogin$UserName") = "username"
Add your voice to the tech community where 5M+ people just like you are talking about what matters.