Scripting for MOM

2003-03-19 Thread Stanley . G . Martin
Has anyone done any scripting for the Microsoft Operations Manager (MOM) yet? I just started to eval it for my group here in Sprint and was wondering if it was going to be very flexible, where I could add my own scripts to it. Stanley G. Martin Sprint - EIS³ Customer Care [EMAIL PROTECTED

Duplicate Entries in Array

2003-01-07 Thread Stanley . G . Martin
new about Perl. Stanley G. Martin Sprint - EIS³ Customer Care [EMAIL PROTECTED] attachment: WINMAIL.DAT

RE: date compare in sql ???

2002-12-27 Thread Stanley . G . Martin
This will get records where the date is within 30 days of today: WHERE TO_DAYS(NOW()) - TO_DAYS(DATE_FIELD) = 30 TO_DAYS is a function in MySql. There are a number of these type functions. Stanley G. Martin Sprint - ISS Enterprise App/Decision Support Services [EMAIL PROTECTED

RE: Updating wins problem

2002-10-31 Thread Stanley . G . Martin
I've seen this problem when I include the line: use Win32; To get around it, whenever I use a function from Win32 I simply fully qualify it. Ex. $machine = Win32::NodeName(); I can then remove the 'use Win32' line. Stanley G. Martin Sprint - ISS Enterprise App/Decision Support Services

Problem with Date::Manip

2002-10-25 Thread Stanley . G . Martin
:56 date3 = +0:0:1:0:19:48:56 There's defintely 7+ days between these two dates, it shows 0 days, 19 hours, 48 minutes, 56 seconds. Is this a bug? Is my use of DateCalc incorrect? Or is there a better/different way? Stanley G. Martin Sprint - ISS Enterprise App/Decision Support Services [EMAIL

Perl Script as a Service

2002-09-23 Thread Stanley . G . Martin
) ) { print Successfully added.\n; } else { print Failed to add service: . GetError() . \n; } print finished.\n; sub DumpError { print GetError(), \n; } sub GetError { return( Win32::FormatMessage( Win32::Daemon::GetLastError() ) ); } Stanley G. Martin Sprint - ISS Enterprise App/Decision

RE: Uptime of remote system??

2002-09-04 Thread Stanley . G . Martin
($os_lastboot, + 300 minutes); # time offset $os_lastboot = UnixDate($os_lastboot, %Y-%m-%d %T); # convert to readable time Stanley G. Martin Sprint - ISS Enterprise App/Decision Support Services 913.315.4576 913.226.3090 PCS [EMAIL PROTECTED] -Original Message- From: dbe

RE: Uptime of remote system??

2002-09-04 Thread Stanley . G . Martin
:\\Perl\\Site\\Lib\\Date\\Manip.cnf;   This tells Manip.pm to use the file Manip to get it's global settings.   Your installation tree may differ. Stanley G. Martin Sprint - ISS Enterprise App/Decision Support Services [EMAIL PROTECTED] -Original Message- From: MKhan [mailto:[EMAIL

Perl Presentation

2002-08-21 Thread Stanley . G . Martin
have either never heard of Perl or they've heard of it but thought they'd get to know it later. Stanley G. Martin Sprint - ISS Enterprise App/Decision Support Services [EMAIL PROTECTED] WINMAIL.DAT Description: application/ms-tnef

RE: Task Scheduler

2002-05-23 Thread Stanley . G . Martin
I'm having a problem on SOME but NOT ALL of my Win2k boxes with the Enum() method. It's very consistent on these particular servers in that it is successful on the SetTargetComputer method, but the array is empty after execution of the Enum method. Any thoughts on that? Stanley G. Martin

Adding Users to Groups

2002-02-20 Thread Stanley . G . Martin
I've been fighting this all day. I need to migrate about 30 local groups and about 500 domain users from an NT 4.0 box to a Win2000 box. I've been able to create the groups using Win32::Lanman, but haven't been able to add users to those groups with either Win32::Lanman or Win32::NetAdmin. I'm

RE: Drop Down list

2001-06-20 Thread stanley . g . martin
If you've done all the up front work with DBI and done your query, you just need to get the results into your list like this: while ($row = $sth-fetchrow_array) { print OPTION VALUE='$row$row; } Stanley G. Martin Midwest Consulting Group Sprint Platform Strategy Mgmt 913.315.3133

Getting description from Eventlog

2001-03-14 Thread stanley . g . martin
I get to it? Stanley G. Martin Midwest Consulting Group Sprint Platform Strategy Mgmt 913.315.3133 [EMAIL PROTECTED]

RE: (no subject)

2001-02-12 Thread stanley . g . martin
execute the command my @output = $t-cmd($command); # dump the output open (TELNET, " C:\\telnet.txt"); print TELNET @output; close(TELNET); Stanley G. Martin Midwest Consulting Group Sprint Platform Strategy Mgmt 913.315.3133 [EMAIL PROTECTED] -

Need a Module

2000-11-06 Thread stanley . g . martin
I cannot get to David Roth's site through PPM. Could someone send me the module Win32::Eventlog::Message? Stanley G. Martin Midwest Consulting Group Sprint Finance Reengineering 913.315.3133 [EMAIL PROTECTED]