Wifi signal meter

Soyez le premier à donner votre avis sur cette source.

Vue 6 837 fois - Téléchargée 1 808 fois

Description

Projet pour avoir le niveau du signal wifi. On utilise le WMI de Windows et la classe NDIS_80211.
Tout est pret dans le zip, mais si vous voulez dedans il y a mon courier electronique.
C'est ma premiere contribution, pour tant soyez indulgents avec... et avec mon mauvais Francais.
Avec plaisir...

Source / Exemple :


Dans le zip.....

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

Existe un "bug" du WMI du Windows, le seconde poste aparait avec beaucoup de garbage.
Je suis en train de recuperer les data par bytes.... pour voir si c'est posible de ranger bien les data de WMI.
D'autre part, pour recuperer le channel il est obligatoire de jouer avec Select Case, donc WMI donne la frequence au centre du channel.
'
Set wlan = GetObject("winmgmts:root/wmi").InstancesOf("MSNdis_80211_BSSIList", 32)
For Each nic In wlan
objecte = nic.Ndis80211BSSIList
Next nic
For Each ob In objecte
obCadena = ob.Ndis80211Configuration.DSConfig
obCadena = Mid(obCadena, 1, 4) ' on recupere les 4 premiers xifres
Next ob
'
canal = ""
Select Case obCadena
Case "2412"
canal = "1"

Case "2417"
canal = "2"

Case "2422"
canal = "3"

Case "2427"
canal = "4"

Case "2432"
canal = "5"

Case "2437"
canal = "6"

Case "2442"
canal = "7"

Case "2447"
canal = "8"

Case "2452"
canal = "9"

Case "2457"
canal = "10"

Case "2462"
canal = "11"

End SelectIf canal "" Then canal ">11"
lblCanal.Caption = canal
'
'
Un Query a WMI donne ça :

instance of MSNdis_80211_Configuration
{
Active = TRUE;
InstanceName = "TG123g USB Wireless Adapter";
Ndis80211Config =
instance of MSNdis_80211_ConfigurationInfo
{
ATIMWindow = 0;
BeaconPeriod = 100;
ConfigLength = 32;
DSConfig = 2427000;
FHConfig =
instance of MSNdis_80211_ConfigurationFH
{
DwellTime = 0;
FHLength = 16;
HopPattern = 0;
HopSet = 0;
};
};
};
Galactus13
Messages postés
326
Date d'inscription
lundi 29 septembre 2008
Statut
Membre
Dernière intervention
27 juillet 2019
1 -
Quelques bugs résiduel certes ...
Mais, sa marche, et c'est un programme somme toute: court ^^

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.