sixcode
21st May 2006 12:22 UTC

dialer test
  I have a network internet connection so
there is no way i can test this script

is there some one that can test this:
thanks

OutFile "connect to internet test.exe"

>Caption "connect to internet test         "

>xpstyle on

>!include LogicLib.nsh


>Function .onInit

  

  again:

  

 Dialer::AttemptConnect

  Pop $R0 


>${if} $R0 = online

  goto connected

>${elseif} $R0 = offline

    IntOp$2 $2 + 1

    StrCmp$2 4 kill

  Dialer::AutodialUnattended

  Pop $R0

 ${if} $R0 = online

  goto connected

  MessageBox MB_OK|MB_ICONEXCLAMATION "$\r$\nInbel Internet verbindings fout :$\r$\n$\r$\nKan geen verbinding maken met server, bezig met opnieuw proberen...     "

  ClearErrors

  Goto again

  kill:

 MessageBox MB_OK|MB_ICONEXCLAMATION "$\r$\nKan geen Internet Vebinding maken, setup sluit nu af...     "

  quit

  connected:

 MessageBox MB_OK "connected to the internet : $R0"

  pop $R0

  quit

>${endif} 

  ${endif} 

>FunctionEnd


Section

Sectionend 

>