VBS ошибка Учетные данные пользователя не могут использоваться для локальных подключений

@_Alex_91 · Регистрация: 22.06.2017

Author24 — интернет-сервис помощи студентам

запускаю скрипт который по идее должен устанавливать мси пакет на удаленном компе но в ответ ошибка помогите исправить уже все перепробовал

Visual Basic

Const wbemImpersonationLevelDelegate = 4
 
Set objWbemLocator = CreateObject("WbemScripting.SWbemLocator")
Set objConnection = objwbemLocator.ConnectServer _
    ("pcname-pc", "root\cimv2", "domian\admin", _
         "pass", , "kerberos:domian.local")
objConnection.Security_.ImpersonationLevel = wbemImpersonationLevelDelegate
 
Set objSoftware = objConnection.Get("Win32_Product")
errReturn = objSoftware.Install("\\server\name.msi",,True)

ошибка Учетные данные пользователя не могут использоваться для локальных подключений
пробовал и локальным и доменным админов ошибка та же

@Dmitrii · 18.08.2017, 12:22

_Alex_91, судя по ошибке, вы пытаетесь запускать этот сценарий на текущем, а не удалённом компьютере.
Если так, то ошибка возникает закономерно, т.к. модель безопасности WMI не допускает подключения к WMI-пространству текущего компьютера с альтернативными (относительно ваших) учётными данными.
Вот выдержка из MSDN (статья Connecting to WMI on a Remote Computer):

You are using your own account to access the remote machine. If you were trying to access a different account, you would need to supply additional credentials. (Note that trying to access WMI locally with credentials different than your current account is not permitted.)

.

@_Alex_91 · 18.08.2017, 14:58 **[ТС]**

Dmitrii, да действительно! спс! но сейчас другая ошибка требуется обьект objConnection но он есть или я что то путаю?

@Dmitrii · 19.08.2017, 17:23

_Alex_91, приведите полный текст сообщения об ошибке.

@_Alex_91 · 21.08.2017, 07:47 **[ТС]**

Dmitrii, строка 7
символ 1
требуется обьект 'objConnection'
код 800А01А8

@Dmitrii · 21.08.2017, 08:43

_Alex_91, упростите оператор создания объекта objConnection до такого вида:

Visual Basic

1	Set objConnection = objwbemLocator.ConnectServer("pcname-pc", "root\cimv2", "domian\admin", "pass")

и попробуйте выполнить сценарий.
Если ошибка останется, то покажите сообщение, которое выдаст сценарий:

Visual Basic

Const wbemImpersonationLevelDelegate = 4
 
Set objWbemLocator = CreateObject("WbemScripting.SWbemLocator")
On Error Resume Next
Set objConnection = objwbemLocator.ConnectServer("pcname-pc", "root\cimv2", "domian\admin", "pass")
WScript.Echo TypeName(objConnection)
objConnection.Security_.ImpersonationLevel = wbemImpersonationLevelDelegate

@_Alex_91 · 21.08.2017, 10:29 **[ТС]**

Dmitrii, сейчас новая ошибка

Visual Basic

Const wbemImpersonationLevelDelegate = 4
 
Set objWbemLocator = CreateObject("WbemScripting.SWbemLocator")
 
Set objConnection = objwbemLocator.ConnectServer("pcname-pc", "root\cimv2", "domian\admin", "pass")
 
objConnection.Security_.ImpersonationLevel = wbemImpersonationLevelDelegate
 
Set objSoftware = objConnection.Get("Win32_Product")
errReturn = objSoftware.Install("\\server\name.msi",,True)

ошибка в пакете безопасности
код 80070721
источник SWbemServicesEx

@Dmitrii · 21.08.2017, 11:49

Сообщение от _Alex_91

... ошибка в пакете безопасности...

Не поддерживаемый уровень олицетворения DCOM.
Используйте уровень олицетворения wbemImpersonationLevelImpersonate:

Visual Basic

1
2
3

Const wbemImpersonationLevelImpersonate = 3
Set objConnection = objwbemLocator.ConnectServer("pcname-pc", "root\cimv2", "domian\admin", "pass")
objConnection.Security_.ImpersonationLevel = wbemImpersonationLevelImpersonate

@Dmitrii 2618 / 548 / 109 Регистрация: 21.03.2012 Сообщений: 1,051
	18.08.2017, 12:22	2
	_Alex_91, судя по ошибке, вы пытаетесь запускать этот сценарий на текущем, а не удалённом компьютере. Если так, то ошибка возникает закономерно, т.к. модель безопасности WMI не допускает подключения к WMI-пространству текущего компьютера с альтернативными (относительно ваших) учётными данными. Вот выдержка из MSDN (статья Connecting to WMI on a Remote Computer): You are using your own account to access the remote machine. If you were trying to access a different account, you would need to supply additional credentials. (Note that trying to access WMI locally with credentials different than your current account is not permitted.) . 1

@_Alex_91 0 / 0 / 3 Регистрация: 22.06.2017 Сообщений: 56
	18.08.2017, 14:58 [ТС]	3
	Dmitrii, да действительно! спс! но сейчас другая ошибка требуется обьект objConnection но он есть или я что то путаю? 0

@Dmitrii 2618 / 548 / 109 Регистрация: 21.03.2012 Сообщений: 1,051
	19.08.2017, 17:23	4
	_Alex_91, приведите полный текст сообщения об ошибке. 0

@_Alex_91 0 / 0 / 3 Регистрация: 22.06.2017 Сообщений: 56
	21.08.2017, 07:47 [ТС]	5
	Dmitrii, строка 7 символ 1 требуется обьект 'objConnection' код 800А01А8 0

	21.08.2017, 11:49

VBS ошибка Учетные данные пользователя не могут использоваться для локальных подключений

Решение