Solved, I had a problem with the RAS service.

Thanks for your help Bruno.


----- Original Message -----
From: "Bellenger, Bruno (Paris)" <BelleBru@[...].com> 
To: <perl-win32-admin@[...].com> 
Cc: "'Xavier Calatrava'" <xcalatrava@[...].es> 
Sent: Friday, April 27, 2001 11:43 AM
Subject: RE: Problems with RasAdmin module


> 
>  Your code as shown is incomplete.
>  At the very minimum you should have :
> 
>  use Win32::RasAdmin;
> 
>  $RASServer = "RASservername" ;
> 
>  if (Win32::RasAdmin::ServerGetInfo("\\\\$RASServer", \%Hash)){
>      print "success:\n";
>      DumpHash(%Hash);
>      print "\n" ;
> 
>  }else{
>      print "fail.\n";
>  }
> 
>  sub DumpHash{
>      my (%temp) = @_;
> 
>      foreach $Temp (sort (keys (%temp))){
>          print "\t$Temp = $temp{$Temp}\n";
>      }
>  }
> 
>  Check Dave Roth's site about RasAdmin.
>  http://www.roth.net/
>  While you're there, check out his two excellent books about Perl for Win32
>  admin.
> 
>  The site has the full RasAdmin_Test.pl script which works nicely. It is
>  available at the below link :
>  ftp://ftp.roth.net/pub/ntperl/rasadmin/
> 
> 
> 
> 
> 
>  > -----Original Message-----
>  > From: Xavier Calatrava [SMTP:xcalatrava@[...].es]
>  > Sent: 27 April 2001 10:05
>  > To: perl-win32-admin@[...].com
>  > Subject: Problems with RasAdmin module
>  >
>  > Hi all!
>  > When I execute the code
>  >
>  > use Win32::RasAdmin;
>  >
>  > if (Win32::RasAdmin::ServerGetInfo($RASServer, \%Hash)){
>  >     print "success:\n";
>  >     DumpHash(%Hash);
>  > }else{
>  >     print "fail.\n";
>  > }
>  >
>  > I get
>  >
>  > Time (in msec) for CallNamedPipe to complete: 250
>  > Time (in msec) for CallNamedPipe to complete: 251
>  > fail.
>  >
>  > I got the same result for all the functions in this module. I'm using
>  > WinNT4
>  > workstation sp6a with perl AS5.22.
>  >
>  > Any ideas?
>  >
>  > _______________________________________________
>  > Perl-Win32-Admin mailing list
>  > Perl-Win32-Admin@[...].com
>  > http://listserv.ActiveState.com/mailman/listinfo/perl-win32-admin
> 
> 

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