FuryCell Posted December 17, 2009 Posted December 17, 2009 MsgBox(0, "", _IsDown("www.google.com")) Func _IsDown($sURL) $Read = BinaryToString(InetRead("http://downforeveryoneorjustme.com/" & $sURL, 1)) Select Case StringInStr($Read, "looks down from here.") Return True ; Site is down Case StringInStr($Read, "is up.") Return False ; Site is up Case Else Return SetError(1, 0, True) ; Invalid data (maybe $sURL was invalid?) EndSelect EndFunc ;==>_IsDown HKTunes:Softpedia | GoogleCodeLyricToy:Softpedia | GoogleCodeRCTunes:Softpedia | GoogleCodeMichtaToolsProgrammer n. - An ingenious device that turns caffeine into code.
JohnOne Posted December 17, 2009 Posted December 17, 2009 Thats quite Ace Cheers AutoIt Absolute Beginners Require a serial Pause Script Video Tutorials by Morthawt ipify Monkey's are, like, natures humans.
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now