Re: Re: Win32::TieRegistry and Connect Method Errors

Hi,

Bonus points to Tye for suspecting that it was authentication related. (see below)

If you're interested, here's what I tried:

I tried intially stepping through various sleeps (from 1000 ms to 10000ms) to no avail. The script still did not connect.

I tried connecting using NET USE with the Domain Admin user and password and this did not work (though I suspect that I did something wrong with the command so we will leave that aside :)

If I managed to successfully embed the NET USE within the script, I will post the code here.

Finally I popped up a Command shell Running as Domain Administrator and tried the script. It connected successfully every time.

So thanks for all your help though we are still not left with any convincing reason for the original error.

Thanks

Kakaze

Comment on Re: Re: Win32::TieRegistry and Connect Method Errors Select or Download Code

Replies are listed 'Best First'.
Re: Re: Re: Win32::TieRegistry and Connect Method Errors by kakaze (Sexton) on Nov 13, 2003 at 09:46 UTC
As I suspected, I was doing something wrong with the `NET USE` command. Here's how it should look to connect to a machine: `$list = "net use \\\\$Machine $password /USER:$domain\\$user"; system ("$list");` [download] And then connect as follows: `$regKey = $Registry->Connect( $Machine, $target, { Access=>KEY_READ } );` Note that I do not do and explicit `or die` after the connect attempt since I want to trap the failed machines so I do an `if ($regKey) {}` later in the code. Kakaze	[reply] [d/l] [select]

Replies are listed 'Best First'.

Re: Re: Re: Win32::TieRegistry and Connect Method Errors
by kakaze (Sexton) on Nov 13, 2003 at 09:46 UTC

As I suspected, I was doing something wrong with the NET USE command.

Here's how it should look to connect to a machine:

$list = "net use \\\\$Machine $password /USER:$domain\\$user";
system ("$list");
[download]

And then connect as follows: $regKey = $Registry->Connect( $Machine, $target, { Access=>KEY_READ } );

Note that I do not do and explicit or die after the connect attempt since I want to trap the failed machines so I do an if ($regKey) {} later in the code.

Kakaze

[reply]
[d/l]
[select]