Astuces de recherche...
Home
- Accueil & nouveautés
- Les newsgroups VB
- Téléchargements
- L'équipe
- Nous contacter
- Liens
Rubriques
- Toutes les questions
- Affichage & graphismes
- Algorithmique
- API
- Base de registre
- Bases de données
- Contrôles
- Date & heure
- Déploiement
- Divers
- Erreurs & problèmes
- Fichiers & dossiers
- Généralités
- Impression
- Internet & mails
- Math
- Multimédia
- Réseaux
- Structures de données
- Texte & strings
- VB .Net
- VB Script
- VBA
- Windows

Question 77

Comment déterminer si l'ordinateur est connecté à Internet ?

Il suffit d'employer l'API InternetGetConnectedState qui retourne True si l'ordinateur est connecté à Internet :

Private Declare Function InternetGetConnectedState Lib "wininet.dll" (ByRef lpdwFlags As Long, ByVal dwReserved As Long) As Long

Private Sub Form_Load()

    If InternetGetConnectedState(0&, 0&) Then
        MsgBox "Vous êtes connecté à Internet", vbInformation
    Else
        MsgBox "Vous n'êtes pas connecté à Internet", vbInformation
    End If

End Sub

Remarque : l'emploi de cette API requière la présence d'Internet Explorer 4.0 (minimum) sur le poste.

Date de publication : 16 septembre 2002
Dernière modification : 16 septembre 2002
Rubriques : Internet & mails
Mots-clés : Internet, connecté, connection, connexion