XProfan

English

Description:

InternetGetConnectedStateEx gives whom status of/ one Internetverbindung and the names the for verwendeten DFÜ-link back. under windows95/98(/ME) can it with the usage this function To Problemen come. fundamentally becomes here (IE 5.5) first once adopted, that a active LAN-Verindung to that internet exists (even if nothing installs is)- as long as To following Registryflags staid go:
HKEY_CURRENT_USERSoftwareMicrosoftWindowsCurrentVersionInternet SettingsEnableAutodial = 1
and
HKEY_CURRENT_USERSoftwareMicrosoftWindowsCurrentVersionInternet SettingsNoNetAutodial = 0
thereby deals it itself circa ? Happen? to Automatischen Einwahl in that internet, what u.a. too by the Internetoptionen In the Control Panel under the Registrierkarte connections with the attitude always Standardverbindung dial staid go can. first then becomes with not installierter Internetverbindung recognized, that too really no Internetverbindung exists.

Deklaration:

Def @InternetGetConnectedStateEx(4) !WININET.DLL,InternetGetConnectedStateExA

Parameter:

1.Parameter: 4 byte large Bereichvariable, The if The function zurückkehrt ? Happen? aufnimmt, The The link hither bezeichnen. this Parameter can 0 his.=>
-$40 = the system has a correctly. configured Internetverbindung. whether a link to Time exists, gives this Flag not on (INTERNET_CONNECTION_CONFIGURED).
-$2 = the system uses a LAN-link circa in that internet To come (INTERNET_CONNECTION_LAN).
-$1 = the system uses one modem circa in that internet To come (INTERNET_CONNECTION_MODEM).
-$8 = won't More using (INTERNET_CONNECTION_MODEM_BUSY).
-$20 = Offline mode (INTERNET_CONNECTION_OFFLINE).
-$4 = the system uses a Proxy Server circa in that internet To come (INTERNET_CONNECTION_PROXY).
-$10 = on the System is RAS installs (INTERNET_RAS_INSTALLED).

2.Parameter: enough dimensionierte Memory-Variable, The whom names the active DFÜ-link aufnimmt. this Parameter can 0 his.

3.Parameter: Maximale length of Parameter 2 in letters. If Parameter 2 0 is, can this Parameter ditto 0 his.

4.Parameter: reserved, must 0 his.

Return Value:

1 for a active Internetverbindung, 0 if no link exists.

Examples:

Compile Mark Separation

Def @InternetGetConnectedState(2) !"WININET.DLL","InternetGetConnectedState"
Declare IFLAGS#,ONLINE&
DIM IFLAGS#,4
Clear IFLAGS#
LET ONLINE&=@InternetGetConnectedState(IFLAGS#,0)
ADDSTRING "Status: "+@st$(ONLINE&)
ADDSTRING "Flags: $"+@HEX$(@LONG(IFLAGS#,0))
Dispose IFLAGS#
@EDITBOX("Rückgaben",1)