Down for everyone or just me is a website that can check whether your website is down or up.
Required components
Required components
- One Button
- One TextBox
Coding :
Add these codes to Button click_event & don't forget to add the namespace Imports System.Net.'Imports System.Net 'defining strin as a string & setting it to download strings from the website & the URL Dim strin As String = New WebClient().DownloadString(("http://downforeveryoneorjustme.com/" + TextBox1.Text)) 'checking string If strin.Contains("It's just you.") Then 'return MsgBox(TextBox1.Text + " is up", MessageBoxIcon.Information, MessageBoxButtons.OK) 'checking string ElseIf strin.Contains("It's not just you!") Then 'return MsgBox(TextBox1.Text + " is down", MessageBoxIcon.Information, MessageBoxButtons.OK) 'checking string ElseIf strin.Contains("Huh?") Then 'return MsgBox("Invalid website", MessageBoxIcon.Error, MessageBoxButtons.OK) End IfNow to check you can just enter the URL you want to check in TextBox and click on the Button you added.
Post a Comment
Note: Only a member of this blog may post a comment.