Skip to content

Sys_GetSerialNumber

VB Scripting Library > OSD Scripting Library > System functions (OSD)

Gets the computers serial number from BIOS, and returns it in gsValue.
If a serial number can be located in BIOS, gbValue is TRUE, otherwise it returns FALSE.

No arguments provided.

Boolean, TRUE if function completed successfully.

Typpically used in the PreBootScript.wsf

The following example will retrieve the serial number and display a warning to the user if no serial number can be found.

Private Function IncludeScript(sScriptFile)
'...
End Function
'Begin
bStatus=True
If bStatus Then bStatus=IncludeScript("customlib.cis")
If bStatus Then bStatus=IncludeLibrary("Capalib.cin")
If bStatus Then bStatus=IncludeLibrary("Osdlib.cin")
If bStatus Then bStatus=Job_Start("WS","Script Name","1.0","ScriptName.log","INSTALL")
If bStatus Then bStatus=OSD_Initialize()
If bStatus Then bStatus=Sys_GetSerialNumber()
If bStatus and NOT gbValue Then bStatus=Dialog_ShowWarning("No serial number found in BIOS")
Job_End(bStatus)
'End main

Scripting Guidelines, Dialog_ShowWarning Constants Package Property Variables