RE: WMI query to get VPN connection's IP address under Vista

2008-07-14 Thread Carl Houseman 
No takers?  I've made some further discoveries...

 

I can use the Win32_IP4RouteTable to get the VPN IP address.  This is a
workable solution, but still, there must be a better way.

 

That route table entry references an InterfaceIndex that is not among those
returned by Win32_NetworkAdapterConfiguration.

The same is true of the route table entry for 127.0.0.1.

 

So the VPN is apparently using some virtual network interface that I can't
query with WMI?

 

Carl

 

 

From: Carl Houseman [mailto:[EMAIL PROTECTED] 
Sent: Sunday, July 13, 2008 8:50 PM
To: NT System Admin Issues
Subject: WMI query to get VPN connection's IP address under Vista

 

Standard MS VPN.  How can one find the VPN connection's IP address with WMI
under Vista?

 

Running Scriptomaticv2.hta (elevated), I've looked at everything returned
for 

 

Win32_NetworkAdapter

Win32_NetworkAdapterConfiguration

Win32_NetworkAdapterSetting

 

and the IP address shown by ipconfig doesn't appear in any of the results.

 

Works great under XP though.  Everything I've googled doesn't say this
should be different under Vista, but it is.  Just my machine?

 

TIA,

Carl

 

 

~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~

WMI query to get VPN connection's IP address under Vista

2008-07-13 Thread Carl Houseman 
Standard MS VPN.  How can one find the VPN connection's IP address with WMI
under Vista?

 

Running Scriptomaticv2.hta (elevated), I've looked at everything returned
for 

 

Win32_NetworkAdapter

Win32_NetworkAdapterConfiguration

Win32_NetworkAdapterSetting

 

and the IP address shown by ipconfig doesn't appear in any of the results.

 

Works great under XP though.  Everything I've googled doesn't say this
should be different under Vista, but it is.  Just my machine?

 

TIA,

Carl


~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~   ~

Large Environment Backup solutions, was "WMI Query"

2008-07-09 Thread Eric Woodford 
BTW, I am very happy with my current employer's solution. They are running
EMC Networker and from the Exchange server perspective it works seemlessly,
even with our 8 node Exchange 2k3 cluster.. :) EMC still hasn't resolved an
issue where it fails to restore to a RSG, but nothing that failing-over to a
passive node hasn't resolved.

On Tue, Jul 8, 2008 at 8:43 PM, Steven Peck <[EMAIL PROTECTED]> wrote:

> From the docs, I think their clustering solutions are less then
> optimal and are a hodgepodge of 'ya it works if you do 30 line
> install' but their docs are pretty much only for active/passive
> clusters.  Not three or four server clusters.
>
> I imagine our dedicated storage team is on such lists.  I stay as far
> as possible.  Unfortunately some times yo have to interact with the
> backup systems.
>
> Steven
>
> On Tue, Jul 8, 2008 at 8:08 PM, Kurt Buff <[EMAIL PROTECTED]> wrote:
> > Wow. Definitely not our experience. Sorry to hear that.
> >
> > Of course, we don't have clustered anything.
> >
> > BTW, just in case you're not aware of it, there's a TSM listserv - I'm
> > not at work at the moment, but remind me tomorrow, and I'll shoot you
> > the address if you want. There's some really good folks on that list.
> > I think you'll find they're quite helpful.
> >
> > On Tue, Jul 8, 2008 at 6:38 PM, Steven Peck <[EMAIL PROTECTED]> wrote:
> >> Umm.. NO, it is not.  It sucks.
> >>
> >> It does do what it's supposed to eventually, but frankly getting it to
> >> do it right or applying the inevitable client upgrades is always a
> >> challenge.  When something isn't working right the logs/alerts fail to
> >> properly identify the problem, the answers from support can be vague,
> >> unhelpful and downright random at times.  (Asking for support on an
> >> Exchange cluster results in documentation for a SQL cluster, requests
> >> and finally demands to get the right documentation resulted in the
> >> Exchange docs (and a non-Tivoli link) and the comment that running SQL
> >> and Exchange on the same box wasn't recommended but we could try it
> >> and let them know.  Ar!
> >>
> >> A dedicated backup team, over 1,000 Windows servers and a few hundred
> >> Unix flavors and a mainframe environment or two.  I really do not like
> >> the product at all.
> >>
> >> Steven Peck
> >> http://www.blkmtn.org
> >>
> >>
> >> On Tue, Jul 8, 2008 at 4:12 PM, Kurt Buff <[EMAIL PROTECTED]> wrote:
> >>> That depends on your environment. For a large shop, with staff large
> >>> enough so that several are dedicated specifically to
> >>> backup/restore/DR/BC/etc., TSM is probably an excellent fit.
> >>>
> >>> It's much too large and complex for shops of lesser capability, IMHO -
> >>> yet, we use it, and get by with it, and have for about 8 years - it
> >>> predates my tenure in this position.
> >>>
> >>> I respect the software, but would switch in a heartbeat, except for two
> things:
> >>>
> >>> 1) the cost to continue using is is ridiculously low - maintenance is
> >>> something like $200/year for the 10 or so servers we use it for - that
> >>> makes the cost of switching to something else much less attractive.
> >>>
> >>> 2) Support is actually pretty good - we've called many times, asking
> >>> for bits of information, and have gotten answers in a reasonable
> >>> amount of time, with no attitude.
> >>>
> >>> On Tue, Jul 8, 2008 at 3:19 PM, Rod Trent <[EMAIL PROTECTED]>
> wrote:
> >>>> "that product is a major PIA to administer"
> >>>>
> >>>>
> >>>>
> >>>> And, the fact that that has held true for over 15 years and has never
> >>>> improved is sad testament to the product.  Tivoli was created for the
> >>>> consulting industry – not for the regular Admin.
> >>>>
> >>>>
> >>>>
> >>>> From: Eric Woodford [mailto:[EMAIL PROTECTED]
> >>>> Sent: Tuesday, July 08, 2008 6:10 PM
> >>>> To: NT System Admin Issues
> >>>> Subject: Re: WMI Query
> >>>>
> >>>>
> >>>>
> >>>> FYI:
> >>>>
> >>>> "Wscript.echo" is a command to echo (or display) the information that
> comes
> >>&

Re: WMI Query

2008-07-08 Thread Steven Peck 
>From the docs, I think their clustering solutions are less then
optimal and are a hodgepodge of 'ya it works if you do 30 line
install' but their docs are pretty much only for active/passive
clusters.  Not three or four server clusters.

I imagine our dedicated storage team is on such lists.  I stay as far
as possible.  Unfortunately some times yo have to interact with the
backup systems.

Steven

On Tue, Jul 8, 2008 at 8:08 PM, Kurt Buff <[EMAIL PROTECTED]> wrote:
> Wow. Definitely not our experience. Sorry to hear that.
>
> Of course, we don't have clustered anything.
>
> BTW, just in case you're not aware of it, there's a TSM listserv - I'm
> not at work at the moment, but remind me tomorrow, and I'll shoot you
> the address if you want. There's some really good folks on that list.
> I think you'll find they're quite helpful.
>
> On Tue, Jul 8, 2008 at 6:38 PM, Steven Peck <[EMAIL PROTECTED]> wrote:
>> Umm.. NO, it is not.  It sucks.
>>
>> It does do what it's supposed to eventually, but frankly getting it to
>> do it right or applying the inevitable client upgrades is always a
>> challenge.  When something isn't working right the logs/alerts fail to
>> properly identify the problem, the answers from support can be vague,
>> unhelpful and downright random at times.  (Asking for support on an
>> Exchange cluster results in documentation for a SQL cluster, requests
>> and finally demands to get the right documentation resulted in the
>> Exchange docs (and a non-Tivoli link) and the comment that running SQL
>> and Exchange on the same box wasn't recommended but we could try it
>> and let them know.  Ar!
>>
>> A dedicated backup team, over 1,000 Windows servers and a few hundred
>> Unix flavors and a mainframe environment or two.  I really do not like
>> the product at all.
>>
>> Steven Peck
>> http://www.blkmtn.org
>>
>>
>> On Tue, Jul 8, 2008 at 4:12 PM, Kurt Buff <[EMAIL PROTECTED]> wrote:
>>> That depends on your environment. For a large shop, with staff large
>>> enough so that several are dedicated specifically to
>>> backup/restore/DR/BC/etc., TSM is probably an excellent fit.
>>>
>>> It's much too large and complex for shops of lesser capability, IMHO -
>>> yet, we use it, and get by with it, and have for about 8 years - it
>>> predates my tenure in this position.
>>>
>>> I respect the software, but would switch in a heartbeat, except for two 
>>> things:
>>>
>>> 1) the cost to continue using is is ridiculously low - maintenance is
>>> something like $200/year for the 10 or so servers we use it for - that
>>> makes the cost of switching to something else much less attractive.
>>>
>>> 2) Support is actually pretty good - we've called many times, asking
>>> for bits of information, and have gotten answers in a reasonable
>>> amount of time, with no attitude.
>>>
>>> On Tue, Jul 8, 2008 at 3:19 PM, Rod Trent <[EMAIL PROTECTED]> wrote:
>>>> "that product is a major PIA to administer"
>>>>
>>>>
>>>>
>>>> And, the fact that that has held true for over 15 years and has never
>>>> improved is sad testament to the product.  Tivoli was created for the
>>>> consulting industry – not for the regular Admin.
>>>>
>>>>
>>>>
>>>> From: Eric Woodford [mailto:[EMAIL PROTECTED]
>>>> Sent: Tuesday, July 08, 2008 6:10 PM
>>>> To: NT System Admin Issues
>>>> Subject: Re: WMI Query
>>>>
>>>>
>>>>
>>>> FYI:
>>>>
>>>> "Wscript.echo" is a command to echo (or display) the information that comes
>>>> after it.
>>>>
>>>> I think you more want to do an IF statement.
>>>>
>>>> If objItem.Name = "Tivoli Storage Manager" then
>>>>' echo the contents to the screen
>>>> end if
>>>>
>>>>
>>>> BTW, Sorry about Tivoli, that product is a major PIA to administer.
>>>>
>>>> On Tue, Jul 8, 2008 at 2:33 PM, [EMAIL PROTECTED] <[EMAIL PROTECTED]> 
>>>> wrote:
>>>>
>>>> That's closer.  Trying to query to see if TSM is installed. Can I just add
>>>>
>>>> Wscript.Echo "GroupName: " Tivoli Storage Manager
>>>>
>>>> To see if TSM is installed?
>>>>
>>>>
&g

RE: WMI Query

2008-07-08 Thread Mike Semon 
Thanks everyone. I got it to work.

-Original Message-
From: Rod Trent [mailto:[EMAIL PROTECTED] 
Sent: Tuesday, July 08, 2008 5:06 PM
To: NT System Admin Issues
Subject: RE: WMI Query

Here's one way to do it...

http://www.myitforum.com/articles/11/view.asp?id=10464 

-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] 
Sent: Tuesday, July 08, 2008 5:58 PM
To: NT System Admin Issues
Subject: RE: WMI Query

If strComputer can't be a muti-valued property, how would you query mutiple
servers?

Original Message:
-
From: Michael B. Smith [EMAIL PROTECTED]
Date: Tue, 8 Jul 2008 17:26:59 -0400
To: ntsysadmin@lyris.sunbelt-software.com
Subject: RE: WMI Query


Well, it won't work. strComputer can't be a multi-valued property in WMI.

Also, this particular line has obvious problems:

Wscript.Echo "Name: TSM & objItem.Name

Regards,

Michael B. Smith
MCITP:EM/MCSE/Exchange MVP
http://TheEssentialExchange.com


-Original Message-
From: Rod Trent [mailto:[EMAIL PROTECTED] 
Sent: Tuesday, July 08, 2008 5:22 PM
To: NT System Admin Issues
Subject: RE: WMI Query

What info are you looking to retrieve?

Are you saying this does or doesn't work?

-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] 
Sent: Tuesday, July 08, 2008 5:12 PM
To: NT System Admin Issues
Subject: WMI Query

Looking for help with WMI query for an application (TSM). 

On Error Resume Next
strComputer = "Server1
   Server2
   Server3" 
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from
Win32_ProgramGroup",,48)
For Each objItem in colItems
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "GroupName: " & objItem.GroupName
Wscript.Echo "Name: TSM & objItem.Name
Wscript.Echo "SettingID: " & objItem.SettingID
Wscript.Echo "UserName: " & objItem.UserName
Next

Can anyone help?

Thanks,

Mike


mail2web LIVE - Free email based on MicrosoftR Exchange technology -
http://link.mail2web.com/LIVE



~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~




~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~


~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~



mail2web.com - MicrosoftR Exchange solutions from a leading provider -
http://link.mail2web.com/Business/Exchange



~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~




~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~




~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~

Re: WMI Query

2008-07-08 Thread Kurt Buff 
Wow. Definitely not our experience. Sorry to hear that.

Of course, we don't have clustered anything.

BTW, just in case you're not aware of it, there's a TSM listserv - I'm
not at work at the moment, but remind me tomorrow, and I'll shoot you
the address if you want. There's some really good folks on that list.
I think you'll find they're quite helpful.

On Tue, Jul 8, 2008 at 6:38 PM, Steven Peck <[EMAIL PROTECTED]> wrote:
> Umm.. NO, it is not.  It sucks.
>
> It does do what it's supposed to eventually, but frankly getting it to
> do it right or applying the inevitable client upgrades is always a
> challenge.  When something isn't working right the logs/alerts fail to
> properly identify the problem, the answers from support can be vague,
> unhelpful and downright random at times.  (Asking for support on an
> Exchange cluster results in documentation for a SQL cluster, requests
> and finally demands to get the right documentation resulted in the
> Exchange docs (and a non-Tivoli link) and the comment that running SQL
> and Exchange on the same box wasn't recommended but we could try it
> and let them know.  Ar!
>
> A dedicated backup team, over 1,000 Windows servers and a few hundred
> Unix flavors and a mainframe environment or two.  I really do not like
> the product at all.
>
> Steven Peck
> http://www.blkmtn.org
>
>
> On Tue, Jul 8, 2008 at 4:12 PM, Kurt Buff <[EMAIL PROTECTED]> wrote:
>> That depends on your environment. For a large shop, with staff large
>> enough so that several are dedicated specifically to
>> backup/restore/DR/BC/etc., TSM is probably an excellent fit.
>>
>> It's much too large and complex for shops of lesser capability, IMHO -
>> yet, we use it, and get by with it, and have for about 8 years - it
>> predates my tenure in this position.
>>
>> I respect the software, but would switch in a heartbeat, except for two 
>> things:
>>
>> 1) the cost to continue using is is ridiculously low - maintenance is
>> something like $200/year for the 10 or so servers we use it for - that
>> makes the cost of switching to something else much less attractive.
>>
>> 2) Support is actually pretty good - we've called many times, asking
>> for bits of information, and have gotten answers in a reasonable
>> amount of time, with no attitude.
>>
>> On Tue, Jul 8, 2008 at 3:19 PM, Rod Trent <[EMAIL PROTECTED]> wrote:
>>> "that product is a major PIA to administer"
>>>
>>>
>>>
>>> And, the fact that that has held true for over 15 years and has never
>>> improved is sad testament to the product.  Tivoli was created for the
>>> consulting industry – not for the regular Admin.
>>>
>>>
>>>
>>> From: Eric Woodford [mailto:[EMAIL PROTECTED]
>>> Sent: Tuesday, July 08, 2008 6:10 PM
>>> To: NT System Admin Issues
>>> Subject: Re: WMI Query
>>>
>>>
>>>
>>> FYI:
>>>
>>> "Wscript.echo" is a command to echo (or display) the information that comes
>>> after it.
>>>
>>> I think you more want to do an IF statement.
>>>
>>> If objItem.Name = "Tivoli Storage Manager" then
>>>' echo the contents to the screen
>>> end if
>>>
>>>
>>> BTW, Sorry about Tivoli, that product is a major PIA to administer.
>>>
>>> On Tue, Jul 8, 2008 at 2:33 PM, [EMAIL PROTECTED] <[EMAIL PROTECTED]> wrote:
>>>
>>> That's closer.  Trying to query to see if TSM is installed. Can I just add
>>>
>>> Wscript.Echo "GroupName: " Tivoli Storage Manager
>>>
>>> To see if TSM is installed?
>>>
>>>
>>> Original Message:
>>> -
>>> From: Michael B. Smith [EMAIL PROTECTED]
>>> Date: Tue, 8 Jul 2008 17:18:19 -0400
>>> To: ntsysadmin@lyris.sunbelt-software.com
>>> Subject: RE: WMI Query
>>>
>>> Eh, you probably mean something like this:
>>>
>>> On Error Resume Next
>>> strComputers = Array ("Server1", "Server2", "Server3")
>>> For i = LBound (strComputers) To UBound(strComputers)
>>>strcomputer = strcomputers[i]
>>>
>>>Set objWMIService = GetObject("winmgmts:\\" & strComputer &
>>> "\root\cimv2")
>>>Set colItems = objWMIService.ExecQuery("Select * from
>>> Win32_ProgramGroup",,48)
>>>

Re: WMI Query

2008-07-08 Thread Steven Peck 
Umm.. NO, it is not.  It sucks.

It does do what it's supposed to eventually, but frankly getting it to
do it right or applying the inevitable client upgrades is always a
challenge.  When something isn't working right the logs/alerts fail to
properly identify the problem, the answers from support can be vague,
unhelpful and downright random at times.  (Asking for support on an
Exchange cluster results in documentation for a SQL cluster, requests
and finally demands to get the right documentation resulted in the
Exchange docs (and a non-Tivoli link) and the comment that running SQL
and Exchange on the same box wasn't recommended but we could try it
and let them know.  Ar!

A dedicated backup team, over 1,000 Windows servers and a few hundred
Unix flavors and a mainframe environment or two.  I really do not like
the product at all.

Steven Peck
http://www.blkmtn.org


On Tue, Jul 8, 2008 at 4:12 PM, Kurt Buff <[EMAIL PROTECTED]> wrote:
> That depends on your environment. For a large shop, with staff large
> enough so that several are dedicated specifically to
> backup/restore/DR/BC/etc., TSM is probably an excellent fit.
>
> It's much too large and complex for shops of lesser capability, IMHO -
> yet, we use it, and get by with it, and have for about 8 years - it
> predates my tenure in this position.
>
> I respect the software, but would switch in a heartbeat, except for two 
> things:
>
> 1) the cost to continue using is is ridiculously low - maintenance is
> something like $200/year for the 10 or so servers we use it for - that
> makes the cost of switching to something else much less attractive.
>
> 2) Support is actually pretty good - we've called many times, asking
> for bits of information, and have gotten answers in a reasonable
> amount of time, with no attitude.
>
> On Tue, Jul 8, 2008 at 3:19 PM, Rod Trent <[EMAIL PROTECTED]> wrote:
>> "that product is a major PIA to administer"
>>
>>
>>
>> And, the fact that that has held true for over 15 years and has never
>> improved is sad testament to the product.  Tivoli was created for the
>> consulting industry – not for the regular Admin.
>>
>>
>>
>> From: Eric Woodford [mailto:[EMAIL PROTECTED]
>> Sent: Tuesday, July 08, 2008 6:10 PM
>> To: NT System Admin Issues
>> Subject: Re: WMI Query
>>
>>
>>
>> FYI:
>>
>> "Wscript.echo" is a command to echo (or display) the information that comes
>> after it.
>>
>> I think you more want to do an IF statement.
>>
>> If objItem.Name = "Tivoli Storage Manager" then
>>' echo the contents to the screen
>> end if
>>
>>
>> BTW, Sorry about Tivoli, that product is a major PIA to administer.
>>
>> On Tue, Jul 8, 2008 at 2:33 PM, [EMAIL PROTECTED] <[EMAIL PROTECTED]> wrote:
>>
>> That's closer.  Trying to query to see if TSM is installed. Can I just add
>>
>> Wscript.Echo "GroupName: " Tivoli Storage Manager
>>
>> To see if TSM is installed?
>>
>>
>> Original Message:
>> -
>> From: Michael B. Smith [EMAIL PROTECTED]
>> Date: Tue, 8 Jul 2008 17:18:19 -0400
>> To: ntsysadmin@lyris.sunbelt-software.com
>> Subject: RE: WMI Query
>>
>> Eh, you probably mean something like this:
>>
>> On Error Resume Next
>> strComputers = Array ("Server1", "Server2", "Server3")
>> For i = LBound (strComputers) To UBound(strComputers)
>>strcomputer = strcomputers[i]
>>
>>Set objWMIService = GetObject("winmgmts:\\" & strComputer &
>> "\root\cimv2")
>>Set colItems = objWMIService.ExecQuery("Select * from
>> Win32_ProgramGroup",,48)
>>For Each objItem in colItems
>>Wscript.Echo "Caption: " & objItem.Caption
>>Wscript.Echo "Description: " & objItem.Description
>>Wscript.Echo "GroupName: " & objItem.GroupName
>>Wscript.Echo "Name: TSM & objItem.Name
>>Wscript.Echo "SettingID: " & objItem.SettingID
>>Wscript.Echo "UserName: " & objItem.UserName
>>Next
>>
>>set colItems = Nothing
>>set objWMIService = Nothing
>> Next
>>
>> Regards,
>>
>> Michael B. Smith
>> MCITP:EM/MCSE/Exchange MVP
>> http://TheEssentialExchange.com
>>
>>
>> -Original Message-
>>
>> From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]
>> Sent: Tuesd

RE: WMI Query

2008-07-08 Thread Mike Semon 
Yes, Tivoli is a beast!

 

  _  

From: Eric Woodford [mailto:[EMAIL PROTECTED] 
Sent: Tuesday, July 08, 2008 5:10 PM
To: NT System Admin Issues
Subject: Re: WMI Query

 

 


~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~

Re: WMI Query

2008-07-08 Thread Kurt Buff 
That depends on your environment. For a large shop, with staff large
enough so that several are dedicated specifically to
backup/restore/DR/BC/etc., TSM is probably an excellent fit.

It's much too large and complex for shops of lesser capability, IMHO -
yet, we use it, and get by with it, and have for about 8 years - it
predates my tenure in this position.

I respect the software, but would switch in a heartbeat, except for two things:

1) the cost to continue using is is ridiculously low - maintenance is
something like $200/year for the 10 or so servers we use it for - that
makes the cost of switching to something else much less attractive.

2) Support is actually pretty good - we've called many times, asking
for bits of information, and have gotten answers in a reasonable
amount of time, with no attitude.

On Tue, Jul 8, 2008 at 3:19 PM, Rod Trent <[EMAIL PROTECTED]> wrote:
> "that product is a major PIA to administer"
>
>
>
> And, the fact that that has held true for over 15 years and has never
> improved is sad testament to the product.  Tivoli was created for the
> consulting industry – not for the regular Admin.
>
>
>
> From: Eric Woodford [mailto:[EMAIL PROTECTED]
> Sent: Tuesday, July 08, 2008 6:10 PM
> To: NT System Admin Issues
> Subject: Re: WMI Query
>
>
>
> FYI:
>
> "Wscript.echo" is a command to echo (or display) the information that comes
> after it.
>
> I think you more want to do an IF statement.
>
> If objItem.Name = "Tivoli Storage Manager" then
>' echo the contents to the screen
> end if
>
>
> BTW, Sorry about Tivoli, that product is a major PIA to administer.
>
> On Tue, Jul 8, 2008 at 2:33 PM, [EMAIL PROTECTED] <[EMAIL PROTECTED]> wrote:
>
> That's closer.  Trying to query to see if TSM is installed. Can I just add
>
> Wscript.Echo "GroupName: " Tivoli Storage Manager
>
> To see if TSM is installed?
>
>
> Original Message:
> -
> From: Michael B. Smith [EMAIL PROTECTED]
> Date: Tue, 8 Jul 2008 17:18:19 -0400
> To: ntsysadmin@lyris.sunbelt-software.com
> Subject: RE: WMI Query
>
> Eh, you probably mean something like this:
>
> On Error Resume Next
> strComputers = Array ("Server1", "Server2", "Server3")
> For i = LBound (strComputers) To UBound(strComputers)
>strcomputer = strcomputers[i]
>
>Set objWMIService = GetObject("winmgmts:\\" & strComputer &
> "\root\cimv2")
>Set colItems = objWMIService.ExecQuery("Select * from
> Win32_ProgramGroup",,48)
>For Each objItem in colItems
>Wscript.Echo "Caption: " & objItem.Caption
>Wscript.Echo "Description: " & objItem.Description
>Wscript.Echo "GroupName: " & objItem.GroupName
>Wscript.Echo "Name: TSM & objItem.Name
>Wscript.Echo "SettingID: " & objItem.SettingID
>Wscript.Echo "UserName: " & objItem.UserName
>Next
>
>set colItems = Nothing
>set objWMIService = Nothing
> Next
>
> Regards,
>
> Michael B. Smith
> MCITP:EM/MCSE/Exchange MVP
> http://TheEssentialExchange.com
>
>
> -Original Message-
>
> From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]
> Sent: Tuesday, July 08, 2008 5:12 PM
> To: NT System Admin Issues
> Subject: WMI Query
>
> Looking for help with WMI query for an application (TSM).
>
> On Error Resume Next
> strComputer = "Server1
>   Server2
>   Server3"
> Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
> Set colItems = objWMIService.ExecQuery("Select * from
> Win32_ProgramGroup",,48)
> For Each objItem in colItems
>Wscript.Echo "Caption: " & objItem.Caption
>Wscript.Echo "Description: " & objItem.Description
>Wscript.Echo "GroupName: " & objItem.GroupName
>Wscript.Echo "Name: TSM & objItem.Name
>Wscript.Echo "SettingID: " & objItem.SettingID
>Wscript.Echo "UserName: " & objItem.UserName
> Next
>
> Can anyone help?
>
> Thanks,
>
> Mike
>
> 
> mail2web LIVE - Free email based on MicrosoftR Exchange technology -
> http://link.mail2web.com/LIVE
>
>
>
> ~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
> ~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~
>
>
> ~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
> ~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~
>
> 
> mail2web - Check your email from the web at
> http://link.mail2web.com/mail2web
>
>
> ~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
> ~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~
>
>
>

~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~

RE: WMI Query

2008-07-08 Thread Rod Trent 
"that product is a major PIA to administer"

 

And, the fact that that has held true for over 15 years and has never
improved is sad testament to the product.  Tivoli was created for the
consulting industry - not for the regular Admin.

 

From: Eric Woodford [mailto:[EMAIL PROTECTED] 
Sent: Tuesday, July 08, 2008 6:10 PM
To: NT System Admin Issues
Subject: Re: WMI Query

 

FYI: 

"Wscript.echo" is a command to echo (or display) the information that comes
after it. 

I think you more want to do an IF statement. 

If objItem.Name = "Tivoli Storage Manager" then 
   ' echo the contents to the screen
end if


BTW, Sorry about Tivoli, that product is a major PIA to administer. 



On Tue, Jul 8, 2008 at 2:33 PM, [EMAIL PROTECTED] <[EMAIL PROTECTED]> wrote:

That's closer.  Trying to query to see if TSM is installed. Can I just add

Wscript.Echo "GroupName: " Tivoli Storage Manager

To see if TSM is installed?


Original Message:
-
From: Michael B. Smith [EMAIL PROTECTED]
Date: Tue, 8 Jul 2008 17:18:19 -0400
To: ntsysadmin@lyris.sunbelt-software.com
Subject: RE: WMI Query



Eh, you probably mean something like this:

On Error Resume Next
strComputers = Array ("Server1", "Server2", "Server3")
For i = LBound (strComputers) To UBound(strComputers)
   strcomputer = strcomputers[i]

   Set objWMIService = GetObject("winmgmts:\\" & strComputer &
"\root\cimv2")
   Set colItems = objWMIService.ExecQuery("Select * from
Win32_ProgramGroup",,48)
   For Each objItem in colItems
   Wscript.Echo "Caption: " & objItem.Caption
   Wscript.Echo "Description: " & objItem.Description
   Wscript.Echo "GroupName: " & objItem.GroupName
   Wscript.Echo "Name: TSM & objItem.Name
   Wscript.Echo "SettingID: " & objItem.SettingID
   Wscript.Echo "UserName: " & objItem.UserName
   Next

   set colItems = Nothing
   set objWMIService = Nothing
Next

Regards,

Michael B. Smith
MCITP:EM/MCSE/Exchange MVP
http://TheEssentialExchange.com


-Original Message-

From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]
Sent: Tuesday, July 08, 2008 5:12 PM
To: NT System Admin Issues
Subject: WMI Query

Looking for help with WMI query for an application (TSM).

On Error Resume Next
strComputer = "Server1
  Server2
  Server3"
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from
Win32_ProgramGroup",,48)
For Each objItem in colItems
   Wscript.Echo "Caption: " & objItem.Caption
   Wscript.Echo "Description: " & objItem.Description
   Wscript.Echo "GroupName: " & objItem.GroupName
   Wscript.Echo "Name: TSM & objItem.Name
   Wscript.Echo "SettingID: " & objItem.SettingID
   Wscript.Echo "UserName: " & objItem.UserName
Next

Can anyone help?

Thanks,

Mike


mail2web LIVE - Free email based on MicrosoftR Exchange technology -
http://link.mail2web.com/LIVE



~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~


~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~




mail2web - Check your email from the web at
http://link.mail2web.com/mail2web




~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~

 


~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~

Re: WMI Query

2008-07-08 Thread Eric Woodford 
FYI:

"Wscript.echo" is a command to echo (or display) the information that comes
after it.

I think you more want to do an IF statement.

If objItem.Name = "Tivoli Storage Manager" then
   ' echo the contents to the screen
end if


BTW, Sorry about Tivoli, that product is a major PIA to administer.


On Tue, Jul 8, 2008 at 2:33 PM, [EMAIL PROTECTED] <[EMAIL PROTECTED]> wrote:

> That's closer.  Trying to query to see if TSM is installed. Can I just add
>
> Wscript.Echo "GroupName: " Tivoli Storage Manager
>
> To see if TSM is installed?
>
>
> Original Message:
> -
> From: Michael B. Smith [EMAIL PROTECTED]
> Date: Tue, 8 Jul 2008 17:18:19 -0400
> To: ntsysadmin@lyris.sunbelt-software.com
> Subject: RE: WMI Query
>
>
> Eh, you probably mean something like this:
>
> On Error Resume Next
> strComputers = Array ("Server1", "Server2", "Server3")
> For i = LBound (strComputers) To UBound(strComputers)
>strcomputer = strcomputers[i]
> Set objWMIService = GetObject("winmgmts:\\" & strComputer &
> "\root\cimv2")
>Set colItems = objWMIService.ExecQuery("Select * from
> Win32_ProgramGroup",,48)
>For Each objItem in colItems
>Wscript.Echo "Caption: " & objItem.Caption
>Wscript.Echo "Description: " & objItem.Description
>Wscript.Echo "GroupName: " & objItem.GroupName
>Wscript.Echo "Name: TSM & objItem.Name
>Wscript.Echo "SettingID: " & objItem.SettingID
>Wscript.Echo "UserName: " & objItem.UserName
>Next
> set colItems = Nothing
>    set objWMIService = Nothing
> Next
>
> Regards,
>
> Michael B. Smith
> MCITP:EM/MCSE/Exchange MVP
> http://TheEssentialExchange.com
>
>
> -Original Message-
> From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]
> Sent: Tuesday, July 08, 2008 5:12 PM
> To: NT System Admin Issues
> Subject: WMI Query
>
> Looking for help with WMI query for an application (TSM).
>
> On Error Resume Next
> strComputer = "Server1
>   Server2
>   Server3"
> Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
> Set colItems = objWMIService.ExecQuery("Select * from
> Win32_ProgramGroup",,48)
> For Each objItem in colItems
>Wscript.Echo "Caption: " & objItem.Caption
>Wscript.Echo "Description: " & objItem.Description
>Wscript.Echo "GroupName: " & objItem.GroupName
>Wscript.Echo "Name: TSM & objItem.Name
>Wscript.Echo "SettingID: " & objItem.SettingID
>Wscript.Echo "UserName: " & objItem.UserName
> Next
>
> Can anyone help?
>
> Thanks,
>
> Mike
>
> 
> mail2web LIVE - Free email based on MicrosoftR Exchange technology -
> http://link.mail2web.com/LIVE
>
>
>
> ~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
> ~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~
>
>
> ~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
> ~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~
>
>
> 
> mail2web - Check your email from the web at
> http://link.mail2web.com/mail2web
>
>
>
> ~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
> ~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~
>

~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~

RE: WMI Query

2008-07-08 Thread Rod Trent 
Here's one way to do it...

http://www.myitforum.com/articles/11/view.asp?id=10464 

-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] 
Sent: Tuesday, July 08, 2008 5:58 PM
To: NT System Admin Issues
Subject: RE: WMI Query

If strComputer can't be a muti-valued property, how would you query mutiple
servers?

Original Message:
-
From: Michael B. Smith [EMAIL PROTECTED]
Date: Tue, 8 Jul 2008 17:26:59 -0400
To: ntsysadmin@lyris.sunbelt-software.com
Subject: RE: WMI Query


Well, it won't work. strComputer can't be a multi-valued property in WMI.

Also, this particular line has obvious problems:

Wscript.Echo "Name: TSM & objItem.Name

Regards,

Michael B. Smith
MCITP:EM/MCSE/Exchange MVP
http://TheEssentialExchange.com


-Original Message-
From: Rod Trent [mailto:[EMAIL PROTECTED] 
Sent: Tuesday, July 08, 2008 5:22 PM
To: NT System Admin Issues
Subject: RE: WMI Query

What info are you looking to retrieve?

Are you saying this does or doesn't work?

-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] 
Sent: Tuesday, July 08, 2008 5:12 PM
To: NT System Admin Issues
Subject: WMI Query

Looking for help with WMI query for an application (TSM). 

On Error Resume Next
strComputer = "Server1
   Server2
   Server3" 
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from
Win32_ProgramGroup",,48)
For Each objItem in colItems
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "GroupName: " & objItem.GroupName
Wscript.Echo "Name: TSM & objItem.Name
Wscript.Echo "SettingID: " & objItem.SettingID
Wscript.Echo "UserName: " & objItem.UserName
Next

Can anyone help?

Thanks,

Mike


mail2web LIVE - Free email based on MicrosoftR Exchange technology -
http://link.mail2web.com/LIVE



~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~




~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~


~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~



mail2web.com - MicrosoftR Exchange solutions from a leading provider -
http://link.mail2web.com/Business/Exchange



~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~




~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~

RE: WMI Query

2008-07-08 Thread Michael B. Smith 
I showed you that in my original reply. I created an array named
strComputers of which each element in that array was the name of a computer.

For each element of strcomputers, you assigned strComputer to the current
element of the array that you are processing.

Regards,

Michael B. Smith
MCITP:EM/MCSE/Exchange MVP
http://TheEssentialExchange.com


-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] 
Sent: Tuesday, July 08, 2008 5:58 PM
To: NT System Admin Issues
Subject: RE: WMI Query

If strComputer can't be a muti-valued property, how would you query mutiple
servers?

Original Message:
-
From: Michael B. Smith [EMAIL PROTECTED]
Date: Tue, 8 Jul 2008 17:26:59 -0400
To: ntsysadmin@lyris.sunbelt-software.com
Subject: RE: WMI Query


Well, it won't work. strComputer can't be a multi-valued property in WMI.

Also, this particular line has obvious problems:

Wscript.Echo "Name: TSM & objItem.Name

Regards,

Michael B. Smith
MCITP:EM/MCSE/Exchange MVP
http://TheEssentialExchange.com


-Original Message-
From: Rod Trent [mailto:[EMAIL PROTECTED] 
Sent: Tuesday, July 08, 2008 5:22 PM
To: NT System Admin Issues
Subject: RE: WMI Query

What info are you looking to retrieve?

Are you saying this does or doesn't work?

-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] 
Sent: Tuesday, July 08, 2008 5:12 PM
To: NT System Admin Issues
Subject: WMI Query

Looking for help with WMI query for an application (TSM). 

On Error Resume Next
strComputer = "Server1
   Server2
   Server3" 
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from
Win32_ProgramGroup",,48)
For Each objItem in colItems
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "GroupName: " & objItem.GroupName
Wscript.Echo "Name: TSM & objItem.Name
Wscript.Echo "SettingID: " & objItem.SettingID
Wscript.Echo "UserName: " & objItem.UserName
Next

Can anyone help?

Thanks,

Mike


mail2web LIVE - Free email based on MicrosoftR Exchange technology -
http://link.mail2web.com/LIVE



~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~




~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~


~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~



mail2web.com - MicrosoftR Exchange solutions from a leading provider -
http://link.mail2web.com/Business/Exchange



~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~


~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~

RE: WMI Query

2008-07-08 Thread [EMAIL PROTECTED] 
If strComputer can't be a muti-valued property, how would you query mutiple
servers?

Original Message:
-
From: Michael B. Smith [EMAIL PROTECTED]
Date: Tue, 8 Jul 2008 17:26:59 -0400
To: ntsysadmin@lyris.sunbelt-software.com
Subject: RE: WMI Query


Well, it won't work. strComputer can't be a multi-valued property in WMI.

Also, this particular line has obvious problems:

Wscript.Echo "Name: TSM & objItem.Name

Regards,

Michael B. Smith
MCITP:EM/MCSE/Exchange MVP
http://TheEssentialExchange.com


-Original Message-
From: Rod Trent [mailto:[EMAIL PROTECTED] 
Sent: Tuesday, July 08, 2008 5:22 PM
To: NT System Admin Issues
Subject: RE: WMI Query

What info are you looking to retrieve?

Are you saying this does or doesn't work?

-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] 
Sent: Tuesday, July 08, 2008 5:12 PM
To: NT System Admin Issues
Subject: WMI Query

Looking for help with WMI query for an application (TSM). 

On Error Resume Next
strComputer = "Server1
   Server2
   Server3" 
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from
Win32_ProgramGroup",,48)
For Each objItem in colItems
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "GroupName: " & objItem.GroupName
Wscript.Echo "Name: TSM & objItem.Name
Wscript.Echo "SettingID: " & objItem.SettingID
Wscript.Echo "UserName: " & objItem.UserName
Next

Can anyone help?

Thanks,

Mike


mail2web LIVE - Free email based on MicrosoftR Exchange technology -
http://link.mail2web.com/LIVE



~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~




~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~


~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~



mail2web.com - Microsoft® Exchange solutions from a leading provider -
http://link.mail2web.com/Business/Exchange



~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~

RE: WMI Query

2008-07-08 Thread Michael B. Smith 
in a word: no.

Change this line 

Wscript.Echo "Name: TSM & objItem.Name

To

Wscript.Echo "Name: " & objItem.Name

And then tell us which specific "Name" or other attribute you want to hunt
for, and what you want to know when that attribute is true.

Regards,

Michael B. Smith
MCITP:EM/MCSE/Exchange MVP
http://TheEssentialExchange.com


-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] 
Sent: Tuesday, July 08, 2008 5:33 PM
To: NT System Admin Issues
Subject: RE: WMI Query

That's closer.  Trying to query to see if TSM is installed. Can I just add

Wscript.Echo "GroupName: " Tivoli Storage Manager

To see if TSM is installed?


Original Message:
-
From: Michael B. Smith [EMAIL PROTECTED]
Date: Tue, 8 Jul 2008 17:18:19 -0400
To: ntsysadmin@lyris.sunbelt-software.com
Subject: RE: WMI Query


Eh, you probably mean something like this:

On Error Resume Next
strComputers = Array ("Server1", "Server2", "Server3")
For i = LBound (strComputers) To UBound(strComputers)
strcomputer = strcomputers[i]
Set objWMIService = GetObject("winmgmts:\\" & strComputer &
"\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from
Win32_ProgramGroup",,48)
For Each objItem in colItems
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "GroupName: " & objItem.GroupName
Wscript.Echo "Name: TSM & objItem.Name
Wscript.Echo "SettingID: " & objItem.SettingID
Wscript.Echo "UserName: " & objItem.UserName
Next
set colItems = Nothing
set objWMIService = Nothing
Next

Regards,

Michael B. Smith
MCITP:EM/MCSE/Exchange MVP
http://TheEssentialExchange.com


-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] 
Sent: Tuesday, July 08, 2008 5:12 PM
To: NT System Admin Issues
Subject: WMI Query

Looking for help with WMI query for an application (TSM). 

On Error Resume Next
strComputer = "Server1
   Server2
   Server3" 
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from
Win32_ProgramGroup",,48)
For Each objItem in colItems
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "GroupName: " & objItem.GroupName
Wscript.Echo "Name: TSM & objItem.Name
Wscript.Echo "SettingID: " & objItem.SettingID
Wscript.Echo "UserName: " & objItem.UserName
Next

Can anyone help?

Thanks,

Mike


mail2web LIVE - Free email based on MicrosoftR Exchange technology -
http://link.mail2web.com/LIVE



~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~


~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~



mail2web - Check your email from the web at
http://link.mail2web.com/mail2web



~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~


~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~

RE: WMI Query

2008-07-08 Thread [EMAIL PROTECTED] 
That's closer.  Trying to query to see if TSM is installed. Can I just add

Wscript.Echo "GroupName: " Tivoli Storage Manager

To see if TSM is installed?


Original Message:
-
From: Michael B. Smith [EMAIL PROTECTED]
Date: Tue, 8 Jul 2008 17:18:19 -0400
To: ntsysadmin@lyris.sunbelt-software.com
Subject: RE: WMI Query


Eh, you probably mean something like this:

On Error Resume Next
strComputers = Array ("Server1", "Server2", "Server3")
For i = LBound (strComputers) To UBound(strComputers)
strcomputer = strcomputers[i]
Set objWMIService = GetObject("winmgmts:\\" & strComputer &
"\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from
Win32_ProgramGroup",,48)
For Each objItem in colItems
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "GroupName: " & objItem.GroupName
Wscript.Echo "Name: TSM & objItem.Name
Wscript.Echo "SettingID: " & objItem.SettingID
Wscript.Echo "UserName: " & objItem.UserName
Next
set colItems = Nothing
set objWMIService = Nothing
Next

Regards,

Michael B. Smith
MCITP:EM/MCSE/Exchange MVP
http://TheEssentialExchange.com


-Original Message-----
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] 
Sent: Tuesday, July 08, 2008 5:12 PM
To: NT System Admin Issues
Subject: WMI Query

Looking for help with WMI query for an application (TSM). 

On Error Resume Next
strComputer = "Server1
   Server2
   Server3" 
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from
Win32_ProgramGroup",,48)
For Each objItem in colItems
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "GroupName: " & objItem.GroupName
Wscript.Echo "Name: TSM & objItem.Name
Wscript.Echo "SettingID: " & objItem.SettingID
Wscript.Echo "UserName: " & objItem.UserName
Next

Can anyone help?

Thanks,

Mike


mail2web LIVE - Free email based on MicrosoftR Exchange technology -
http://link.mail2web.com/LIVE



~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~


~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~



mail2web - Check your email from the web at
http://link.mail2web.com/mail2web



~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~

RE: WMI Query

2008-07-08 Thread Michael B. Smith 
Well, it won't work. strComputer can't be a multi-valued property in WMI.

Also, this particular line has obvious problems:

Wscript.Echo "Name: TSM & objItem.Name

Regards,

Michael B. Smith
MCITP:EM/MCSE/Exchange MVP
http://TheEssentialExchange.com


-Original Message-
From: Rod Trent [mailto:[EMAIL PROTECTED] 
Sent: Tuesday, July 08, 2008 5:22 PM
To: NT System Admin Issues
Subject: RE: WMI Query

What info are you looking to retrieve?

Are you saying this does or doesn't work?

-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] 
Sent: Tuesday, July 08, 2008 5:12 PM
To: NT System Admin Issues
Subject: WMI Query

Looking for help with WMI query for an application (TSM). 

On Error Resume Next
strComputer = "Server1
   Server2
   Server3" 
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from
Win32_ProgramGroup",,48)
For Each objItem in colItems
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "GroupName: " & objItem.GroupName
Wscript.Echo "Name: TSM & objItem.Name
Wscript.Echo "SettingID: " & objItem.SettingID
Wscript.Echo "UserName: " & objItem.UserName
Next

Can anyone help?

Thanks,

Mike


mail2web LIVE - Free email based on MicrosoftR Exchange technology -
http://link.mail2web.com/LIVE



~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~




~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~


~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~

RE: WMI Query

2008-07-08 Thread Rod Trent 
What info are you looking to retrieve?

Are you saying this does or doesn't work?

-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] 
Sent: Tuesday, July 08, 2008 5:12 PM
To: NT System Admin Issues
Subject: WMI Query

Looking for help with WMI query for an application (TSM). 

On Error Resume Next
strComputer = "Server1
   Server2
   Server3" 
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from
Win32_ProgramGroup",,48)
For Each objItem in colItems
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "GroupName: " & objItem.GroupName
Wscript.Echo "Name: TSM & objItem.Name
Wscript.Echo "SettingID: " & objItem.SettingID
Wscript.Echo "UserName: " & objItem.UserName
Next

Can anyone help?

Thanks,

Mike


mail2web LIVE - Free email based on MicrosoftR Exchange technology -
http://link.mail2web.com/LIVE



~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~




~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~

RE: WMI Query

2008-07-08 Thread Michael B. Smith 
Eh, you probably mean something like this:

On Error Resume Next
strComputers = Array ("Server1", "Server2", "Server3")
For i = LBound (strComputers) To UBound(strComputers)
strcomputer = strcomputers[i]
Set objWMIService = GetObject("winmgmts:\\" & strComputer &
"\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from
Win32_ProgramGroup",,48)
For Each objItem in colItems
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "GroupName: " & objItem.GroupName
Wscript.Echo "Name: TSM & objItem.Name
Wscript.Echo "SettingID: " & objItem.SettingID
Wscript.Echo "UserName: " & objItem.UserName
Next
set colItems = Nothing
set objWMIService = Nothing
Next

Regards,

Michael B. Smith
MCITP:EM/MCSE/Exchange MVP
http://TheEssentialExchange.com


-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] 
Sent: Tuesday, July 08, 2008 5:12 PM
To: NT System Admin Issues
Subject: WMI Query

Looking for help with WMI query for an application (TSM). 

On Error Resume Next
strComputer = "Server1
   Server2
   Server3" 
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from
Win32_ProgramGroup",,48)
For Each objItem in colItems
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "GroupName: " & objItem.GroupName
Wscript.Echo "Name: TSM & objItem.Name
Wscript.Echo "SettingID: " & objItem.SettingID
Wscript.Echo "UserName: " & objItem.UserName
Next

Can anyone help?

Thanks,

Mike


mail2web LIVE - Free email based on MicrosoftR Exchange technology -
http://link.mail2web.com/LIVE



~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~


~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~

WMI Query

2008-07-08 Thread [EMAIL PROTECTED] 
Looking for help with WMI query for an application (TSM). 

On Error Resume Next
strComputer = "Server1
   Server2
   Server3" 
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from
Win32_ProgramGroup",,48)
For Each objItem in colItems
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "GroupName: " & objItem.GroupName
Wscript.Echo "Name: TSM & objItem.Name
Wscript.Echo "SettingID: " & objItem.SettingID
Wscript.Echo "UserName: " & objItem.UserName
Next

Can anyone help?

Thanks,

Mike


mail2web LIVE – Free email based on Microsoft® Exchange technology -
http://link.mail2web.com/LIVE



~ Upgrade to Next Generation Antispam/Antivirus with Ninja!~
~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm>  ~