How make a demo verion?

[Jeff Barnes]

Hi Alvaro,

I use this code:

Code: Select all  Expand view

FUNCTION cSerialMB()
   LOCAL oLoc := CREATEOBJECT( "wbemScripting.SwbemLocator" )
   LOCAL oSrv := oLoc:ConnectServer()
   LOCAL oJbs := oSrv:ExecQuery( "SELECT * FROM Win32_BaseBoard" )
   LOCAL oJob
   LOCAL cMBSerial
   FOR EACH oJob IN oJbs
       cMBSerial := oJob:SerialNumber
   NEXT
RETURN cMBSerial
 

[Bayron]

Jeff,

Do you need to have Administrator's access to use this code???

[Jeff Barnes]

Hi Bayron,

I don't think you need admin rights but I'm not 100% sure.
I have had situations where I can't get the motherboard serial number so my code will then return the hard drive serial number. It's not a perfect solution but it works for me