Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Get local ip
Message
From
16/03/2004 11:34:40
 
 
To
16/03/2004 11:13:34
Cetin Basoz
Engineerica Inc.
Izmir, Turkey
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Title:
Miscellaneous
Thread ID:
00885258
Message ID:
00886718
Views:
11
Yes... Is True... ;)

.... And afford add uno more metod, for get MAC Address

PROCEDURE GetMACAddress

Local pGUID,rGUID,lcOldError, lnResult
Declare integer CoCreateGuid in 'OLE32.dll' string @pguid
Declare integer StringFromGUID2 in 'OLE32.dll' ;
string rguid, string @lpsz, integer cchMax
Declare integer UuidCreateSequential in 'RPCRT4.dll' string @ Uuid

pGUID = replicate(chr(0),16)
rGUID = replicate(chr(0),80)

lnResult = CoCreateGuid(@pGUID)
lnResult = UuidCreateSequential(@pGUID)

return substr( iif( lnResult = 0 and ;
StringFromGUID2(pGUID,@rGUID,40) # 0, StrConv(left(rGUID,76),6), "" ), 26,12)

ENDPROC
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform