Sign in to follow this  
Followers 0
Achilles

Nice simple internet checker

27 posts in this topic

Hey I made this 'cause my internet keeps going on and off and I decided to make a program to tell me when it's on or off. I have one question about it though: How could I stop it from saying internet access is disabled when the user is just using all their connection. For example I was downloading a video and opening a couple windows at the same time and it said the internet connection was disabled.

$ping = Ping("www.google.ca")
If $ping > 0 then 
    $internet = True 
    Msgbox(64, "Internet connection active!", "You internet connection is enabled...")
Else 
    $internet = False 
    Msgbox(16, "Internet connection failure!", "You internet connection is disabled...")
EndIf 

While 1 
    $ping = Ping("www.google.ca")
    If $ping = 0 and $internet = True then 
        Msgbox(16, "Internet connection failure!", "You internet connection is disabled...")
        $internet = False 
    ElseIf $ping > 0 and $internet = False Then
        Msgbox(64, "Internet connection active!", "You internet connection is enabled...")
        $internet = True
    EndIf 
    Sleep(1000)
Wend

Simple but useful (at least for me)


My Programs[list][*]Knight Media Player[*]Multiple Desktops[*]Daily Comics[*]Journal[/list]

Share this post


Link to post
Share on other sites



@piano_man: I like your idea! (I have the same problem) :whistle:

@googemyster: I like your solution :)

Try this one... (based on your code)

$state=-1
While 1
    If _IsCon()<>$state Then
        If _IsCon()=0 Then
            TrayTip("Internet Connection","Disconnected",2,2)
            $state=0
        Else
            TrayTip("Internet Connection","Connected",2,1)
            $state=1
        EndIf
        
    Else
    EndIf
WEnd

Func _IsCon()
    $IsCon=DllCall("WinInet.dll","int","InternetGetConnectedState","int_ptr",0,"int",0)
    Return $iscon[0]
EndFunc

Share this post


Link to post
Share on other sites

InternetGetConnectedState is not as reliable (even documented as such in MSDN) as you guys may think.


Common sense plays a role in the basics of understanding AutoIt... If you're lacking in that, do us all a favor, and step away from the computer.

Share this post


Link to post
Share on other sites

InternetGetConnectedState is not as reliable (even documented as such in MSDN) as you guys may think.

Under what circumstances will it give incorrect information?

Share this post


Link to post
Share on other sites

#5 ·  Posted (edited)

Under what circumstances will it give incorrect information?

A return value of TRUE from InternetGetConnectedState indicates that at least one connection to the Internet is available. It does not guarantee that a connection to a specific host can be established. Applications should always check for errors returned from API calls that connect to a server. InternetCheckConnection can be called to determine if a connection to a specific destination can be established.

Edit:

I will state however, that I've seen InternetCheckConnection fail as well.

Edited by SmOke_N

Common sense plays a role in the basics of understanding AutoIt... If you're lacking in that, do us all a favor, and step away from the computer.

Share this post


Link to post
Share on other sites

I make this little script for check my home internet connection.

I use from many time and work very good in XP and also dont take many resource when run...

In INI file i put setup ping time and site to check for ping. Also i use 2 audio file for message.. one beep and one vocal for time out.If time out script retry connection aftr 5 second, if OK reset to 1 minut check ping and make beep, if not make vocal sound "TIME OUT". In ini file set also timeout limit in seconds for check connection.

Program have only little windows and possible start or stop. No buttons or other display for make script very fast .... and avoid use many resource XP.

Sorry for my english but i dont speak english.

Edgar from Bangkok.

:whistle:

---------------------

; ----------------------------------------------------------------------------

;

; AutoIt Version: 3.1.0

; Author: Edgar 08/06/2549

; enanched version only for retry ping if failed

; Script Function:

; ping servers at regular intervals and check servers alive

; setup in .INI file

;

; ----------------------------------------------------------------------------

#include <GUIConstants.au3>

; init vars

; local IP vars

dim $local_ip_address=""

dim $local_timeout_delay=""

dim $local_loop_delay=""

dim $online__sound_file=""

dim $offline_sond_file=""

dim $volume_sound_file=0

dim $num_of_ping = 0 ; index count number of command ping send

dim $timer_interval = 0 ; interval time for timer

dim $resultping = 0 ; pointer to message box

dim $exit = 0 ; pointer to button exit

dim $resultping = 0 ; pointer to message result ping

; read .ini file about values config and fill values into var

$local_ip_address = IniRead("ping.ini", "local_ip_config", "ip_address", "NotFound")

$local_timeout_delay = IniRead("ping.ini", "local_ip_config", "timeout_delay", "NotFound")

$local_loop_delay = IniRead("ping.ini", "local_ip_config", "loop_delay", "NotFound")

$online__sound_file = IniRead("ping.ini", "audio_config", "online_sound_file", "NotFound")

$offline_sond_file = IniRead("ping.ini", "audio_config", "offline_sound_file", "NotFound")

$volume_sound_file = IniRead("ping.ini", "audio_config", "volume_sound_file", "NotFound")

$begin = TimerInit()

SoundSetWaveVolume($volume_sound_file)

; == GUI generated with Koda ==

$Form1 = GUICreate("PING SERVER UTILITY 0.01 by EVS", 301, 124, 239, 140)

$exit = GUICtrlCreateButton("STOP PING", 192, 72, 97, 49)

$localIP = GUICtrlCreateInput("localIP", 8, 8, 145, 28, $ES_CENTER, $WS_EX_CLIENTEDGE)

GUICtrlSetFont(-1, 12, 800, 0, "MS Sans Serif")

GUICtrlSetBkColor(-1, 0xC0DCC0)

GUICtrlSetState(-1, $GUI_DISABLE)

GUICtrlCreateLabel("IP address", 56, 40, 54, 17)

$Input1 = GUICtrlCreateInput("intervaltime", 184, 8, 89, 28, $ES_CENTER, $WS_EX_CLIENTEDGE)

GUICtrlSetFont(-1, 12, 800, 0, "MS Sans Serif")

GUICtrlSetBkColor(-1, 0xC0DCC0)

GUICtrlSetState(-1, $GUI_DISABLE)

GUICtrlCreateLabel("m s Interval 2 ping", 184, 40, 90, 17)

GUISetState(@SW_SHOW)

GUICtrlSetData($localIP,$local_ip_address, "")

GUICtrlSetData($Input1,$local_loop_delay, "")

$timer_interval = 1 ; set time timer to 1 the first time run for enable ping at start program

While 1

$msg = GuiGetMsg()

Select

Case $msg = $GUI_EVENT_CLOSE

ExitLoop

Case $msg = $exit

ExitLoop

Case Else

;after interval from 2 ping pakets elapsed *****************

If TimerDiff($begin) >= $timer_interval Then

$pingerror = Ping($local_ip_address,$local_timeout_delay)

If @error = 0 Then ; if no error ........

SoundPlay($online__sound_file) ; sound

$timer_interval = $local_loop_delay ; set timer to local time delay from ini file

Else ; if error print error ping number

SoundPlay($offline_sond_file) ; sound when error

$timer_interval = 5000 ; set new loop retry ping at 5 sec.delay

EndIf

$begin = TimerInit()

EndIf

;************************************************************

EndSelect

WEnd

Exit

----------------------------

and ini file PING.INI

############################################################

#/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\#

#\ PING MONITOR STANDARD VERSION /#

#/ by EVS 23/6/2549 (2006) \#

#\ Lines starting with # will be treated as comments /#

#\ lite version without menu /#

#\ readme.txt for more instructions /#

#\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/#

############################################################

[local_ip_config]

# ip address server to ping

ip_address=10.0.0.254

# timeout ping (in milliseconds)

timeout_delay= 500

# time loop delay before another ping (in milliseconds)

loop_delay=59000

# time loop delay before another ping if ping timeout server ERROR (in milliseconds)

retry_if_error=5000

[audio_config]

offline_sound_file="offline.wav"

online_sound_file="beep.wav"

# volume sound in %

volume_sound_file=50

Share this post


Link to post
Share on other sites

sorry

i never use this forum

tag

; ----------------------------------------------------------------------------
;
; AutoIt Version: 3.1.0
; Author:         Edgar Virgus 08/06/2549
; enanched version only for retry ping if failed
; Script Function:
; ping servers at regular intervals and check servers alive
;
; ----------------------------------------------------------------------------




#include <GUIConstants.au3>
#include <Constants.au3>
; init vars

; local IP vars



dim $local_ip_address=""
dim $local_timeout_delay=""
dim $local_loop_delay=""
dim $retry_if_error=""

dim $online__sound_file=""
dim $offline_sond_file=""
dim $volume_sound_file=0

dim $num_of_ping = 0 ; index count number of command ping send
dim $timer_interval = 0  ; interval time for timer 



; read .ini file about values config and fill values into var 

$local_ip_address = IniRead("ping.ini", "local_ip_config", "ip_address", "NotFound")
$local_timeout_delay = IniRead("ping.ini", "local_ip_config", "timeout_delay", "NotFound")
$local_loop_delay = IniRead("ping.ini", "local_ip_config", "loop_delay", "NotFound")
$retry_if_error = IniRead("ping.ini", "local_ip_config", "retry_if_error", "NotFound")

$online__sound_file = IniRead("ping.ini", "audio_config", "online_sound_file", "NotFound")
$offline_sond_file = IniRead("ping.ini", "audio_config", "offline_sound_file", "NotFound")
$volume_sound_file = IniRead("ping.ini", "audio_config", "volume_sound_file", "NotFound")



$begin = TimerInit()
SoundSetWaveVolume($volume_sound_file)


; == GUI generated with Koda ==
$Form1 = GUICreate("PING SERVER UTILITY 0.01 by EVS", 284, 34, 239, 140)
GUICtrlCreateLabel("See/Modify ping.ini file for setup", 32, 8, 228, 20)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
GUISetState(@SW_SHOW)



$timer_interval = 1  ; set time timer to 1 the first time run for enable ping at start program 


GUISetState(@SW_MINIMIZE)

While 1
    $msg = GuiGetMsg()
    
   Select
    Case $msg = $GUI_EVENT_CLOSE
        ExitLoop
        
    Case Else
        ;after interval from 2 ping pakets elapsed *****************
    If TimerDiff($begin) >= $timer_interval Then
        

            $pingerror = Ping($local_ip_address,$local_timeout_delay)
                
            
        
        If @error = 0 Then ; if no error ........
                        
            SoundPlay($online__sound_file) ; sound
            $timer_interval = $local_loop_delay  ; set timer to local time delay from ini file
                        
                    
        Else ; if error ping number
                        
            SoundPlay($offline_sond_file) ; sound when error
            $timer_interval = $retry_if_error  ; set new loop retry ping at retry error value sec.delay
                        
        EndIf
        
        
        $begin = TimerInit()
     EndIf  
    ;************************************************************
    
  EndSelect
 
WEnd

Exit

oÝ÷ Ù©Ý~â'â殶­s` ¢222222222222222222222222222222222222222222222222222222222220¢2òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²0¢2b3#²ärÔôäDõ"5DäD$BdU%4ôâò0¢2ò'Ue2#2óbó#SC#bb3#²0¢2b3#²ÆæW27F'FærvF2vÆÂ&RG&VFVB26öÖÖVçG2ò0¢2b3#²ÆFRfW'6öâvF÷WBÖVçRò0¢2b3#²&VFÖRçGBf÷"Ö÷&Rç7G'V7Föç2ò0¢2b3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²òb3#²ò0¢222222222222222222222222222222222222222222222222222222222220  ¥¶Æö6Åöö6öæfuТ2FG&W726W'fW"Fòæp¦öFG&W73Óããã#S@¢2FÖV÷WBærâÖÆÆ6V6öæG2§FÖV÷WEöFVÆÒS¢2FÖRÆö÷FVÆ&Vf÷&Ræ÷FW"ærâÖÆÆ6V6öæG2¦Æö÷öFVÆÓS¢2FÖRÆö÷FVÆ&Vf÷&Ræ÷FW"ærbærFÖV÷WB6W'fW"U%$õ"âÖÆÆ6V6öæG2§&WG'öeöW'&÷#ÓS ¥¶VFõö6öæfuЦöffÆæU÷6÷VæEöfÆSÒgV÷C¶öffÆæRçvbgV÷C°¦öæÆæU÷6÷VæEöfÆSÒgV÷C¶&VWçvbgV÷C°¢2föÇVÖR6÷VæBâP§föÇVÖU÷6÷VæEöfÆSÓS

You need youse also 2 wav files ... with sound or voice used from script... offline_sound_file="offline.wav"

online_sound_file="beep.wav" , names this files is set in INI file.

Edgar

Share this post


Link to post
Share on other sites

Try this will work better

$IsCon=DllCall("WinInet.dll","int","InternetGetConnectedState","int_ptr",0,"int",0)
If $IsCon[0]=0 Then
    MsgBox(0, "NO CONNECTION", "Please Connect To The Internet Before Continuing")
endif
exit
Is it possible to make it ping a web site and then tell me if it is connected or not? All this does it tell me if my network card is on/off/connected to a cable. It doesn't mean I'm on the internet just because I have a local network connection. Thank you.

Share this post


Link to post
Share on other sites

Is it possible to make it ping a web site and then tell me if it is connected or not? All this does it tell me if my network card is on/off/connected to a cable. It doesn't mean I'm on the internet just because I have a local network connection. Thank you.

:) Um... The very first post of this thread does exactly what you are asking here :whistle:

Common sense plays a role in the basics of understanding AutoIt... If you're lacking in that, do us all a favor, and step away from the computer.

Share this post


Link to post
Share on other sites

Hi to all!

These functions are provided by amel27, and they work wery good for me:

$oMyError = ObjEvent("AutoIt.Error","MyErrFunc")

If IsNotConnect() Then
    MsgBox(16, "Error", "Please check your connection to the Internet" & @CR & @CR & $oMyError.description)
    Exit
EndIf


Func IsNotConnect()
    Local $oHTTP=ObjCreate("winhttp.winhttprequest.5.1")
    $oHTTP.Open("GET","http://www.google.com")
    $oHTTP.Send()

    Return @error
EndFunc

;Function - Error detecter
Func MyErrFunc()
    Dim $oMyError
    Select
        Case $oMyError.source = "WinHttp.WinHttpRequest"
            SetError(1)
        Case Else
            Return $oMyError.description
    EndSelect
Endfunc

 

Spoiler

Using OS: Win 7 Professional, Using AutoIt Ver(s): 3.3.6.1 / 3.3.8.1

AutoIt_Rus_Community.png AutoIt Russian Community

My Work...

Spoiler

AutoIt_Icon_small.pngProjects: ATT - Application Translate Tool {new}| BlockIt - Block files & folders {new}| SIP - Selected Image Preview {new}| SISCABMAN - SciTE Abbreviations Manager {new}| AutoIt Path Switcher | AutoIt Menu for Opera! | YouTube Download Center! | Desktop Icons Restorator | Math Tasks | KeyBoard & Mouse Cleaner | CaptureIt - Capture Images Utility | CheckFileSize Program

AutoIt_Icon_small.pngUDFs: OnAutoItErrorRegister - Handle AutoIt critical errors {new}| AutoIt Syntax Highlight {new}| Opera Library! | Winamp Library | GetFolderToMenu | Custom_InputBox()! | _FileRun UDF | _CheckInput() UDF | _GUIInputSetOnlyNumbers() UDF | _FileGetValidName() UDF | _GUICtrlCreateRadioCBox UDF | _GuiCreateGrid() | _PathSplitByRegExp() | _GUICtrlListView_MoveItems - UDF | GUICtrlSetOnHover_UDF! | _ControlTab UDF! | _MouseSetOnEvent() UDF! | _ProcessListEx - UDF | GUICtrl_SetResizing - UDF! | Mod. for _IniString UDFs | _StringStripChars UDF | _ColorIsDarkShade UDF | _ColorConvertValue UDF | _GUICtrlTab_CoverBackground | CUI_App_UDF | _IncludeScripts UDF | _AutoIt3ExecuteCode | _DragList UDF | Mod. for _ListView_Progress | _ListView_SysLink | _GenerateRandomNumbers | _BlockInputEx | _IsPressedEx | OnAutoItExit Handler | _GUICtrlCreateTFLabel UDF | WinControlSetEvent UDF | Mod. for _DirGetSizeEx UDF
 
AutoIt_Icon_small.pngExamples: 
ScreenSaver Demo - Matrix included | Gui Drag Without pause the script | _WinAttach()! | Turn Off/On Monitor | ComboBox Handler Example | Mod. for "Thinking Box" | Cool "About" Box | TasksBar Imitation Demo

Like the Projects/UDFs/Examples? Please rate the topic (up-right corner of the post header: Rating AutoIt_Rating.gif)

* === My topics === *

==================================================
My_Userbar.gif
==================================================

 

 

 

AutoIt is simple, subtle, elegant. © AutoIt Team

Share this post


Link to post
Share on other sites

#12 ·  Posted (edited)

I got it working ok, my script is below:

CODE

; Check internet connection

PingChk ()

Func PingChk ()

RunWait(@ComSpec & " /c " & 'ping www.google.com -n 1 >> C:\Temp.txt', "", @SW_HIDE)

$file = FileRead("C:\Temp.txt", FileGetSize("C:\Temp.txt"))

If $file = -1 Then

MsgBox(0, "Error", "Unable to open file.")

Else

$find = StringInStr( $file, "Ping request could not find host www.google.com")

If $find <> 0 Then

Msgbox(0,"NOT CONNECTED", "Please connect your computer to the Internet")

FileDelete("C:\Temp.txt")

Exit

EndIf

EndIf

FileDelete("C:\Temp.txt")

EndFunc

I didn't need it to tell me if I am connected, just if I am not.

Edited by saldous

Share this post


Link to post
Share on other sites

Personally I do not like the solution using "ping" because I have noticed that in my connection sometimes if I do ping to a server this fails giving me "timeout" error, but if I open a Web with the browser this is connected... This is really strange?

I preffer MsCreatoR's solution...

Ed

Share this post


Link to post
Share on other sites

Ed_Maximized

Hi,

preffer MsCreatoR's solution.

It's like i sad:

These functions are provided by amel27

So this is not my solution :whistle:

P.S

If you ask me, thoese functions are must be as built-in UDF's in next autoit versions, couse such function as cheking the internet connection is neccesary for many scripters.


 

Spoiler

Using OS: Win 7 Professional, Using AutoIt Ver(s): 3.3.6.1 / 3.3.8.1

AutoIt_Rus_Community.png AutoIt Russian Community

My Work...

Spoiler

AutoIt_Icon_small.pngProjects: ATT - Application Translate Tool {new}| BlockIt - Block files & folders {new}| SIP - Selected Image Preview {new}| SISCABMAN - SciTE Abbreviations Manager {new}| AutoIt Path Switcher | AutoIt Menu for Opera! | YouTube Download Center! | Desktop Icons Restorator | Math Tasks | KeyBoard & Mouse Cleaner | CaptureIt - Capture Images Utility | CheckFileSize Program

AutoIt_Icon_small.pngUDFs: OnAutoItErrorRegister - Handle AutoIt critical errors {new}| AutoIt Syntax Highlight {new}| Opera Library! | Winamp Library | GetFolderToMenu | Custom_InputBox()! | _FileRun UDF | _CheckInput() UDF | _GUIInputSetOnlyNumbers() UDF | _FileGetValidName() UDF | _GUICtrlCreateRadioCBox UDF | _GuiCreateGrid() | _PathSplitByRegExp() | _GUICtrlListView_MoveItems - UDF | GUICtrlSetOnHover_UDF! | _ControlTab UDF! | _MouseSetOnEvent() UDF! | _ProcessListEx - UDF | GUICtrl_SetResizing - UDF! | Mod. for _IniString UDFs | _StringStripChars UDF | _ColorIsDarkShade UDF | _ColorConvertValue UDF | _GUICtrlTab_CoverBackground | CUI_App_UDF | _IncludeScripts UDF | _AutoIt3ExecuteCode | _DragList UDF | Mod. for _ListView_Progress | _ListView_SysLink | _GenerateRandomNumbers | _BlockInputEx | _IsPressedEx | OnAutoItExit Handler | _GUICtrlCreateTFLabel UDF | WinControlSetEvent UDF | Mod. for _DirGetSizeEx UDF
 
AutoIt_Icon_small.pngExamples: 
ScreenSaver Demo - Matrix included | Gui Drag Without pause the script | _WinAttach()! | Turn Off/On Monitor | ComboBox Handler Example | Mod. for "Thinking Box" | Cool "About" Box | TasksBar Imitation Demo

Like the Projects/UDFs/Examples? Please rate the topic (up-right corner of the post header: Rating AutoIt_Rating.gif)

* === My topics === *

==================================================
My_Userbar.gif
==================================================

 

 

 

AutoIt is simple, subtle, elegant. © AutoIt Team

Share this post


Link to post
Share on other sites

Ed_Maximized

Hi,

It's like i sad:

So this is not my solution :whistle:

P.S

If you ask me, thoese functions are must be as built-in UDF's in next autoit versions, couse such function as cheking the internet connection is neccesary for many scripters.

Where is the original post of amel27 with these functions?

Share this post


Link to post
Share on other sites

Check this!!!

$state=-1

While 1
    $Con=_IsCon()
    If $Con<>$state Then
        If $Con=1 Then
            TrayTip("Internet Check","Connected",1,1)
            $state=1
        Else
            TrayTip("Internet Check","Not Connected",1,3)
            $state=0
        EndIf
    Else
    EndIf
WEnd

Func _IsCon()
    Return InetGet("http://www.mozilla.org", @TempDir&"\foo.html",1)
EndFunc

Short, Simple, Works!!! :whistle:

Share this post


Link to post
Share on other sites

#17 ·  Posted (edited)

Whichever version is used - I would suggest that another test be done, maybe three tests. Not saying that I have ever went to Google.com and it showed me a page cannot be displayed message, but you never know. Maybe test another one before stating that the internet is closed. Also if you are behind a ISA firewall, you could be connected to a website, yet your script states that you do not have internet connection. This is my issues at my work - I get to the internet via a scrip, but have NOT been able to test. Not that I have tried too much, as I know that I am online.

Also you might try to check a site that gives your external IP i.e. grc.com (by the way, a great site to test your firewall) - if you do not get one (test for all internal IP's 10.0.0.0 & 172.16.0.0 & 192.168.0.0 - look up classes and internal IPs) then you know you are not connected

EDIT - I just looked at the last post and I have not tried that version yet - I will give it a go this week.

Edited by nitekram

All by me:

"Sometimes you have to go back to where you started, to get to where you want to go." 

"Everybody catches up with everyone, eventually" 

"As you teach others, you are really teaching yourself."

From my dad

"Do not worry about yesterday, as the only thing that you can control is tomorrow."

 

WindowsError.gif

WIKI | Tabs; | Arrays; | Strings | Wiki Arrays | How to ask a Question | Forum Search | FAQ | Tutorials | Original FAQ | ONLINE HELP | UDF's Wiki | AutoIt PDF

AutoIt Snippets | Multple Guis | Interrupting a running function | Another Send

StringRegExp | StringRegExp Help | RegEXTester | REG TUTOR | Reg TUTOT 2

AutoItSetOption | Macros | AutoIt Snippets | Wrapper | Autoit  Docs

SCITE | SciteJump | BB | MyTopics | Programming | UDFs | AutoIt 123 | UDFs Form | UDF

Learning to script | Tutorials | Documentation | IE.AU3 | Games? | FreeSoftware | Path_Online | Core Language

Programming Tips

Excel Changes

ControlHover.UDF

GDI_Plus

Draw_On_Screen

GDI Basics

GDI_More_Basics

GDI Rotate

GDI Graph

GDI  CheckExistingItems

GDI Trajectory

Replace $ghGDIPDll with $__g_hGDIPDll

DLL 101?

Array via Object

GDI Swimlane

GDI Plus French 101 Site

GDI Examples UEZ

GDI Basic Clock

GDI Detection

Ternary operator

Share this post


Link to post
Share on other sites

Ed_Maximized

Where is the original post of amel27 with these functions?

This is from russian forum in topic about AutoIt - http://forum.oszone.net/post-488300-378.html :whistle:

 

Spoiler

Using OS: Win 7 Professional, Using AutoIt Ver(s): 3.3.6.1 / 3.3.8.1

AutoIt_Rus_Community.png AutoIt Russian Community

My Work...

Spoiler

AutoIt_Icon_small.pngProjects: ATT - Application Translate Tool {new}| BlockIt - Block files & folders {new}| SIP - Selected Image Preview {new}| SISCABMAN - SciTE Abbreviations Manager {new}| AutoIt Path Switcher | AutoIt Menu for Opera! | YouTube Download Center! | Desktop Icons Restorator | Math Tasks | KeyBoard & Mouse Cleaner | CaptureIt - Capture Images Utility | CheckFileSize Program

AutoIt_Icon_small.pngUDFs: OnAutoItErrorRegister - Handle AutoIt critical errors {new}| AutoIt Syntax Highlight {new}| Opera Library! | Winamp Library | GetFolderToMenu | Custom_InputBox()! | _FileRun UDF | _CheckInput() UDF | _GUIInputSetOnlyNumbers() UDF | _FileGetValidName() UDF | _GUICtrlCreateRadioCBox UDF | _GuiCreateGrid() | _PathSplitByRegExp() | _GUICtrlListView_MoveItems - UDF | GUICtrlSetOnHover_UDF! | _ControlTab UDF! | _MouseSetOnEvent() UDF! | _ProcessListEx - UDF | GUICtrl_SetResizing - UDF! | Mod. for _IniString UDFs | _StringStripChars UDF | _ColorIsDarkShade UDF | _ColorConvertValue UDF | _GUICtrlTab_CoverBackground | CUI_App_UDF | _IncludeScripts UDF | _AutoIt3ExecuteCode | _DragList UDF | Mod. for _ListView_Progress | _ListView_SysLink | _GenerateRandomNumbers | _BlockInputEx | _IsPressedEx | OnAutoItExit Handler | _GUICtrlCreateTFLabel UDF | WinControlSetEvent UDF | Mod. for _DirGetSizeEx UDF
 
AutoIt_Icon_small.pngExamples: 
ScreenSaver Demo - Matrix included | Gui Drag Without pause the script | _WinAttach()! | Turn Off/On Monitor | ComboBox Handler Example | Mod. for "Thinking Box" | Cool "About" Box | TasksBar Imitation Demo

Like the Projects/UDFs/Examples? Please rate the topic (up-right corner of the post header: Rating AutoIt_Rating.gif)

* === My topics === *

==================================================
My_Userbar.gif
==================================================

 

 

 

AutoIt is simple, subtle, elegant. © AutoIt Team

Share this post


Link to post
Share on other sites

#19 ·  Posted (edited)

P.S

If you ask me, thoese functions are must be as built-in UDF's in next autoit versions, couse such function as cheking the internet connection is neccesary for many scripters.

Isn't that what Ping("...") does?

EDIT: Ping works good on my computer... ?

Edited by Piano_Man

My Programs[list][*]Knight Media Player[*]Multiple Desktops[*]Daily Comics[*]Journal[/list]

Share this post


Link to post
Share on other sites

#20 ·  Posted (edited)

It's true that function is unreliable. Often I lose my connection, but the tray icon says it's still connected.

And wouldn't it be better to ping an ip than resolve the address? What's the ip for google?

And I thought this was about an internet Checkers game . lol :whistle:

Posted Image

Edited by rush4hire

Share this post


Link to post
Share on other sites

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 account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0