Hôte de scripts Windows et ingénierie de correctifs rapides

Question

Je souhaite obtenir la liste des correctifs Windows installés et des mises à jour. J'utilise script ci-dessous:

strComputer = "." 
Set objWMIService = GetObject("winmgmts:" _ 
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") 

Set colQuickFixes = objWMIService.ExecQuery _ 
("Select * from Win32_QuickFixEngineering") 

Set objDateTime = CreateObject("WbemScripting.SWbemDateTime") 

For Each objQuickFix in colQuickFixes 
Wscript.Echo "Computer: " & objQuickFix.CSName 
Wscript.Echo "Description: " & objQuickFix.Description 
Wscript.Echo "Hot Fix ID: " & objQuickFix.HotFixID 
If Not (IsNull(objQuickFix.InstallDate) Or _ 
IsEmpty(objQuickFix.InstallDate)) Then 
objDateTime.Value = objQuickFix.InstallDate 
Wscript.Echo "Installation Date: " & objDateTime.GetFileTime 
Else 
WScript.Echo "Install Date Type: " & 
TypeName(objQuickFix.InstallDate) 
End If 
Wscript.Echo "Installed By: " & objQuickFix.InstalledBy 
Next 

Quand je lance ce script, je reçois un message d'erreur:

Syntax error 
Error Code 800A03EA 

Qu'est-ce qui ne va pas dans ce morceau de code? Merci! Désolé si mon anglais n'est pas parfait.

Answer 1

Il vous manque le caractère de continuation (_) ici:

''#      ----------- 
''#         | 
''#         \/ 

WScript.Echo "Install Date Type: " & _ 
TypeName(objQuickFix.InstallDate) 

Soit l'ajouter ou mettre le code dans une ligne de flambage:

WScript.Echo "Install Date Type: " & TypeName(objQuickFix.InstallDate)