if (ConnectIPC($server, "", "", "")) {
$this->{f_resultsTB}->AppendText("Null Session to $server successful. \n");
# Now try getting some information
$this->{f_resultsTB}->AppendText("Connecting to Registry...\n");
$this->{f_resultsTB}->AppendText("Succesful!\n");
\&RegConnect($server);
####
$this->{f_resultsTB}->AppendText("[Local Users] \n");
@users = GetLocalUsers($server);
if (@users) {
foreach (@users) {
$this->{f_resultsTB}->AppendText("$_ \n");
$user = (split(/:/,$_))[1];
$l_user = (split(/\\/,$user))[1];
\&GetUserInfo($server,$l_user);
}
}
else {
$this->{f_resultsTB}->AppendText("Did not retrieve local users. \n");
}
##
##
if (ConnectIPC($server, "", "", "")) {
$this->{f_resultsTB}->AppendText("Null Session to $server successful. \n");
# Now try getting some information
$this->{f_resultsTB}->AppendText("Connecting to Registry...\n");
$this->{f_resultsTB}->AppendText("Succesful!\n");
\&RegConnect($server);
$this->{f_resultsTB}->AppendText("[Local Users] \n");
@users = GetLocalUsers($server);
if (@users) {
foreach (@users) {
$this->{f_resultsTB}->AppendText("$_ \n");
$user = (split(/:/,$_))[1];
$l_user = (split(/\\/,$user))[1];
\&GetUserInfo($server,$l_user);
}
}
else {
$this->{f_resultsTB}->AppendText("Did not retrieve local users. \n");
}
}
else {
$this->{f_resultsTB}->AppendText("Could not establish null session with $server. \n");
}