Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Serial number of the mother board
Message
 
 
To
15/10/2002 12:43:23
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00711369
Message ID:
00711406
Views:
25
This message has been marked as the solution to the initial question of the thread.
>Hi all!
>
>Does anybody know how I can retrieve the serial number of the mother board?
>I don't even have an idea.
>
>Thanks in advance
>

Bertl,
If you have Windows 2000/XP, you can use the Windows Management Instrumentation. Try:
clear
local loloc, lowmi, locolboard, loboard, loproperty

loloc = createobject('WbemScripting.SWbemLocator')
lowmi = loloc.ConnectServer()

locolboard = lowmi.InstancesOf('Win32_Baseboard')
for each loboard in locolboard
	for each loproperty in loboard.Properties_
		if inlist(upper(loproperty.Name),'NAME', 'SERIALNUMBER', 'MANUFACTURER') then
			? loproperty.Name, loproperty.Value
		endif
		loproperty = .NULL.
	endfor
	loboard = .NULL.
endfor

store .NULL. to lowmi, loloc
See MSDN on the MS site for other properties of the Win32_Baseboard class.

HTH.
Larry Miller
MCSD
LWMiller3@verizon.net

Accumulate learning by study, understand what you learn by questioning. -- Mingjiao
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform