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 OnPostInfo() Dim strId As String = "" Dim strName As String = "domain\firstname.lastname" Try Dim encoding As New ASCIIEncoding() Dim postData As String = "userid=" & strId postData += ("&username=" & strName) Dim data As Byte() = encoding.GetBytes(postData) 'Prepare web request... Dim myRequest As HttpWebRequest = DirectCast(WebRequest.Create("https://subdomain.isp.yourcompany.com/owa/"), HttpWebRequest) myRequest.Method = "POST" myRequest.ContentType = "application/x-www-form-urlencoded" myRequest.ContentLength = data.Length Dim newStream As Stream = myRequest.GetRequestStream() ' Send the data. newStream.Write(data, 0, data.Length) newStream.Close() Catch ex As Exception End Try End Sub
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.