----- Original Message -----
From: "Veeraraju_Mareddi" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Monday, September 17, 2001 9:29 AM
Subject: Win32::Lanman


> Dear List,
>
> I am Getting an Unknown error in this following script.Has anybody faced
> this problem
> ______________________________________________________
> use Win32::Lanman;
>
> if(!Win32::Lanman::NetGroupAddUser("\\\\hotnt001", 'Oracle_Coretech',
> "hot\\vm8797"))
>
>  {
>       print 'Failed and Error:';
>       print Win32::Lanman::GetLastError();
> }
>
It seems that this is a case of not reading the docs properly:
Quote:
NetGroupAddUser($server, $group, $user)

    Adds a user testuser to the global group testgroup on
    \\testserver.

     if(!Win32::Lanman::NetGroupAddUser("\\\\testserver", "testgroup",
"testuser"))
     {
            print "Sorry, something went wrong; error: ";
            # get the error code
            print Win32::Lanman::GetLastError();
            exit 1;
     }
EndQuote

The syntax of the group name is incorrect.

ego
Edward G. Orton, GWN Consultants Inc.
Phone: 613-764-3186, Fax: 613-764-1721
email: [EMAIL PROTECTED]

_______________________________________________
Perl-Win32-Admin mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-admin

Reply via email to