spyrorocks Posted May 27, 2006 Posted May 27, 2006 Could someone please show me how you can tell if a computer has an internet connection? Please. Im kinda stupid right now and have already searched the forums. [center] My Projects: Online AutoIt Compiler - AutoForum - AutoGuestbook - AutoIt Web-based Auto Installer - Pure AutoIt Zipping Functions - ConfuseGen - MindReader - P2PChat[/center]
bucky002 Posted May 27, 2006 Posted May 27, 2006 Here's a thread on it with a LAN. Sorry if it doesn't help.http://www.autoitscript.com/forum/index.php?showtopic=26686
Simucal Posted May 27, 2006 Posted May 27, 2006 ; Test for active Internet connection with Ping Dim $InetActive = Ping("www.google.com") If Not $InetActive > 0 Then MsgBox(4112, "Connection Not Found!", "You must be connected to the Internet" & @CRLF & "to use this program") Exit EndIf AutoIt Scripts:Aimbot: Proof of Concept - PixelSearching Aimbot with several search/autoshoot/lock-on techniques.Sliding Toolbar - Add a nice Sliding Toolbar to your next script. Click the link to see an animation of it in action!FontInfo UDF - Get list of system fonts, or search to see if a particular font is installed.Get Extended Property UDF - Retrieve a files extended properties (e.g., video/image dimensions, file version, bitrate of song/video, etc)
mr.underperson Posted May 27, 2006 Posted May 27, 2006 And as an added bonus, that particular Ping will also test if your DNS server is working. -mu
Valuater Posted May 27, 2006 Posted May 27, 2006 And as an added bonus, that particular Ping will also test if your DNS server is working. -mu i did it like this $var = Ping("www.AutoIt-ITS.com", 4000) If $var Then MsgBox(64, "OK", "No Problem ", 3) Else If @error = 0 Then $problem = "Network Errors Occured " & @error If @error = 1 Then $problem = "Host is Off-Line " & @error If @error = 2 Then $problem = "Host is Unreachable " & @error If @error = 3 Then $problem = "Incorect Destination " & @error If @error = 4 Then $problem = "Network Errors Occured " & @error MsgBox(64, "Problem", $problem & " ", 3) EndIf 8)
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