begin process at 2012 02 13 20:30:49
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Réseau & Internet

 > [.NET2] TESTER LA CONNECTION À INTERNET (AUTRE MÉTHODE PAR HTTPWEBREQUEST)

[.NET2] TESTER LA CONNECTION À INTERNET (AUTRE MÉTHODE PAR HTTPWEBREQUEST)


 Information sur la source

Note :
Aucune note
Catégorie :Réseau & Internet Source .NET ( DotNet ) Classé sous :connection, internet, connexion, tester Niveau :Débutant Date de création :12/02/2006 Date de mise à jour :12/02/2006 14:22:04 Vu :22 314

Auteur : Willi

Ecrire un message privé
Ce membre participe au partage de revenus publicitaires
Commentaire sur cette source (52)
Ajouter un commentaire et/ou une note


 Description

Bon d'accord il existe déjà ce genre de sources sur le site.
Mais je viens proproper une "autre méthode" que je n'ai pas trouvé sur le site pour tester la connection à Internet en utilisant la classe HttpWebRequest.

Ce n'est pas la source du siècle quelques lignes mais simple à comprendre.

Utilisation:

If TestInternetConnection then
    'Connecté à Internet
Else
    'Non connecté
End If

Source

  • Imports System.Net
  • Function TestInternetConnection() As Boolean
  • Dim IsOK As Boolean
  • Try
  • Dim ReqHttp As HttpWebRequest = WebRequest.Create("http://www.vbfrance.com")
  • 'Envois de la requete et attente d'une réponse
  • Dim ReponseReq As HttpWebResponse = CType(ReqHttp.GetResponse, HttpWebResponse)
  • 'Si la réponse est ok on retourne Vrai
  • If ReponseReq.StatusCode = HttpStatusCode.OK Then
  • IsOK = True
  • Else
  • IsOK = False
  • End If
  • ReponseReq.Close()
  • Catch ex As Exception
  • IsOK = False
  • End Try
  • Return IsOK
  • End Function
Imports System.Net

Function TestInternetConnection() As Boolean

    Dim IsOK As Boolean

    Try

        Dim ReqHttp As HttpWebRequest = WebRequest.Create("http://www.vbfrance.com")

        'Envois de la requete et attente d'une réponse
        Dim ReponseReq As HttpWebResponse = CType(ReqHttp.GetResponse, HttpWebResponse)

        'Si la réponse est ok on retourne Vrai
        If ReponseReq.StatusCode = HttpStatusCode.OK Then
            IsOK = True
        Else
            IsOK = False
        End If

        ReponseReq.Close()

    Catch ex As Exception
        IsOK = False
    End Try

    Return IsOK

End Function



 Historique

12 février 2006 14:22:05 :
mots-clés

 Sources du même auteur

Source avec Zip Source .NET (Dotnet) LISTVIEW SUPPORT TRI MULTI-COLONNES PAR MÉTHODES D'EXTENSION...
Source avec Zip Source avec une capture Source .NET (Dotnet) ROTATION D'ÉCRAN
Source avec Zip Source avec une capture Source .NET (Dotnet) IMAPI2 - GRAVER UN CD AUDIO
Source avec Zip Source avec une capture Source .NET (Dotnet) CONTRÔLES COLOR PICKER: WHEEL COLOR PICKER - SCREEN COLOR PI...
Source avec Zip Source .NET (Dotnet) [.NET3.5] EXTENSION METHODS: SUR LES CLASSES SYSTEM.IO

 Sources de la même categorie

Source avec Zip Source avec une capture GESTIONNAIRE DE TÉLÉCHARGEMENT, AVEC REPRISE ET MULTITHREADI... par Madx23
Source avec Zip Source avec une capture CONVERTIR DU TEXTE RTF EN CODE HTML ET VICE-VERSA par vicosta
Source avec Zip Source avec une capture DICTIONAIRE TEXT/AUDIO/VISUELLE ANGLAIS AVEC WEBBROWSER CONT... par majnounmajda
Source avec Zip Source .NET (Dotnet) NSLOOKUP EN VB.NET OU COMMENT FAIRE UNE REQÛETE DNS EN PRÉCI... par ShareVB
Source avec Zip Source avec une capture MINI SEVEUR HTTP AVEC INTERFACE GRAPHIQUE ET IMPLÉMENTATIONS... par lemout

 Sources en rapport avec celle ci

Source avec Zip CONNEXION D'ORDINATEURS ENTRE EUX (CLIENT SERVER) AVEC LES "... par marco62118
Source .NET (Dotnet) [.NET2] TESTER L'INTERCONNECTION À INTERNET (PAR ICMP TRACER... par kisecure
Source avec Zip Source .NET (Dotnet) ETABLIR UNE CONNEXION INTERNET par Mrreivax
Source avec Zip Source avec une capture Source .NET (Dotnet) TESTER LA VITESSE DE VOTRE CONNEXION INTERNET par hvb
DECONNEXION INTERNET par ozar

Commentaires et avis

Commentaire de jesusonline le 12/02/2006 15:29:58 administrateur CS

En VB .net 2 encore plus rapide :

public function hasInternet() as Boolean

return My.Computer.Network.Ping("www.google.fr") ' google est plus sur que vbfrance :)

end function

Je suis plus trés sur de l'endroit ou se cache la fonction ping, je suis sur qu'elle est dans My :)

Commentaire de Willi le 12/02/2006 17:24:04 administrateur CS

Arf je n'avais pas le souvenir d'avoir croisé la méthode ping dans My.
Il me semble qu'on la retrouve dans le namespace Net.NetworkInformation. A confirmer.
Merci pour l'info :)

Commentaire de acrcorp le 21/02/2006 21:55:53

> Dim ReqHttp As HttpWebRequest = WebRequest.Create
> ("http://www.vbfrance.com")
>
> return My.Computer.Network.Ping("www.google.fr")

Vous avez honte j'espère ? Et si le serveur de google ou vbfrance est rideau... votre connexion internet aussi ? C'est la classe ! Non vraiment !

Commentaire de Willi le 21/02/2006 22:10:59 administrateur CS

Pourquoi devrait-on avoir honte ? Si le 1er ping ne donne rien ont ping sur un autre genre www.microsoft.com. Réfléchis.....

Que proposes-tu comme méthode dans ce cas la ?

Commentaire de acrcorp le 21/02/2006 22:53:18

Cette source est présentée comme étant un moyen de tester si on est connecté à internet !!!
Elle ne fait pas ça du tout !!! Elle teste si un serveur répond et ça n'a rien à voir.

Commentaire de Willi le 21/02/2006 22:57:08 administrateur CS

Je ne vois pas vraiment d'autres moyens pour tester si ton pc est connecté à Internet.....

Commentaire de acrcorp le 21/02/2006 23:19:04

Tu rigoles là !!!!
Il suffit de rechercher sur ce forum pour en trouver une tetra chiée !!!

Commentaire de Willi le 21/02/2006 23:32:26 administrateur CS

J'ai cherché dans ce forum est vraiment rien ou alors j'ai pas de chance....
Donne les autres méthodes alors si tu en a trouvé...

Commentaire de acrcorp le 22/02/2006 00:35:53

Franchement tu abuses ;)
Il suffit de taper le critère de recherche "connexion internet" et ça en sort de partout des codes. Par exemple :

Private Declare Function InternetGetConnectedState Lib "wininet.dll" (ByRef lpdwFlags As Long, ByVal dwReserved As Long) As Long
Public Function IsNetConnectOnline() As Boolean
IsNetConnectOnline = InternetGetConnectedState(0&, 0&)
End Function

Sub Main()
If IsNetConnectOnline() = False Then
  MsgBox "Vous êtes actuellement déconnecté.", vbInformation
  Exit Sub
Else
  MsgBox "Vous êtes actuellement connecté à Internet.", vbInformation
End If
End Sub

Commentaire de Willi le 22/02/2006 00:43:18 administrateur CS

je n'abuse pas...ce que tu me proposes et du code vb pas du .net
J'ai également cherché avec le meme pattern que toi, il n'y a qu'une seule question qui ait trouvé réponse (c'est la réponse que tu donnes) alors ne dis pas qu'il en sort de partout stp...

Mais bon sa y est ont a foutu en l'air ma source avec tout nos commentaires inutiles :)

Commentaire de acrcorp le 22/02/2006 00:49:39

hi hi ;)
Je suis un gros pourrisseur de source ;)

Ok c'est pas du ".net" mais ça marche quand même si tu le mets dans ton code. Alors je vois pas bien ce qui te dérange la dedans ?

Commentaire de Willi le 22/02/2006 01:07:55 administrateur CS

Oui ba va pourrir autres choses que les sources de cette communauté...
Je qui me dérange c'est la manière limite déplacé de ton 1er commentaire.
Redescend sur terre et regarde tes contributions sur vbfrance avant de placer un commentaire comme celui-ci...
Ce sera mon dernier mot acrcorp.fin...

Commentaire de BruNews le 22/02/2006 01:49:25 administrateur CS

InternetGetConnectedState() ne donne absolument plus rien de valable avec les connexions permanentes de type adsl + routeur et c'est devenu le cas général.
Une tentative de connexion est le seul moyen (ping ou autre), peut-être pas de savoir à coup sur si on est connecté mais au moins de tenter d'atteindre un site.

Il faut toujours mesurer ses propos et surtout maitriser parfaitement son sujet avant de vouloir jeter la honte sur quelqu'un, ça se partage si vite...

Commentaire de acrcorp le 22/02/2006 09:14:42

Mea culpa messieur.
Au départ, je n'avais pas noté que la chose concernait .net "exclusivement".
Je retire donc mes propos du début !
Aller, faite pô la geule...

Commentaire de Willi le 22/02/2006 11:42:40 administrateur CS

ohé ohé ce n'est pas grave Acrcorp...évite des commentaires comme celui du début si tu n'es pas certains de ce tu avances.
Merci au maitre Brunews d'avoir fournit une explication :)

Commentaire de acrcorp le 22/02/2006 20:28:32

Bon alors pour revenir à du constructif,
C'est quand même bien moyen de tester l'état de connexion par un ping... y'a forcement un truc mieux que ça (même si je sais pas où non plus :) )

Commentaire de jesusonline le 22/02/2006 21:27:42 administrateur CS

Le problème pour trouver un truc mieux est de trouver la réponse à

"qu'est-ce qu'internet ?"

Toi pour savoir si tu as internet tu fais quoi ? tu lances ton navigateur et tu regardes si tu as accés au site, ce qui revient au meme que de faire un ping sur ce site ...

Commentaire de acrcorp le 22/02/2006 22:21:56

> Toi pour savoir si tu as internet tu fais quoi ?
> tu lances ton navigateur et tu regardes si tu as
> accés au site, ce qui revient au meme que de
> faire un ping sur ce site ...

Bin non désolé. Pour une raison très simple :
Si je vais sur ce site et que celui ci ne répond pas, je ne me dis pas : "Puisque le site ne répond pas, alors je suis déconnecté d'internet !!!!"
Désolé, ça le fait pas du tout.
Ensuite, si je vais sur un autre site et qu'il ne répond pas non plus, je ne me dis pas : "C'est sur que mon internet est déconnecté !"
Donc il faut faire quoi ?
Se connecter à 15 sites différents et dire qu'on est déconnecté si les 15 sites répondent KO ? Franchement c'est pas sérieux...

Commentaire de jesusonline le 22/02/2006 23:23:19 administrateur CS

Alors comment fais tu toi en tant que personne pour savoir si t'es connecté sur internet ?

quelle est la différence entre un intranet local et internet ?

Commentaire de Willi le 22/02/2006 23:24:20 administrateur CS

oui mais bon pour que google.fr ou microsoft.fr ou bien autre grosse structure tombe en rideau....

Commentaire de acrcorp le 23/02/2006 00:47:20

> Alors comment fais tu toi en tant que personne pour
> savoir si t'es connecté sur internet ?

Je regarde l'état de ma connexion, là où est indiqué la vitesse de connexion etc...

Vous savez, votre idée ne résite pas à une analyse sérieuse. Je ne dis pas que dans la pratique ça ne donne pas de résultat "suffisant", mais je veux juste dire que cette façon de faire n'est pas propre... (même si c'est suffisant pour bricoler dans son garage). En tout cas, jamais de la vie je n'implémenterai un truc pareil de peur que d'autres le découvre ;)

Commentaire de Willi le 23/02/2006 00:57:49 administrateur CS

Si tu as un réseau local qui se connecte à internet via un routeur.
Tu le vois comment toi l'état de ta connexion à INTERNET ?

Commentaire de acrcorp le 23/02/2006 01:09:58

Pas la moindre idée en .net

Je ne sais pas résoudre votre problème, je sais juste dire que c'est surement pas comme ça qu'il faut faire, c'est tout ;)

Commentaire de jesusonline le 23/02/2006 01:27:00 administrateur CS

Je confirme ce que dit Willi, moi j'ai aucun moyen de savoir si je suis connecté au net! je met un cable réseau on me donne une IP et je n'ai aucun moyen de savoir si je suis connecté au net !

Et ca ca vient pas de .net ou autre ! si en VB6 (le truc hyper vieux ;)) ou en C++ tu peux, on attend de voir !

Commentaire de BruNews le 23/02/2006 09:36:36 administrateur CS

Le langage n'entre pour rien dans l'affaire.

Commentaire de acrcorp le 23/02/2006 19:56:10

Dans ce cas, tous les codes que l'on trouve sur le site et qui prétendent pouvoir tester l'état de la connexion internet, c'est de l'arnaque alors ?
Moi je n'ai pas de réseau local alors j'ai jamais été confronter à ce problème (réseaux local qui est pris pour de l'internet).

Commentaire de hvb le 15/03/2006 16:19:26

La pluparts des arguments auquels j'ai pensé ont déja été evoqué, et malgré ça acrcorp, tu persistes... c'est trop lol!
Tu parles de 15 ping sur 15 sites differents... arrete, 1 ping sur google, 1 sur microsoft et tu peux à 99,99% confirmer l'état de ta connexion... perso j'aurais meme pinger QUE google...
Que ce soit en cours à la demande de mon prof de reseau ou au taf à la demande de mon maître d'apprentissage, le test de connexion à internet d'une nouvelle machine sur un reseau consiste betement à :
1 pinger la passerelle, 2 pinger google... si erreur, jamais ça n'est venu du fait que google etait down...

Desolé de l'inutilité de ce commentaire, je voulais trop y mettre mon grain de sel ^^

Commentaire de Blanc le 30/03/2006 13:26:20

Salut salut..
j'ai lu vaguement tout les messages ci-dessus.. j'ai remarqué pas mal de tension chez certain.. enfin bref, tout ça pour dire que j'ai vu un truc hier en tatonant dans les listes de vb.net cette fonction (variable):

my.Computer.Network.IsAvailable

Elle retourne une valeur boolean (soit true, soit false..) alors je l'ai pas testée à fond.. mais je crois bien qu'elle permet de savoir si l'ordinateur a une connection à internet..
Voilà.. dites-moi si je me trompe.. :)
(ah oui, c'est du vb 2005 (framework 2.0))


aH+


blanc

Commentaire de Willi le 30/03/2006 13:42:02 administrateur CS

Non, ici tu testes si ton pc est connecté à un réseau
Pour la connexion internet on teste avec my.computer.network.ping("...")

Commentaire de Blanc le 30/03/2006 13:45:33

OK.. si tu le dis.. j'avais pas encore testé justement.. merci alors..

Commentaire de jeffwow le 05/04/2006 22:38:35

Peut-être que la solution se trouve là:

http://www.dotnet247.com/247reference/msgs/32/161252.aspx

Ils utilisent wininet.dll pour y arriver.

Commentaire de Bidou le 29/04/2006 22:04:01 administrateur CS

jeffwow, il semblerait que tu n'aies pas lu les commentaires plus haut.
Dommage...

Commentaire de PCPT le 07/06/2006 11:34:59 administrateur CS

salut,
forum scruté de long en large et après de multiples tests, que ce soit les API InternetGetConnectedState, InetIsOffline ou InternetAttemptConnect, on a de temps en temps un retour True alors que c'est False!!
un ping ou une tentative de téléchargement, pourquoi mais vous souvenez-vous... il y a des siècles.... à l'époque du 56K :p
ma question est donc : est-ce qu'il n'y a AUCUN risque qu'un tel appel (peu importe le langage) lance la connection ou la fenêtre de connection pour les non-illimités?

PCPT  [AFCK]

Commentaire de BruNews le 07/06/2006 11:51:42 administrateur CS

Une tentative de connexion directement au niveau des sockets n'affichent bien entendu rien du tout (composant pré-maché aucune idée), il faut mettre l'appel dans un thread (exit VB6...) car la notif d'erreur met qlqs secondes.

Commentaire de PCPT le 07/06/2006 12:36:03 administrateur CS

ok merci BruNews
(donc sujet encore à creuser pour VB6..., satané mono-thread!)

Commentaire de PCPT le 07/06/2006 13:23:24 administrateur CS

gRRrrRR !
un ping (google) avec CreatePipe en VB6... le FireWall demande la permission!!

Commentaire de Mycado le 03/08/2006 13:40:30

Internet c'est quoi ? C'est un reseau interconnecté .. Donc si tu n'as pas accès aux interconnexions, on N'est PAS sur internet.
Dans ce cas, le ping de ton fournisseur et le ping d'une grosse enseigne (google ?) est plus que largement suffisant.

Et cela reste très propre. Car, pouvez vous me dire l'interet de savoir que l'on est connecté à "internet" si nous ne pouvons pas accèder aux sites présents sur internet ? AUCUN.

Le ping est donc bien un moyen "propre" de savoir si l'on est connecté à internet :)

Commentaire de Sharkiller le 24/09/2006 15:30:37

Sinon y'a peut-être une autre solution:
Voir si l'adresse IP est locale (127.x.x.x) ou pas..

Ca c'est possible et y'a pas besoin d'aller sur un site.
Dites-moi si je me trompe..

Commentaire de PCPT le 24/09/2006 15:35:37 administrateur CS

tu te trompes ;)
cette adresse existe dès que tu as une carte réseau (127.0.0.1)

aucun rapport donc.
++

Commentaire de Sharkiller le 24/09/2006 15:46:58

Ah bon ok^^
Pourtant je me servais de ça pour lancer dès applis à chaque reconnection et ça marchait impec' ;)

Mais bon si c'est pas ça.. tant pis^^

Commentaire de bdminf84 le 17/01/2007 01:11:45

Pour ajouter mon grain de sel à la discussion :
J'aurai personnelement tendance à penser que pour vérifier sa connexion il suffit de tester son DNS (enfin l'adresse du DNS que son fournisseur d'accès nous fournis).

Car ca me parait assez facile à faire et qu'a priori si le serveur de votre DNS ne tourne pas ce n'est pas la peine de chercher à lancer des requêtes sur Internet...

Je n'ai pas de code à vous donner, mais voici 2 méthodes (y'a en plein d'autres) :
- par socket : on récupére le dns que la connexion réseau (équivalent de ipconfig /all) puis on tente d'ouvrir le port UDP 53 du serveur DNS
- par reverse : on récupére son hote reverse (j'ai vu des sources pour faire ca) car a priori si on a bien un hote sur Internet ce que l'on est bien sur internet...

Bien sur la solution de pinger google est pour moi valable vu leur fiabilité mais c'est compter sur quelqu'un d'autres et c'est bien plus un test de serveur qu'autre chose... mais ca prends 5 minutes à coder... tout dépends de l'application que l'on cherche à réaliser...

Commentaire de BruNews le 01/06/2007 23:05:01 administrateur CS

Qui veut tester:
http://brunews.com/IsWeb.zip
Va bon sur routeur de ma fibre et wifi mais je n'ai pas de connexion partagée et j'aimerais bien savoir si répond correctement.
La DLL (PAS DE regserver, c'est API !!!) ne fait pas de PING, utilisation directe des sockets.
Exporte bnWebOk() As Long, retourne 0 si pas web dispo, utilisation libre.

Commentaire de hsaturn le 22/06/2007 01:14:36

Mon ptit grain de sel

1/ Tester l'adresse IP n'est pas valable. Dans un intranet, on possède une IP genre 192.xx et on peut ou ne pas être connecté à internet. Aucune information de ce coté la.

2/ La solution de bdminf84 ne marche pas, mais c'était presque ça !
En effet, le serveur DNS peut très bien être local (intranet) mais dans une zone DMZ (internet accessible pour lui seul et/ou pour la DMZ), le méchant firewall lui, ne nous laissera pas passer (Zone militarisée), tandis qu'il laissera le serveur DNS accéder aux serveurs de nom externes et te répondre !

3/ Le ping me paraît valable moi. si on fait 2 gros hébergeurs (france / us), on risque pas de se planter. Si les deux sont en panne, c'est sans doute que la terre n'existe plus ou est envahie de dechets radioactifs...
Je compatis avec le firewall qui risque de hurler en revanche... Mais on n'a rien sans rien ....


Au final, je crois qu'on est d'accord : ping

Commentaire de Willi le 22/06/2007 09:24:11 administrateur CS

Brunews, IsWeb tester en entreprise derrière un proxy,firewall tout "va bon" comme du le dis si bien ;) (juste un peu plus long qu'en connection directe.)

Commentaire de kisecure le 02/07/2007 01:30:19

Bonjour à tous! en lisant vos commentaires il m'est venut une idée! :)
Une solution simple pour tester si la connection internet est active (solution à développer!) :
1 - Tester si les interfaces réseaux sont up (avec WMI par ex)
2 - Faire un traceroute vers une adresse IP public en verifiant le resultat :
Dès que l'on obtient une adresse IP diférente d'une classe privé on arrête le traceroute.
3 - Si IP Public => connection UP
Si pas ip public => connection DOWN

Marche uniquement si vous etes connecté directement au NET :) (box, modem etc...) donc pas dans le cas d'une connection par le bié d'un proxy local :)


Je vais essayer de vous faire une petite source pour cela

Bon courage à tous!
Nicolas

Commentaire de kisecure le 02/07/2007 03:37:52

Et voila :) une petite source en .net
http://www.vbfrance.com/code.aspx?ID=43312

Il faut encore la travaillé (faire des try et gestion erreur) mais ca marche ;)

A bientot!
Nicolas

Commentaire de Lord_Folkien le 31/03/2008 11:37:06

Heu bon certaines informations indiquées dans les commentaires ne sont pas vraiment exacte.

1° les méthodes fournies pas MS pour contrôler la connexion internet ne fonctionne que dans les connexions internet spécifiques à la machine comme des connexion PPP pour toutes connexions lan c'est inefficace.

2° la methode de faire appelle à un ping fonctionne dans un environnement où l'ordinateur est directement connecter, ou seulement derrière un nat et/ou firewall. Si tu es derrière un proxy, oublie ça ne fonctionne pas.

la seule méthode à ma connaissance pour palier à toutes les éventualité, est une requête http.
Maintenant au sujet de la fiabilité du teste, effectivement dans l'absolu faire un ping sur un site pour voir si la connexion est up n'est peut être pas ce qu'il y a de plus générique, mais si on regarde honnêtement certain site comme google sont en fait un groupe de serveur et si par hasard l'un d'entre eux tombe, pour nous user ça ne change rien car on est simplement rediriger. Donc la probabilité de voir l'intégralité de l'infrastructure de google tomber est très très faible.

Commentaire de BruNews le 31/03/2008 12:02:41 administrateur CS

NIET, je ne fais aucune requête HTTP pas plus que de PING et ma dll fonctionne.
Un simple connect() sur un socket suffit amplement.

Commentaire de us_30 le 20/03/2009 10:19:32

Bonjour à tous,

Pour info, depuis la DLL de BruNews est à l'adresse :
http://brunews.com/brunews/download/IsWeb.zip

Amicalement,
Us.

Commentaire de marco62118 le 12/04/2009 19:55:33

bonjour à tous
brunews est il possible d'avoir la source de ta dll si elle esten vb?

Commentaire de hsaturn le 22/03/2010 09:38:07

En fait, je me demande carrément si c'est possible de tester une connexion internet avec 100% de fiabilité.

Un exemple simple : si la connexion passe par un proxy/firewall, le ping peut être tout simplement bloqué.

Pire encore, imaginons deux utilisateurs humains, qui doivent répondre à cette question en face d'un PC.
L'un deux n'utilise que Firefox, l'autre n'utilise Que Internet Explorer....

Seul Firefox est configuré pour accéder à internet via proxy.

Devinez quelle sera la réponse des deux utilisateurs à la question <<cet ordinateur est-il connecté ?>>

Je pense donc que cette réponse est définitive :

A MON SENS, IL EST IMPOSSIBLE DE SAVOIR SI ON EST CONNECTE A INTERNET !!!

Tout simplement. En effet, aucun bout de code au monde ne pourra connaître mon login/mot de passe pour passer le proxy !!!!

C'est bien pour ca que les fonctions de micromou n'étaient pas fiables et qu'aucun bout de code ne sera jamais fiable.

Ajoutons à cela la très bonne intervention de PCPT : Quid des popups de connexion à internet ?

Qu'en pensez vous ?

Commentaire de Mayman360 le 05/03/2011 19:00:06

Bon, je viens de passer au travers tous les commentaires et entrepris une recherche! Voilà donc ce que j'ai trouvé et je dois dire que ça reviens pas mal à la solution offerte au début de la discussion :

''' <summary>
''' Function using WebRequest and WebResponse to check
''' for an internet connection
''' </summary>
''' <param name="url">URL we wish to check (make sure to use one that
''' is online all the time, such as Google or Microsoft.com</param>
''' <returns></returns>
''' <remarks></remarks>

Public Function HasInternetConnection(ByRef url As String) As Boolean
    Dim uri As New System.Uri(url)
    'Create a new WebRequest
    Dim request As WebRequest = WebRequest.Create(uri)
    'Create new WebResponse for checking the response
    'from our WebRequest
    Dim response As WebResponse
    Try
        'If we get a response then we are successful
        response = request.GetResponse()

        'Close and dispose
        response.Close()
        request = Nothing

        response.Close()
        request = Nothing

        'Return true and a connection was made
        Return True
    Catch ex As Exception
        'Whoops, got an error so no connection is present
        Return False
    End Try
End Function

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

test connexion internet [ par snake57 ] Bonjour,Alors oui je sais vous allez me dire que sur le site il y'a beaucoup de testeur de connexion internet.Le probl&#232;me c'est qu'aucun ne fonct info connexion internet [ par galexis ] Je souhaite réaliser un compteur internet (avec visual basic 6), qui détecte la connexion par le modem, mais qui sache différencier la connexion activ probleme connection lors de l'empactage [ par developvbdebut ] Bonjour tout le mondeJ'ai termin&#233;e mon application,&nbsp; j'ai cr&#233;&#233; un petite base de donn&#233;es avec Ado et une table access.Mai lor Connection SQL disante [ par macgiver159 ] Bonjours,J'ai trouvé un programme qui se connecte à une base de donné distante(sur internet) et pour mon programme j'en est besoin le problème c'est q Tester la connexion à la BDD [ par chouchou270403 ] Bonjour à tous,Voila après quelques recherches infructueuses, je me suis enfin décidé à demander de l'aide.Dans le cadre d'un cours je dois réaliser u tester une connexion LDAP [ par benny83 ] bonjour,savez vous comment tester si une connexion LDAP est toujours établie ? (car apres un certain temps d'inactivité le serveur déconnecte automati connexion a sql server 2005 [ par imad_lol ] salut tout le monde.j'ai une base de donné sql server 2005 et c est la 1er fois que j essaye a me connecter via vb2005.je travail normalement sur vb6. comment lancer l'assistant de connexion internet? [ par ghislia61 ] Bonjour à tous...svp, j'aimerai savoir comment lancer l'assistant de connexion à internet de windows ( 2000, xp ...) dans le langage visual basic . Script VBS pour test connexion internet [ par papy46 ] Bonsoir à tous, j'ai un petit souci sur un script VBS : je souhaite réaliser un script d'accueil qui s'affiche à l'ouverture d'une session windows pou Tester une connexion WIFI [ par seb_geminox ] J'ai installé une connexion WIFI sur un PC portable. J'utilise des tables Access en lien (application Access avec code VB) et lorsque je fais une mise


Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 2,808 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales