This function determines if a reboot is needed due installation of patches.

Example:

C:\>cscript //nologo Function_RebootNeeded.vbs
No reboot required!

C:\>

'******************************************************************
' Function RebootNeeded()
'
' Checks if a reboot is needed.
'******************************************************************
Function RebootNeeded()

   On Error Resume Next
  
   Dim objSystemInfo
   Dim flgRebootNeeded
   
   flgRebootNeeded = False
   Set objSystemInfo = WScript.CreateObject("Microsoft.Update.SystemInfo")
   If Err.Number <> 0 Then
      Wscript.Echo "Error creating [Microsoft.Update.SystemInfo] object 0x" & Right("0000000" & Hex(Err.Number), 8) & ": " & Err.Description
      Err.Clear
   End If
   flgRebootNeeded = objSystemInfo.rebootrequired
   Set objSystemInfo = Nothing

   RebootNeeded = flgRebootNeeded

End Function

'************* Example *************
If RebootNeeded() Then
   Wscript.Echo "A reboot is needed to complete the installation."
Else
   Wscript.Echo "No reboot required!"
End If