Check which ports are open to the outside world. Helps make sure that your firewall rules are working as intended.
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"