Kezdőoldal » Számítástechnika » Programozás » Hogyan tudom autoitban leolvas...

Hogyan tudom autoitban leolvasni a háló kártya számát?

Figyelt kérdés
2017. ápr. 17. 17:48
1 2 3
 1/26 BREADKING válasza:
Én azt javaslom hogy az autoit hivatalos fórumára írd ki ott biztos segítenek :D [link]
2017. ápr. 17. 17:59
Hasznos számodra ez a válasz?
 2/26 A kérdező kommentje:
Árpád által legyilkolt népek földjén élek s csak magyarul tudok. Ha valaki azt mondta neked hogy a tatárok törökök németek oroszok amerikaiak stb-k kiirtották az egészet, az hazudott.
2017. ápr. 17. 18:12
 3/26 BREADKING válasza:
Hát akkor nem tudok segíteni mert csak én is most ismerkedek vele. De egyébként mit akarsz készíteni?
2017. ápr. 17. 18:31
Hasznos számodra ez a válasz?
 4/26 A kérdező kommentje:

Feljegyezni hogy az éppen futó program melyik gépen fut.

Ez a gép neve:@ComputerName

Ez az ip cime:_GetIP()

Utóbbira van többféle is.

2017. ápr. 17. 19:00
 5/26 coopper ***** válasza:

Próbáld ezt, ezzel nekem ment (természetesen az IP-t javitsd a megfelelőre, vagy add át neki a beolvasott IP cimet) :


$MAC = _GetMACFromIP ("192.168.1.1")

MsgBox (0, "MAC Value", $MAC)


Func DllStructDelete($stStruct)

$stStruct = 0

EndFunc


Func _GetMACFromIP ($sIP)

Local $MAC,$MACSize

Local $i,$s,$r,$iIP


;Create the struct

;{

; char data[6];

;}MAC

$MAC = DllStructCreate("byte[6]")


;Create a pointer to an int

; int *MACSize;

$MACSize = DllStructCreate("int")


;*MACSize = 6;

DllStructSetData($MACSize,1,6)


;call inet_addr($sIP)

$r = DllCall ("Ws2_32.dll", "int", "inet_addr","str", $sIP)

$iIP = $r[0]


;Make the DllCall

$r = DllCall ("iphlpapi.dll", "int", "SendARP","int", $iIP,"int", 0,"ptr", DllStructGetPtr($MAC),"ptr", DllStructGetPtr($MACSize))


;Format the MAC address into user readble format: 00:00:00:00:00:00

$s = ""

For $i = 0 To 5

If $i Then $s = $s & ":"

$s = $s & Hex(DllStructGetData($MAC,1,$i+1),2)

Next


;Must free the memory after it is used

DllStructDelete($MAC);

DllStructDelete($MACSize)


;Return the user readble MAC address

Return $s

EndFunc


Forrás : [link]


Sok sikert.

üdv.

2017. ápr. 17. 19:55
Hasznos számodra ez a válasz?
 6/26 A kérdező kommentje:
nem megy
2017. ápr. 17. 21:11
 7/26 coopper ***** válasza:

A kódot kipróbáltam, nálam működött, az hogy nálad mi a hiba ebből a "sok" információból : "nem megy" sajnos nem tudom megmondani.


sok sikert.

üdv.

2017. ápr. 18. 07:09
Hasznos számodra ez a válasz?
 8/26 A kérdező kommentje:
nullákat irt ki
2017. ápr. 18. 11:16
 9/26 coopper ***** válasza:

Rendben, ez már egy kicsit több info :


Az első sorban lévő IP cimet módosítottad ?


Nekem akkor irt nullákat, ha olyan IP-nek a a MAC cimét szerettem volna megtudni, ami nem létezik.


A kódot kipróbáltam céges gépen is, és ott is tökéletesen működik, de, ha igy próbálom akkor nekem is nullákat ir ki :


$MAC = _GetMACFromIP ("192.167.9.1")

MsgBox (0, "MAC Value", $MAC)


Mivel a cégnél nincs "192.167.9.1" ip cimű gép/hálókártya.

Tehát a kérdés továbbra is a következő :


Az első sorban lévő IP cimet módosítottad a sajátodnak megfelelően, vagy átadtad neki a megszerzett IP cimet a következő módon (ha az IP cim megszerzésére a _GetIP() függvényt használod) ? :


Illetve ha igy próbáltad akkor előtte irasd ki az IP-t, hogy leellenőrizd, hogy biztosan jó-e az IP cim :


MsgBox (0, "IP cim", _GetIP())

$MAC = _GetMACFromIP (_GetIP())

MsgBox (0, "MAC Value", $MAC)


Sok sikert.

üdv.

2017. ápr. 18. 11:44
Hasznos számodra ez a válasz?
 10/26 A kérdező kommentje:

A teljes kódot másoltam be s ezt a getip-t irtam be az Ip cim helyére.


Most ezt is futattam, a háló kártya számát rendben kiirja, de a másodiknál leáll ezzel a hibaüzenettel:


[link]

2017. ápr. 18. 11:53
1 2 3

Kapcsolódó kérdések:




Minden jog fenntartva © 2025, www.gyakorikerdesek.hu
GYIK | Szabályzat | Jogi nyilatkozat | Adatvédelem | Cookie beállítások | WebMinute Kft. | Facebook | Kapcsolat: info(kukac)gyakorikerdesek.hu

A weboldalon megjelenő anyagok nem minősülnek szerkesztői tartalomnak, előzetes ellenőrzésen nem esnek át, az üzemeltető véleményét nem tükrözik.
Ha kifogással szeretne élni valamely tartalommal kapcsolatban, kérjük jelezze e-mailes elérhetőségünkön!