Vitesse de la connection reseau

**CrisTooR** · 19/06/2007, 14h43

Bonjour,

J'ai essayé par toutes sortes de moyen de trouvé comment pouvoir détecter la vitesse de la carte reseau.

L'information que l'on optient en cliquant sur notre connection, par exemple moi sa dit:

États : Connecté
Durée : 08:34:32 (sans importance)
Vitesse: 1.0 Gbits/s (ici c'est important, c'est l'information que je veux)

Ça me prendrais une façon de découvrir cela en vbs si possible comme je trouve toute les autres informations sur l'ordi à l'aide de vbs. J'ai essentiellement utiliser wmi pour avoir accès au information mais il ne semble pas possible d'avoir accès à la vitesse de la carte par wmi.

Merci de votre précieuse
CrisTooR

**ced600** · 19/06/2007, 16h00

Ici tu as la vitesse max de ta carte.
A mon avis tu aurais du placer ton sujet de discussion dans le sous forum VBS, c'est dans celui-ci que l'on traite les problèmes VBS.
Par la même occasion tu aurais regarde dans le contribution VBS et la tu aurais vu un jolie petit script qui fait un petit inventaire de l'ordinateur, et te donne toutes les caractéristiques. Et en le fouillant un peut, tu serais tombé sur un ligne qui te permet d'obtenir la vitesse maximale de la carte (Win32_NetworkAdapter MaxSpeed.)

**CrisTooR** · 19/06/2007, 16h17

Bon finalement j'ai trouvé!

Je partage ma solution, de cette façon j'éviterai peut-être de chercher pendant 3 jours à une autre personne!

J'ai fait un petit scrip vb qui donne la vitesse de la carte reseau, voilà :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
strComputer = "."
On Error Resume Next
 
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set col = objWMIService.ExecQuery("Select * from Win32_PerfFormattedData_Tcpip_NetworkInterface")
 
For Each obj in col
	Wscript.Echo "Computer: " & Int(obj.CurrentBandwidth/1000000) & " Mbits/s"
Next

Et voilà!