Allora mi sa che dovro tornare su quel pc....solo che si trova in un altra citta....

Puoi dirmi almeno se l'errore che conteneva nel messaggio "ActiveX"
puo dipendere dal codice oggetto di studio in questo post?

Io ho messo il seguente
---
Private Declare Function InternetGetConnectedState Lib "wininet.dll" (ByRef
dwflags As Long, ByVal dwReserved As Long) As Long

Public Function IsOnline() As Boolean
Dim LFlags As Long
IsOnline = InternetGetConnectedState(LFlags, 0&)
End Function
---
in un modulo.....se lo mettevo nel form...cambiava qualcosa?
grazie