Savoir si connecté au net en 4 ligne avec winsock

Contenu du snippet

Voila, c'est ma première source que je poste sur vbfrance, étant donné que tout le monde fait des sources pour savoir si on est connecté au net en 50 lignes, moi je vais vous montrer quelque chose de simple, donc pour les newbies comme moi.

Source / Exemple :


private sub form_load()
' votre adresse ip est 127.0.0.1 si vous n'êtes pas connecté au net
' donc si votre adresse ip est 127.0.0.1 c'est que vous n'êtes pas  
' connecté
if winsock1.localip="127.0.0.1" then 

msgbox "Vous n'êtes pas connecté au net"
else
msgbox "Vous êtes connecté au net, votre ip est : " & winsock1.localip
endif
End Sub

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.