Internetverbindung prüfen

[__WEY]

Hi Leute!

Gibt es in Xbase eine möglichkeit herauszufinden ob eine Internetverbindung besteht?

WEY

[AUGE_OHR]

Gibt es in Xbase eine möglichkeit herauszufinden ob eine Internetverbindung besteht?

probiere es mal hiermit

Code: Alles auswählen

#INCLUDE "DLL.CH"

#define ERROR_SUCCESS       0

DLLFUNCTION InternetAttemptConnect(n) USING STDCALL FROM WinInet.dll

...
   DO WHILE .T.
      IF (InternetAttemptConnect(0) == ERROR_SUCCESS)
         EXIT
      ENDIF
      SLEEP(100)
      nZaehler++
      IF nZaehler > 10
         MSGBOX("keine Internet Verbindung, Abbruch")
         QUIT
      ENDIF
   ENDDO

oder siehe dir mal diesen Thread an http://www.xbaseforum.de/viewtopic.php?f=27&t=3662