Fix ambiguity between SMBIOSVersion (from SMBIOS) and BIOSVersion (from BIOS manufacturer)

Renamed GetBIOSVersionString* to GetSMBIOSVersionString*

Author: franklesniak

…No_Dependencies/GetBIOSVersionString.vbs …_Dependencies/GetSMBIOSVersionString.vbsVBScript/02_Upfront_Encapsulated_Code_With_No_Dependencies/GetBIOSVersionString.vbs renamed to VBScript/02_Upfront_Encapsulated_Code_With_No_Dependencies/GetSMBIOSVersionString.vbs VBScript/02_Upfront_Encapsulated_Code_With_No_Dependencies/GetBIOSVersionString.vbs renamed to VBScript/02_Upfront_Encapsulated_Code_With_No_Dependencies/GetSMBIOSVersionString.vbs

@@ -1,9 +1,9 @@
-Function GetBIOSVersionString(ByRef strBIOSVersion)
+Function GetSMBIOSVersionString(ByRef strSMBIOSVersion)
     'region FunctionMetadata ####################################################
     ' This function obtains the computer's systems management BIOS version number in string
     ' format, if available and configured by the computer's manufacturer.
     '
-    ' The function takes one positional argument (strBIOSVersion), which is populated upon
+    ' The function takes one positional argument (strSMBIOSVersion), which is populated upon
     ' success with a string containing the computer's systems management BIOS version number in
     ' string format. The systems management BIOS version number is equivalent to the Win32_BIOS
     ' system property SMBIOSBIOSVersion
@@ -16,13 +16,13 @@ Function GetBIOSVersionString(ByRef strBIOSVersion)
     ' data for the systems management BIOS version string is used.
     '
     ' Example:
-    '   intReturnCode = GetBIOSVersionString(strBIOSVersion)
+    '   intReturnCode = GetSMBIOSVersionString(strSMBIOSVersion)
     '   If intReturnCode >= 0 Then
     '       ' The systems management BIOS version string was retrieved successfully and is
-    '       ' stored in strBIOSVersion
+    '       ' stored in strSMBIOSVersion
     '   End If
     '
-    ' Version: 1.0.20210711.0
+    ' Version: 2.0.20210711.0
     'endregion FunctionMetadata ####################################################
 
     'region License ####################################################
@@ -56,7 +56,7 @@ Function GetBIOSVersionString(ByRef strBIOSVersion)
 
     'region DependsOn ####################################################
     ' GetBIOSInstances()
-    ' GetBIOSVersionStringUsingBIOSInstances()
+    ' GetSMBIOSVersionStringUsingBIOSInstances()
     'endregion DependsOn ####################################################
 
     Dim intFunctionReturn
@@ -68,13 +68,13 @@ Function GetBIOSVersionString(ByRef strBIOSVersion)
     intFunctionReturn = GetBIOSInstances(arrBIOSInstances)
     If intFunctionReturn >= 0 Then
         ' At least one Win32_BIOS instance was retrieved successfully
-        intFunctionReturn = GetBIOSVersionStringUsingBIOSInstances(strResult, arrBIOSInstances)
+        intFunctionReturn = GetSMBIOSVersionStringUsingBIOSInstances(strResult, arrBIOSInstances)
         If intFunctionReturn >= 0 Then
             ' The computer's BIOS version string was retrieved successfully and is stored in
             ' strResult
-            strBIOSVersion = strResult
+            strSMBIOSVersion = strResult
         End If
     End If
 
-    GetBIOSVersionString = intFunctionReturn
+    GetSMBIOSVersionString = intFunctionReturn
 End Function

…tBIOSVersionStringUsingBIOSInstances.vbs …MBIOSVersionStringUsingBIOSInstances.vbsVBScript/02_Upfront_Encapsulated_Code_With_No_Dependencies/GetBIOSVersionStringUsingBIOSInstances.vbs renamed to VBScript/02_Upfront_Encapsulated_Code_With_No_Dependencies/GetSMBIOSVersionStringUsingBIOSInstances.vbs VBScript/02_Upfront_Encapsulated_Code_With_No_Dependencies/GetBIOSVersionStringUsingBIOSInstances.vbs renamed to VBScript/02_Upfront_Encapsulated_Code_With_No_Dependencies/GetSMBIOSVersionStringUsingBIOSInstances.vbs

@@ -1,4 +1,4 @@
-Function GetBIOSVersionStringUsingBIOSInstances(ByRef strBIOSVersion, ByVal arrBIOSInstances)
+Function GetSMBIOSVersionStringUsingBIOSInstances(ByRef strSMBIOSVersion, ByVal arrBIOSInstances)
     'region FunctionMetadata ####################################################
     ' Assuming that arrBIOSInstances represents an array / collection of the available BIOS
     ' instances (of type Win32_BIOS), this function obtains the computer's systems management
@@ -9,7 +9,7 @@ Function GetBIOSVersionStringUsingBIOSInstances(ByRef strBIOSVersion, ByVal arrB
     ' systems return a version like "A23"
     '
     ' The function takes two positional arguments:
-    '  - The first argument (strBIOSVersion) is populated upon success with a string
+    '  - The first argument (strSMBIOSVersion) is populated upon success with a string
     '    containing the computer's systems management BIOS version number in string format.
     '    The systems management BIOS version number is equivalent to the Win32_BIOS system
     '    property SMBIOSBIOSVersion
@@ -27,14 +27,14 @@ Function GetBIOSVersionStringUsingBIOSInstances(ByRef strBIOSVersion, ByVal arrB
     '   intReturnCode = GetBIOSInstances(arrBIOSInstances)
     '   If intReturnCode >= 0 Then
     '       ' At least one Win32_BIOS instance was retrieved successfully
-    '       intReturnCode = GetBIOSVersionStringUsingBIOSInstances(strBIOSVersion, arrBIOSInstances)
+    '       intReturnCode = GetSMBIOSVersionStringUsingBIOSInstances(strSMBIOSVersion, arrBIOSInstances)
     '       If intReturnCode >= 0 Then
     '           ' The systems management BIOS version string was retrieved successfully and is
-    '           ' stored in strBIOSVersion
+    '           ' stored in strSMBIOSVersion
     '       End If
     '   End If
     '
-    ' Version: 1.0.20210706.0
+    ' Version: 2.0.20210711.0
     'endregion FunctionMetadata ####################################################
 
     'region License ####################################################
@@ -152,8 +152,8 @@ Function GetBIOSVersionStringUsingBIOSInstances(ByRef strBIOSVersion, ByVal arrB
     End If
 
     If intFunctionReturn >= 0 Then
-        strBIOSVersion = strResultToReturn
+        strSMBIOSVersion = strResultToReturn
     End If
 
-    GetBIOSVersionStringUsingBIOSInstances = intFunctionReturn
+    GetSMBIOSVersionStringUsingBIOSInstances = intFunctionReturn
 End Function