2009-03-20 2 views
1

на данный момент я получаю сообщение об ошибке:VB Script GetObject ошибка метод ... Помогите пожалуйста WMI

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

Error: Invalid procedure call or Argument: "GetObject" 
Code: 800A005 
Source: Microsoft VBScript Runtime error 
+0

Недавняя редакция удалила важную проблему, из-за которой было трудно предложить разумные исправления. :( – Fionnuala

+0

@Spida; можете ли вы опубликовать весь код, этот сниппс работает для меня. Кроме того, какая ОС вы используете это? –

+0

Что не написано Spida? Он должен подтвердить, что это в коде или просто Опечатка здесь – EBGreen

ответ

2

полностью переписан.

Вот код, созданный WMI Code Creator, с очень незначительным редактированием.

strComputer = "." 
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2") 
Set colItems = objWMIService.ExecQuery(_ 
    "SELECT * FROM Win32_ComputerSystem",,48) 
For Each objItem in colItems 
    MsgBox "CurrentTimeZone: " & objItem.CurrentTimeZone 
Next 
+0

Привет, спасибо за ответ, но можете ли вы указать, где я забыл вернуть косую черту, поскольку я просто сравнил код с вашим, и они точно такие же – 2009-03-20 09:57:31

+0

Сообщение было отредактировано, и исходная проблема больше не видела. Я процитировал исходное сообщение в своем ответе. Вы можете просмотреть исходное сообщение, нажав «отредактированный n минут». – Fionnuala

+0

Hi Remou спасибо за обновление, но я вставляю весь свой код, не могли бы вы внести изменения, поскольку я борется, я сделал то, что вы сказали, но все равно дает мне ошибку: ************ ********************** – 2009-03-20 10:34:51