Página 1 de 1

MAC ADDRESS

Publicado: Mié Mar 23, 2011 9:12 am
por FRANK[1]
You can read the mac address with xailer?
someone can give me some suggestions?
Tanks
Frank

MAC ADDRESS

Publicado: Mié Mar 23, 2011 10:09 am
por Maarten Roos
Hi Frank,
I use this:
FUNCTION GetMacAddress()
LOCAL nHKey := HKEY_LOCAL_MACHINE
LOCAL cRegPath := "SOFTWAREMicrosoftWindows Genuine Advantage"
LOCAL cRegKey := "MAC"
LOCAL cMac := ""
WITH OBJECT tregistry():Create()
:Root := nHKey
IF :OpenKey( cRegPath ) == 0
cMac := PADR(:GetString( cRegKey ),17)
:CloseKey()
ENDIF
:Destroy()
END WITH
RETURN cMac

MAC ADDRESS

Publicado: Mié Mar 23, 2011 10:46 am
por FRANK[1]
Hi Maarten,
THANK YOU FOR TIP
THERE IS A WAY TO READ THE MAC ADDRESS DIRECTLY FROM NETWORK CARD?
"Maarten Roos" <m[dot]roos[at]ecem[dot]com> ha scritto nel messaggio
news:4d89b8e1$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
> Hi Frank,
>
> I use this:
>
> FUNCTION GetMacAddress()
> LOCAL nHKey := HKEY_LOCAL_MACHINE
> LOCAL cRegPath := "SOFTWAREMicrosoftWindows Genuine
> Advantage"
> LOCAL cRegKey := "MAC"
> LOCAL cMac := ""
>
> WITH OBJECT tregistry():Create()
> :Root := nHKey
> IF :OpenKey( cRegPath ) == 0
> cMac := PADR(:GetString( cRegKey ),17)
> :CloseKey()
> ENDIF
> :Destroy()
> END WITH
>
> RETURN cMac

MAC ADDRESS

Publicado: Mié Mar 23, 2011 1:50 pm
por jlalin
FRANK,
> THERE IS A WAY TO READ THE MAC ADDRESS DIRECTLY FROM NETWORK CARD?
In the spanish forum there is a old thread where Xavi published a function
to read it.
Regards,
José Lalí­n