AccueilCodesTutorielsForumsEmploiLivresGuide achatConnexion

  • Visual Basic, VB6, VB.NET, VB 2005, VB CodeS-SourceS
  • RSS CodeS-SourceS
  • CodyxBot, le Bot GTalk & MSN qu'il vous faut !
  • Générez des revenus avec vos codes, scripts et tutoriaux
  • Aide à la navigation du site
begin process at 2009 07 06 18:35:07
Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

PING EN VB CINQ FACONS DE PROCEDER.


Information sur la source

Catégorie :Réseau & Internet Classé sous : ping, pipe, wmi, stdoutput, gethostbyname Niveau : Débutant Date de création : 17/03/2006 Date de mise à jour : 18/03/2006 04:23:43 Vu / téléchargé: 11 526 / 3 144
Auteur : Renfield Ecrire un message privé
Ce membre participe au partage de revenus publicitaires
Note :
6,25 / 10 - par 4 personnes
6,25 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Commentaire sur cette source (15)
Ajouter un commentaire et/ou une note

Description

Bonjour, rien de bien nouveau ici, juste cinq méthodes de faire un ping, en VB

au menu :
- Pipe (redirection de la sortie de la commande ping)
- WMI
- Shell redirection vers un fichier text
- utilisation de WShell et de sa propriété StdOutput
- utilisation des API Winsock (nottament gethostbyname)
 

Conclusion

j'aurais une préférence pour la version avec pipe, mais cela n'engage que moi ^^
 

Fichier Zip

Pour les "Membres Club", vous pouvez télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip

Historique

18 mars 2006 04:23:43 :
ajout de la "version" utilisant les API Winsock

Commentaires et avis

signaler à un administrateur
Commentaire de EBArtSoft le 17/03/2006 20:02:21 administrateur CS

Lol bah qu'est ce que tu nous fait Ren...
Et IcmpSendEcho alors hein ?

@+

signaler à un administrateur
Commentaire de Cacophrene le 17/03/2006 20:17:37

Salut !

Une excellente source, et "quatre" sans s ;-)

Cordialement,
Cacophrène

signaler à un administrateur
Commentaire de Renfield le 18/03/2006 04:24:17 administrateur CS

et de cinq ^^

signaler à un administrateur
Commentaire de Baddante le 21/03/2006 20:55:04

Salut !

Quelques remarques :

Toutes les méthodes ne sont pas utilisables selon les OS microsoft. (NT 4 WMI !!! la classe WMI "Win32_PingStatus" es-tu sûre quel est charger par défaut ?

Les paramètres de ton ping sont des constantes ("ping -n 1 -w 0 " : c'est optimiste comme paramètres faut pas être derrière un modem ou un routeur vieillisant) sauf pour la méthode WMI et la méthode "winsock socket".
La méthode Winsock, tu utilise le winsock de Windows XP (j'ai pas d'autres OS windows sous la main) : "ws2_32.dll" attention aux autres version de Windows.

On pourrait utiliser DirectX également (directplay exactement) les APIs novell "ActiveX Controls for Novell Services (Socket Controls)

" (ping IP et SPX / TCP / UDP) si vous avez l'environnement (comme moi).

et pourquoi pas, reprendre ou enrichir en utilisant l'exemple shell (mode console) TNSPING :

C:\>tnsping A75DT.world
TNS Ping Utility for 32-bit Windows: Version 2.3.4.0.0 - Production on 21-MAR-06 19:27:39
Copyright (c) Oracle Corporation 1995.  All rights reserved.
Attempting to contact (ADDRESS=(COMMUNITY=tcp.world)(PROTOCOL=TCP)(Host=srvx.xxx.host.fr)(Port=1521))
OK (40 msec) <= réponse









signaler à un administrateur
Commentaire de EBArtSoft le 21/03/2006 21:09:47 administrateur CS

Il existe un protocole normalisé pour ce type de requete il s'appel ICMP et il s'impose comme LE protocole utilisé pour traité les requetes ping. Il est en service sur 99% des machines connecté a l'Internet et il serait dommage de s'en priver.

Pour l'employer il suffit d'une API ICMPSendEcho que l'on trouve dans IPHLPAPI.DLL que l'on trouve par defaut dans windows depuis sa version 98. Il est vrais que l'on peux étendre le sujet a bon nombre d'application divers et varié. Mais on ce retrouve rapidement avec bcp de code pour pas grand chose.

@+

signaler à un administrateur
Commentaire de diablamanshadow le 27/08/2006 13:32:07

bonjour,
ta source est superbe cependant c'est pas exactement ce que je cherche j'aimerais la meme chose mais que si sa fonctionne sa m'affiche l'ip + l'echo en ms du temp de reponse et que l'utilisateur puisse saisir l'ip a "pinger" se serais possible car je trouve pas :(

signaler à un administrateur
Commentaire de Renfield le 27/08/2006 23:04:02 administrateur CS

pour la saisie, je te laisse te débrouiller...

pour le retrour d'infos, tu peux exploiter la version avec redirection de la sortie de la console...( PipePing)

signaler à un administrateur
Commentaire de lex1111 le 17/01/2007 13:45:03

excellent je teste ^^

signaler à un administrateur
Commentaire de EBArtSoft le 17/01/2007 14:30:45 administrateur CS

J'ai trouvé (enfin en fouinant) une autre methode : Tu peux generer toi même la trame ICMP avec un simple controle winsock et deux trois API ! Voir la source IP Spoofing sur vbfrance.

Simplement pour l'exemple car ça fait bcp de ligne pour pas grand chose

@+

signaler à un administrateur
Commentaire de Renfield le 18/01/2007 12:36:40 administrateur CS

effectivement...

je viens de tomber la dessus :

http://www.cppfrance.com/codes/PING-ICMP-RAW-SOCKET-DEV-CPP_10926.aspx

signaler à un administrateur
Commentaire de EBArtSoft le 15/07/2008 01:58:51 administrateur CS

oulala mais j'avais pas vu l'enorme betise dans le projet APIPing... en fait tu ne fais que resoudre le nom de domaine en ip mais a aucun moment tu ping l'ip ?! Donc c'est pas bon !

@+

signaler à un administrateur
Commentaire de Renfield le 15/07/2008 09:08:54 administrateur CS

pas faux: possible donc que l'IP sorte du cache...

bien vu !

signaler à un administrateur
Commentaire de Thanos_the_yopper le 28/10/2008 12:05:43

Et c'est le cas pour la plupart des projets. Au final, le seul qui n'a pas ce problème de cache est le projet WMIPing.

signaler à un administrateur
Commentaire de Renfield le 28/10/2008 18:46:23 administrateur CS

le pipe non plus (commande DOS)
a moins, peut etre qu'un flushdns ne soit necessaire...

signaler à un administrateur
Commentaire de Thanos_the_yopper le 29/10/2008 09:15:57

Peut-être, j'y connais pas grand chose :p
Ceci dit, merci pour cette source, ça m'a été bien utile. Et j'aime bien le principe du WMIPing, où il y a assez peu de code au final !

Ajouter un commentaire

Discussions en rapport avec ce code source dans le forum

Récuperation de valeur [ par ESC ] Je veux lancer grace à la commande shell une commande ms-dos du style "ping 127.0.0.1"Je voudrais récupérer le résultat soit dans une variable, soit d WMI -- Recherche infos systeme [ par Docmail ] Je cherche a recuperer en VB les differentes informations systeme d'une machine : Carte graphique, resolution, processeur, ram, carte reseau, mac adre Ping [ par Pir@tor2000 ] Je souhaiterais faire un ping dos a partir d'une applis mais le source disponible sur le site ne fait que planter la machine que ce soit sous 95, 98 o Urgent: Création d'un pipe avec VB [ par Cedric_Malache ] Je voudrais créer un pipe en VB grace a l'api createnamedpipe, mais le pipe ne se crée pas, voici le code: Dim sa As SECURITY_ATTRIBUTES Dim Psd Je voudrais envoyer des packets genre ping [ par revolt ] Comment envoyer des packets à qqun sur le net en spoofant son ip.....ou comment spoofer son ip avec vb. Ping ... [ par Kruptos ] Voilà , je voulais savoir s'il était possible d'envoyer une requête PING sur un serveur ... J'pense bien que le procédé est tout à fait réalisable mai Récupérer de sinfos provenant d'une fenêtre MSDOS [ par ZBob ] Salut à tous, Je souhaite faire un prog qui fait un ping sur un site via la commande MS-Dos et ensuite récupérer le ping et le nombre de paquets perdu Comment faire Ping + Winsock [ par Spylover ] Si kkun à un petit bout de source pour le ping sous winsock.Merci(je suis un peu flemmard sous le coup) Wmi ????? [ par AsselusBorealiss ] SalutJ'ai Recup un Code ( pour avoir des info sur la carte reseau , la marque ,vitesse , Mac ,ip etc,etc )Sauf que le code utilise Des "Control WMI"et Pourquoi "010" est traduit en "8" avec un ping sous W2K ? [ par Alextophi ] Pourquoi "010" est traduit en "8" avec un ping sous W2K ?exemple:C:\&gt;ping 10.104.52.1Envoi d'une requête 'ping' sur 10.104.52.1 avec 32 octets de d


Nos sponsors

Sondage...

CalendriCode

Juillet 2009
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
2728293031  

Consulter la suite du CalendriCode

Téléchargements

Logiciels à télécharger sur le même thème :

Comparez les prix Nouvelle version


Microsoft Visual Studio Pro 2008 (Windows 32 bits)
Entre 660€ et 749€


Visiter le guide achat

Photothèque Nouveau !

Photo sitges beachPhoto Cockpit Airbus A320
Photo jolie femme ronde et maturePhoto pretty women

Visiter la 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
Temps d'éxécution de la page : 0,328 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.