begin process at 2012 02 10 01:11:03
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Réseau & Internet

 > PING EN VB CINQ FACONS DE PROCEDER.

PING EN VB CINQ FACONS DE PROCEDER.


 Information sur la source

Note :
7 / 10 - par 5 personnes
7,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
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é :15 947 / 3 681

Auteur : Renfield

Ecrire un message privé
Site perso
Ce membre participe au partage de revenus publicitaires
Commentaire sur cette source (16)
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

Les Membres Club peuvent 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

 Sources du même auteur

Source avec Zip Source avec une capture ENUMERATION DES PORTS TCP ET IDENTIFCATION DU PROCESS (PID) ...
Source avec Zip Source avec une capture JSON PARSER - ANALYSE DE CHAINES JSON
Source avec Zip Source avec une capture MODULE DE TÉLÉCHARGEMENT DE FICHIER BASIQUE (SYNCHRONE / ASY...
Source avec Zip COURS DE PILOTAGE........D'APPLICATIONS
Source avec Zip CSOCKET - REMPLACEZ WINSOCK PAR LA VERSION 2 DES API

 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 Source avec une capture LECTURE DES INFORMATIONS DES DISQUES COMPOSANT UN ENSEMBLE R... par jack
Source avec Zip Source .NET (Dotnet) CLASSE POUR CONNECTER/DÉCONNECTER UN LECTEUR RÉSEAU par radcur
Source avec Zip Source avec une capture Source .NET (Dotnet) COMMENT CONTRÔLER TOTALEMENT LES PROCESSUS D'UN PC DISTANT (... par violent_ken
Source avec Zip INFOS WMI DES DISQUES DURS (LIEN LECTEUR LOGIQUE / LECTEUR P... par Renfield
Source avec Zip SIMULATEUR NSLOOKUP (PING PAR WMI) par sallzouwaya

Commentaires et avis

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 ?

@+

Commentaire de Cacophrene le 17/03/2006 20:17:37

Salut !

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

Cordialement,
Cacophrène

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

et de cinq ^^

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









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.

@+

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 :(

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)

Commentaire de lex1111 le 17/01/2007 13:45:03

excellent je teste ^^

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

@+

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

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 !

@+

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

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

bien vu !

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.

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...

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 !

Commentaire de Runs59 le 01/10/2010 11:27:25 10/10

Super le coup du pipe ! Vraiment tip-top !

Merci !!!

 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

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 : 0,889 sec (3)

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