Как добавить имя пользователя и пароль при подключении к другой машине?

@worsvch · Регистрация: 30.03.2014

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

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

Perl

1	my $wmi = Win32::OLE->GetObject("WinMgmts:\\\\$ip\\root\\CIMV2\\$user\\$pass","$user","$pass");

и так

Perl

1	my $wmi = Win32::OLE->GetObject("WinMgmts:\\\\$ip\\root\\CIMV2\\$user\\$pass");

и так

Perl

1	my $wmi = Win32::OLE->GetObject("WinMgmts:\\\\$ip\\root\\CIMV2,$user,$pass");

не выходит никак.

volodin661 · 01.04.2014, 05:02

пожалуй, способ задания credentials(пользователь+пароль) вызывающего процесса через moniker-строку( "winmgmts:" )
не получится. рекомендованный способ - создание объекта SWbemLocator и вызов метода ConnectServer

Perl

use strict;
use warnings;
use Win32::OLE qw(in);
 
my $remote = '192.168.1.13';
my $user = 'Администратор';
my $password = '12345';
 
my $locator    = Win32::OLE->CreateObject( 'WbemScripting.SWbemLocator' ) or warn;
 
my $service   = $locator->ConnectServer( $remote, "root\\cimv2", $user, $password );
 
print "$_->{Name}\n"  for  in $service->ExecQuery('Select * From Win32_Process' );

ps: но для локальных ресурсов вызов ConnectServer вернёт ошибку

@worsvch · 03.04.2014, 21:01 **[ТС]**

Все отлично, но есть нюанс.Выполняю

Perl

1	$service->ExecQuery('Select * From Win32_Process' );

на разных машинах, но он выводит не весь список, а как-то выборочно, на одной машине вообще только одну программу нашел, хотя перационка везде одинаковая и пользователь со всеми правами

volodin661 · 03.04.2014, 21:34

первое: запускаешь перл-скриптом, но локально, через моникер winmgts
второе: запускаешь этот же сервис пауэршелом с тем же пользователем, но удалённо

по результатам делаешь выводы.

@worsvch · 04.04.2014, 05:50 **[ТС]**

PS тоже самое выдал, плюс добавил следущее:
Get-WmiObject : Generic failure
At line:1 char:14
+ Get-WmiObject <<<< -Class Win32_Product -credential Администратор -computer xx.xx.xx.xx | select -Property name,capt
ion
+ CategoryInfo : InvalidOperation: (

[Get-WmiObject], ManagementException
+ FullyQualifiedErrorId : GetWMIManagementException,Microsoft.PowerShell.Commands.GetWmiObjectCommand

volodin661 · 04.04.2014, 18:57

э-э-э...

а если запустить на этой машине локально утилиту wbemtest с тем же запросом ?

да и эти инструменты пожалуй принесут пользу http://www.microsoft.com/en-us... x?id=24045

@masonik · 06.04.2014, 03:27

expect привинтить вообще не вариант?
для венды нет такого?

@worsvch · 06.04.2014, 09:17 **[ТС]**

При использовании wbemtest именно на этой машине выдает общую ошибку при выполнении запроса
Select * from Win32_Product

volodin661 · 06.04.2014, 15:02

тогда рецепт традиционный: чем разбираться, быстрее Windows переставить))

( наверное перемешались какие-нибудь DLL, я, признаюсь, не знаю инструмента,
с помощью которого можно с этим побороться )

Добавлено через 27 минут
,

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

expect привинтить вообще не вариант?
для венды нет такого?

1) совсем не вариант, к обсуждаемой проблеме отношения не имеет.
2) expect для Windows есть, made by ActiveState

volodin661 5989 / 1998 / 323 Регистрация: 10.12.2013 Сообщений: 6,882
	03.04.2014, 21:34	4
	первое: запускаешь перл-скриптом, но локально, через моникер winmgts второе: запускаешь этот же сервис пауэршелом с тем же пользователем, но удалённо по результатам делаешь выводы. 0

@worsvch 0 / 0 / 0 Регистрация: 30.03.2014 Сообщений: 12
	04.04.2014, 05:50 [ТС]	5
	PS тоже самое выдал, плюс добавил следущее: Get-WmiObject : Generic failure At line:1 char:14 + Get-WmiObject <<<< -Class Win32_Product -credential Администратор -computer xx.xx.xx.xx \| select -Property name,capt ion + CategoryInfo : InvalidOperation: ( [Get-WmiObject], ManagementException + FullyQualifiedErrorId : GetWMIManagementException,Microsoft.PowerShell.Commands.GetWmiObjectCommand 0

volodin661 5989 / 1998 / 323 Регистрация: 10.12.2013 Сообщений: 6,882
	04.04.2014, 18:57	6
	э-э-э... а если запустить на этой машине локально утилиту wbemtest с тем же запросом ? да и эти инструменты пожалуй принесут пользу http://www.microsoft.com/en-us... x?id=24045 0

@masonik 7 / 7 / 0 Регистрация: 26.11.2013 Сообщений: 108
	06.04.2014, 03:27	7
	expect привинтить вообще не вариант? для венды нет такого? 0

@worsvch 0 / 0 / 0 Регистрация: 30.03.2014 Сообщений: 12
	06.04.2014, 09:17 [ТС]	8
	При использовании wbemtest именно на этой машине выдает общую ошибку при выполнении запроса Select * from Win32_Product 0

volodin661 5989 / 1998 / 323 Регистрация: 10.12.2013 Сообщений: 6,882
	06.04.2014, 15:02	9
	тогда рецепт традиционный: чем разбираться, быстрее Windows переставить)) ( наверное перемешались какие-нибудь DLL, я, признаюсь, не знаю инструмента, с помощью которого можно с этим побороться ) Добавлено через 27 минут , Сообщение от masonik expect привинтить вообще не вариант? для венды нет такого? 1) совсем не вариант, к обсуждаемой проблеме отношения не имеет. 2) expect для Windows есть, made by ActiveState 0

Как добавить имя пользователя и пароль при подключении к другой машине?

Решение