Extract MachinID
Moderator: Neosoft Support
-
- NeoSoft Team
- Posts: 5628
- Joined: Thu Mar 31, 2005 10:48 pm
- Location: Oregon, USA
- Contact:
Dave:
Do you have an XP machine you can try it on? I'm running XP Pro SP2.
Do you have an XP machine you can try it on? I'm running XP Pro SP2.
Wrangler
--------------
"You never know about a woman. Whether she'll laugh, cry or go for a gun." - Louis L'Amour
Windows 7 Ultimate SP1 64bit
16GB Ram
Asus GTX 950 OC Strix
Software made with NeoBook
http://highdesertsoftware.com
--------------
"You never know about a woman. Whether she'll laugh, cry or go for a gun." - Louis L'Amour
Windows 7 Ultimate SP1 64bit
16GB Ram
Asus GTX 950 OC Strix
Software made with NeoBook
http://highdesertsoftware.com
-
- Posts: 1596
- Joined: Mon Apr 04, 2005 4:13 pm
- Location: Buenos Aires, Argentina
- Contact:
-
- NeoSoft Team
- Posts: 5628
- Joined: Thu Mar 31, 2005 10:48 pm
- Location: Oregon, USA
- Contact:
El plugin tmSystemInfo nos muestra mucha información sobre la Bios:
-------------------------
The plugin tmSystemInfo shows us lots of information about BIOS:
http://www.neosoftware.com/neobook/modu ... 6&start=10
MACHINE:
15: MachineName
16: User
17: Computer
18: BIOS Copyright
19: BIOS Date
20: BIOS ExtendedInfo
21: BIOS NameString
22: BIOS Version
23: BIOS Revision
24: BIOS SystemModel
25: BIOS SystemManufacturer
26: BIOS SystemVersion
27: BIOS SystemSerial
28: BIOS SystemUUID
29: BIOS BIOSVendor
30: BIOS BIOSVersion
31: BIOS BIOSDate
32: BIOS MainBoardModel
33: BIOS MainBoardManufacturer
34: BIOS MainBoardVersion
35: BIOS MainBoardSerial
36: BIOS MainBoardLocationInChassis
37: BIOS ChassisManufacturer
38: BIOS ChassisVersion
39: BIOS ChassisSerial
40: CapsLock - True/False
41: NumLock- True/False
42: ScrollLock - True/False
43: LastBoot
44: System UpTime
-------------------------
The plugin tmSystemInfo shows us lots of information about BIOS:
http://www.neosoftware.com/neobook/modu ... 6&start=10
MACHINE:
15: MachineName
16: User
17: Computer
18: BIOS Copyright
19: BIOS Date
20: BIOS ExtendedInfo
21: BIOS NameString
22: BIOS Version
23: BIOS Revision
24: BIOS SystemModel
25: BIOS SystemManufacturer
26: BIOS SystemVersion
27: BIOS SystemSerial
28: BIOS SystemUUID
29: BIOS BIOSVendor
30: BIOS BIOSVersion
31: BIOS BIOSDate
32: BIOS MainBoardModel
33: BIOS MainBoardManufacturer
34: BIOS MainBoardVersion
35: BIOS MainBoardSerial
36: BIOS MainBoardLocationInChassis
37: BIOS ChassisManufacturer
38: BIOS ChassisVersion
39: BIOS ChassisSerial
40: CapsLock - True/False
41: NumLock- True/False
42: ScrollLock - True/False
43: LastBoot
44: System UpTime
Good one, Softsing. I had bought that plug and forgot all about it.
Wrangler
--------------
"You never know about a woman. Whether she'll laugh, cry or go for a gun." - Louis L'Amour
Windows 7 Ultimate SP1 64bit
16GB Ram
Asus GTX 950 OC Strix
Software made with NeoBook
http://highdesertsoftware.com
--------------
"You never know about a woman. Whether she'll laugh, cry or go for a gun." - Louis L'Amour
Windows 7 Ultimate SP1 64bit
16GB Ram
Asus GTX 950 OC Strix
Software made with NeoBook
http://highdesertsoftware.com
You know, I bet Alberto uses the WMI interface to do those functions.Wrangler wrote:Good one, Softsing. I had bought that plug and forgot all about it.
I see that many of his projects are wrappers for other programs that are available in both the opensource and commercial world. That is why some things could be fixed and other things could not.
I for one am still waiting for some video software that is scheduled to be released in October of 2007 by Alberto
David P.
You mean October of 3007, don't you? Gotta give'em time.
I just tested Al's sysinfo plug on my machine, and get nothing for 'Bios System Serial', which I assume is the bios serial we are talking about. 'Mainboard Manufacturer' is also empty, and a few others.
Although I still believe all that info is in there, apparently it isn't accessible in certain configurations, so can't be depended upon to work on every machine.
I just tested Al's sysinfo plug on my machine, and get nothing for 'Bios System Serial', which I assume is the bios serial we are talking about. 'Mainboard Manufacturer' is also empty, and a few others.
Although I still believe all that info is in there, apparently it isn't accessible in certain configurations, so can't be depended upon to work on every machine.
Wrangler
--------------
"You never know about a woman. Whether she'll laugh, cry or go for a gun." - Louis L'Amour
Windows 7 Ultimate SP1 64bit
16GB Ram
Asus GTX 950 OC Strix
Software made with NeoBook
http://highdesertsoftware.com
--------------
"You never know about a woman. Whether she'll laugh, cry or go for a gun." - Louis L'Amour
Windows 7 Ultimate SP1 64bit
16GB Ram
Asus GTX 950 OC Strix
Software made with NeoBook
http://highdesertsoftware.com
Hi,
Maybe a plugin that looks in the bottom of the CPU box can help here.
beno
Maybe a plugin that looks in the bottom of the CPU box can help here.
beno
---------
http://www.benitoestrada.net
http://www.benitoestrada.net
Script WMI para obtener información de BIOS.
En teoria debe funcionar en cualquier sistema Win32
-----------------------------------------------------------------
WMI Script to get information from BIOS.
In theory it should work on any Win32 system
------------------------------------------------------------------
Set colBIOS = objWMIService.ExecQuery _
("Select * from Win32_BIOS")
For each objBIOS in colBIOS
Wscript.Echo "Build Number: " & objBIOS.BuildNumber
Wscript.Echo "Current Language: " & objBIOS.CurrentLanguage
Wscript.Echo "Installable Languages: " & objBIOS.InstallableLanguages
Wscript.Echo "Manufacturer: " & objBIOS.Manufacturer
Wscript.Echo "Name: " & objBIOS.Name
Wscript.Echo "Primary BIOS: " & objBIOS.PrimaryBIOS
Wscript.Echo "Release Date: " & objBIOS.ReleaseDate
Wscript.Echo "Serial Number: " & objBIOS.SerialNumber
Wscript.Echo "SMBIOS Version: " & objBIOS.SMBIOSBIOSVersion
Wscript.Echo "SMBIOS Major Version: " & objBIOS.SMBIOSMajorVersion
Wscript.Echo "SMBIOS Minor Version: " & objBIOS.SMBIOSMinorVersion
Wscript.Echo "SMBIOS Present: " & objBIOS.SMBIOSPresent
Wscript.Echo "Status: " & objBIOS.Status
Wscript.Echo "Version: " & objBIOS.Version
For i = 0 to Ubound(objBIOS.BiosCharacteristics)
Wscript.Echo "BIOS Characteristics: " & _
objBIOS.BiosCharacteristics(i)
Next
Next
En teoria debe funcionar en cualquier sistema Win32
-----------------------------------------------------------------
WMI Script to get information from BIOS.
In theory it should work on any Win32 system
------------------------------------------------------------------
Set colBIOS = objWMIService.ExecQuery _
("Select * from Win32_BIOS")
For each objBIOS in colBIOS
Wscript.Echo "Build Number: " & objBIOS.BuildNumber
Wscript.Echo "Current Language: " & objBIOS.CurrentLanguage
Wscript.Echo "Installable Languages: " & objBIOS.InstallableLanguages
Wscript.Echo "Manufacturer: " & objBIOS.Manufacturer
Wscript.Echo "Name: " & objBIOS.Name
Wscript.Echo "Primary BIOS: " & objBIOS.PrimaryBIOS
Wscript.Echo "Release Date: " & objBIOS.ReleaseDate
Wscript.Echo "Serial Number: " & objBIOS.SerialNumber
Wscript.Echo "SMBIOS Version: " & objBIOS.SMBIOSBIOSVersion
Wscript.Echo "SMBIOS Major Version: " & objBIOS.SMBIOSMajorVersion
Wscript.Echo "SMBIOS Minor Version: " & objBIOS.SMBIOSMinorVersion
Wscript.Echo "SMBIOS Present: " & objBIOS.SMBIOSPresent
Wscript.Echo "Status: " & objBIOS.Status
Wscript.Echo "Version: " & objBIOS.Version
For i = 0 to Ubound(objBIOS.BiosCharacteristics)
Wscript.Echo "BIOS Characteristics: " & _
objBIOS.BiosCharacteristics(i)
Next
Next
- smartmedia
- Posts: 889
- Joined: Fri Apr 01, 2005 6:50 am
- Location: Hellas
- Contact:
-
- NeoSoft Team
- Posts: 5628
- Joined: Thu Mar 31, 2005 10:48 pm
- Location: Oregon, USA
- Contact:
Try this:
Code: Select all
strComputer = "."
Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colBIOS = objWMIService.ExecQuery("Select * from Win32_BIOS")
For each objBIOS in colBIOS
publication.nbSetVar "[BIOSSerialNum]", objBIOS.SerialNumber
Next
NeoSoft Support
- smartmedia
- Posts: 889
- Joined: Fri Apr 01, 2005 6:50 am
- Location: Hellas
- Contact:
-
- NeoSoft Team
- Posts: 5628
- Joined: Thu Mar 31, 2005 10:48 pm
- Location: Oregon, USA
- Contact:
It seems to work for me. I just created a VBScript function:
It may be that this code doesn't work with some brands of BIOS. I don't know.
Code: Select all
{NeoBook Function}
Version=5.60
Language=VBScript
{End}
strComputer = "."
Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colBIOS = objWMIService.ExecQuery("Select * from Win32_BIOS")
For each objBIOS in colBIOS
publication.nbSetVar "[BIOSSerialNum]", objBIOS.SerialNumber
Next
NeoSoft Support
I get an invalid character error for:
{NeoBook Function}
{NeoBook Function}
Wrangler
--------------
"You never know about a woman. Whether she'll laugh, cry or go for a gun." - Louis L'Amour
Windows 7 Ultimate SP1 64bit
16GB Ram
Asus GTX 950 OC Strix
Software made with NeoBook
http://highdesertsoftware.com
--------------
"You never know about a woman. Whether she'll laugh, cry or go for a gun." - Louis L'Amour
Windows 7 Ultimate SP1 64bit
16GB Ram
Asus GTX 950 OC Strix
Software made with NeoBook
http://highdesertsoftware.com