[R] Adresse Mac et IP correspondante

[r140]

Bonjour,

Est 'il possible de récuperer l'adresse ip et l'adresse mac correspondante.

Merci

[jbnh]

pour l'adresse ip il faut récupérer la valeur que retourne ipconfig dans le comspec.

L'adresse mac je ne sais pas ce que c'est

[Cyrille]

Pour l'adresse mac c'est nbtstat dans l'invite de commande :
nbtstat -a nom de la machine
nbtstat -A ip de la machine
et d'autre option.
Ca affiche les stats des protocoles et des connexions utilisant netbios sur tcp/ip, l'adresse mac est donnée à la fin.
Ca marche aussi avec une machine distante.

[jl56]

bonjour

J'ai concut ça pour récuperer une mac adresse

► Afficher le texte

Code : Tout sélectionner

; par jl56

#include <Constants.au3>
$message = ""
$ip=InputBox("ip","mac adresse pour quel ip?",@IPAddress1,"")
$foo = Run(@ComSpec & " /c nbtstat.exe -A "&$ip,"",@SW_HIDE, $STDERR_CHILD + $STDOUT_CHILD)
$macadresse=""

While 1
    $line = StdoutRead($foo)
    If @error Then ExitLoop
    $test="Adresse MAC = "
    if StringLen($line)>0 Then
        for $i=1 to StringLen($line) - 14
            if StringMid($line,$i,14)=$test then 
            $macadresse=StringUpper(StringMid($line,$i+14,17))
            ExitLoop
            EndIf
        Next
    EndIf

Wend


;nbstat n'a pas fonctionné on essai avec arp
if $macadresse="00-00-00-00-00-00" or $macadresse="" then

$foo = Run(@ComSpec & " /c arp.exe -a "&$ip,"",@SW_HIDE, $STDERR_CHILD + $STDOUT_CHILD)
$macadresse=""
While 1
    $line = StdoutRead($foo)
    If @error Then ExitLoop
    $test=$ip
    if StringLen($line)>0 Then
        for $i=1 to StringLen($line) - StringLen($ip)
            if StringMid($line,$i,StringLen($ip))=$test then 
                ;ip trouvé dans la table arp
                    $i=$i+StringLen($ip)+1
                    ; on laisse passer tous les espaces apres l'ip
                    While StringMid($line,$i,1)=" "
                        $i=$i+1
                    WEnd
                    $macadresse=StringUpper(StringMid($line,$i,17))
            ExitLoop
            EndIf
        Next
    EndIf

Wend

EndIf
MsgBox(0,"Mac Adresse=",$macadresse)

a+ jl56

[BeCool]

Jbnh, l'adresse mac est une adresse physique de ta carte réseau qui et composé de 6 octet, sous forme hexadécimal. Par exemple 00:10:B5:14:A8:6C (en fait ça sert d'écouter en cours... Un peu )

L'adresse mac sert aussi pour le Wake-up On Lan, c'est a dire, pour pouvoir allumer ton PC a distance.
Elle est aussi le meilleurs moyen de pouvoir pirater un PC... Mais je ne m'attarderais pas là dessus car c'est illégal

En fait, ton adresse mac et caché par ton adresse IP. Mais tu peux quand même arriver a récupérer des adresses mac grâce a de l'analyse de tram.

Voilà pour la petite info ^^

Edit : Je viens de tester le script. Un peu long, mais peut être très utile
Par contre, je ne vois pas l'utilité de demander pour quel IP on veut savoir l'adresse mac, étant donné que si on rentre l'adresse IP de quelqu'un d'autre qui se trouve sur le même réseau, ça ne marche pas.

[DJSIR]

Pour l'adresse IP :
@IPAddress1
EXPL :

Code : Tout sélectionner

$Input_IpAddress = GUICtrlCreateInput("" & @IPAddress1, 180, 250, 280, 20)

ou
_GetIP()
EXPL :

Code : Tout sélectionner

#include <Inet.au3>
$PublicIP = _GetIP()
MsgBox(0, "IP Address", "Your IP Address is: " & $PublicIP)

[r140]

Bonjour,

Pour répondre à une question ceci est pour identifier un pc dans un parc informatique comme les adresses mac sont uniques ceci permet de simplifier la gestion.
Je voulai faire si possible le script sans utiliser de commandes externe, une autre question est 'il possible de récupérer le nom de l'interface réseau connecté.
Dans le cas où il existe deux carte réseau.
Merci

[Cyrille]

Dans ce cas la tu as deux ip, une pour chaque carte.
Tu n'as qu'a regarder les ip, ou faire un ping vers une adresse connu celui qui répond c'est le bon.

[r140]

Bonsoir,

Merci ceci est une solution pour l'adresse IP, mais peut'on récupérer le nom de la carte réseau connecté sans utilisé de commande externe.
Merci

[moutelous]

Bonsoir,

Pourquoi réinventer la roue... la commande "GETMAC /V" vous donne le nom de la connexion, le nom de la carte réseau , l'@dresse MAC et le nom du transport ...

A+

[r140]

Ok,

Cela peut être une solution quand même, merci et @+