Windows Script Host и Quick Fix Engineering - PullRequest
Новая
       21

Windows Script Host и Quick Fix Engineering

0 голосов
/ 20 октября 2010

Я хочу получить список установленных исправлений и обновлений Windows.Я использую скрипт ниже: 

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

Когда я запускаю этот скрипт, я получаю сообщение об ошибке: 

Syntax error
Error Code 800A03EA

Что не так в этом фрагменте кода?Спасибо!Извините, если мой английский не идеален.

1 Ответ

0 голосов
/ 20 октября 2010

Вам не хватает символа продолжения строки (_) здесь: 

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

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

Либо добавьте его, либо введите код в отдельной строке: 

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