I was using that module about 6 months back and wrote this in my daily log: "There is a bug in the Win32::Service::GetStatus function. If the service is not running, its type is not reported. Basically, the only thing the Win32::Service::GetStatus function is good for is to find if the service is running or not. Any other information must be garnered by directly reading the registry."
I ending up just reading the registry as that was appropriate for my app. Else, you can make sure the NT resource kit is installed and parse the response of the "sc \\hostname query servicename" command. Cheers, john > -----Original Message----- > From: Conor Lillis [mailto:[EMAIL PROTECTED]] > Sent: Wednesday, May 01, 2002 11:48 PM > To: 'Perl-Win32-Admin (E-mail) > Subject: Win32::Service::GetStatus > > > Hi, > I am having inconsistent results with Win32::Service::GetStatus not > returning reliable results regarding the status of services. > Services I know to be runing are returning as 1 (Stopped). > > I have attached the script (apologies in advance to anyone > who thinks that's > rude). > > > The information in this email is confidential and may be > legally privileged. It is intended solely for the addressee. > Access to this email by anyone else is unauthorised.if you > are not the intended recipient, any disclosure, copying, > distribution, or any action taken or omitted to be taken in > reliance on it is prohibited and may be unlawful. Please note > that any views, opinions or advice contained in this email > are those of the sending individual and not necessarily those > of the firm. It is possible for data transmitted by e-mail to > be deliberately or accidentally corrupted or intercepted. For > this reason, where the communication is by e-mail, J&E Davy > does not accept any responsibility for any breach of > confidence which may arise from the use of this medium. If > you have received this e-mail in error please notify us > immediately at mailto:[EMAIL PROTECTED] and delete this e-mail > from your system. > > _______________________________________________ > Perl-Win32-Admin mailing list > [EMAIL PROTECTED] > To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs > _______________________________________________ Perl-Win32-Admin mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
