Internet Connected (snippet)

[Sver]

'InternetGetConnectedState



'InternetGetConnectedState

dwReserved=0
open "wininet.dll" for dll as #inet
calldll #inet, "InternetGetConnectedState",lpdwFlags as ulong, dwReserved As long, result As long
close #inet

print lpdwFlags
print result
end

[tsh73]

So if you wonder what these 0/1 mean, read Microsoft docs
learn.microsoft.com/en-us/windows/win32/api/wininet/nf-wininet-internetgetconnectedstate

For me (Win 10 64) it returns 1 when online, 0 then set to flight mode,
and returned to 1 (not quite instantly) after turning flight mode off again.
Works for me.

[Rod]

If my memory serves this snippet tells you if you have a network adaptor but does not in fact confirm you are connected to the internet. Work rounds include downloading. Known url. But I would need to search for the original code and discussion.

[Sver]

Rod,
For me it works.

For both, check website and connection



open "wininet.dll" for dll as #inet
callDll #inet, "InternetCheckConnectionA", "http://www.google.com/" as ptr,1 as long,_      'try http://www.gogghhhogle.com/
   dwReserved as long,_
   result as long
close #inet

print result
end


'or
'httpget$(url$) produce a empty string$