Número de MAC

[mhlezama]

Saludos amigos

Tengo un servidor donde esta el EXE y las DBF, las computadoras se conectan a través de un LinkedIn o acceso directo

Cuando el usuario accesa al servidor., el programa debiera de leer el número de MAC del SERVIDOR.

COMO puedo hacer esto?

[Carlos R. Veron]

Buen dia, fijate si te ayuda.

https://comunidadvfp.blogspot.com/2002/02/obtener-ip-mac-address-y-guid.html

Busca en San Google hay muchas formas e informacion.

Carlos Veron

[mhlezama]

Gracias

[mhlezama]

Saludos

El sistema me da la Mac del cliente y no servidor.

Necesito que sea del servidor

[Cesar Arias]

prueba este codigo que lo desarrollo alguien de este foro

FUNCTION MacAddress

LOCAL pGUID,rGUID,lnSize

DECLARE INTEGER CoCreateGuid IN 'OLE32.dll' ;

STRING @pguid

DECLARE INTEGER StringFromGUID2 IN 'OLE32.dll' ;

STRING rguid, STRING @lpsz, INTEGER cchMax

pGUID=REPLICATE(CHR(0),16)

rGUID=REPLICATE(CHR(0),80)

****

IF "5." $ OS() OR OS(5)="7600" && 2000/XP,7

   DECLARE INTEGER UuidCreateSequential IN 'RPCRT4.dll' STRING @ Uuid

   xDir=SUBSTR( IIF( UuidCreateSequential(@pGUID) = 0 ; 

   AND StringFromGUID2(pGUID,@rGUID,40) # 0, ;

   STRCONV(LEFT(rGUID,76),6), "" ), 26,12)

   RETURN xDir

ELSE

   xDir=SUBSTR( IIF( CoCreateGuid(@pGUID) = 0 ;

   AND StringFromGUID2(pGUID,@rGUID,40) # 0, ;

   STRCONV(LEFT(rGUID,76),6), "" ), 26,12)

   ***

   RETURN xDir 

ENDIF

ENDFUNC