FiveTech Software tech support forums

Posted: **Wed Apr 26, 2006 2:39 pm**

Existe alguna forma de leer esta identificacion, pues el serialdisk() cambia luego de ser formateado el PC o si se usa como clave, puede ser duplicado el disco y se pierde el control.
Alguna idea respecto de tarjetas fisicas del PC ( tj. madre, tj de red, etc )
Gracias.

Posted: **Wed Apr 26, 2006 3:57 pm**

Julio,

GETNETCARDID() --> nSerieTarjetaRed

Posted: **Wed Apr 26, 2006 4:03 pm**

Gracias, lo revisaré !!

Posted: **Wed Dec 13, 2017 2:43 pm**

Antonio Linares wrote:Julio,

GETNETCARDID() --> nSerieTarjetaRed

Saludos,

Y para obtener serial de tarjeta madre cual es la funcion ?

Posted: **Wed Dec 13, 2017 3:22 pm**

Code: Select all Expand view: #Include "FiveWin.ch" function Main() local nTarjeta nTarjeta := Tarjeta_Madre() ? nTarjeta return nil Function Tarjeta_Madre() LOCAL oLoc := CreateObject( "wbemScripting.SwbemLocator" ) LOCAL oSrv := oLoc:ConnectServer(,"root\cimv2") LOCAL aDrives := oSrv:ExecQuery( "SELECT * FROM Win32_ComputerSystemProduct" ) LOCAL oDrive, cSerialTarj := "" LOCAL aData := {} LOCAL nAt FOR Each oDrive in aDrives AADD( aData, oDrive:UUID ) NEXT FOR nAt := 1 to Len( aData ) cSerialTarj += Upper( AllTrim( cStr( aData[nAt] ) ) ) NEXT nAt Return( cSerialTarj )

Saludos.

Posted: **Wed Dec 13, 2017 3:27 pm**

karinha wrote:
Code: Select all Expand view
#Include "FiveWin.ch" function Main() local nTarjeta nTarjeta := Tarjeta_Madre() ? nTarjeta return nil Function Tarjeta_Madre() LOCAL oLoc := CreateObject( "wbemScripting.SwbemLocator" ) LOCAL oSrv := oLoc:ConnectServer(,"root\cimv2") LOCAL aDrives := oSrv:ExecQuery( "SELECT * FROM Win32_ComputerSystemProduct" ) LOCAL oDrive, cSerialTarj := "" LOCAL aData := {} LOCAL nAt FOR Each oDrive in aDrives AADD( aData, oDrive:UUID ) NEXT FOR nAt := 1 to Len( aData ) cSerialTarj += Upper( AllTrim( cStr( aData[nAt] ) ) ) NEXT nAt Return( cSerialTarj )

Saludos.

Muchas gracias Karinha

Posted: **Fri Apr 09, 2021 12:16 am**

hola empecé a usar Tarjeta_Madre() y todo bien pero después de unos días me da un numero de serie diferente de la mima Pc
sera cosa de mi compu ? :shock:

Saluditos

FiveTech Software tech support forums

Nro. serial de la tarjeta de red.

Nro. serial de la tarjeta de red.

Re:

Re: Nro. serial de la tarjeta de red.

Re: Nro. serial de la tarjeta de red.

Re: Nro. serial de la tarjeta de red.