RE: [ActiveDir] OT (Sort of): Determining the Edition of Windows Installed

2004-06-18 Thread Glenn Corbett
Thanks for all the very quick responses. Managed to churn out the reports with minutes to spare *grin* Glenn. List info : http://www.activedir.org/mail_list.htm List FAQ: http://www.activedir.org/list_faq.htm List archive: http://www.mail-archive.com/activedir%40mail.activedir.org/

RE: [ActiveDir] OT (Sort of): Determining the Edition of Windows Installed

2004-06-17 Thread Ken Cornetet
Microsoft's super handy Scriptomatic program generates the following WMI code "Caption" is what you are looking for... On Error Resume Next strComputer = "YourServerHere" Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2") Set colItems = objWMIService.ExecQuery("Select * fr

RE: [ActiveDir] OT (Sort of): Determining the Edition of Windows Installed

2004-06-17 Thread Michael B. Smith
This is what I use -- most from the Technet scripting site and Robbie's book, I'd guess... Function OperatingSystemVersion (node) Dim objWmiService, colOperatingSystems, objOperatingSystem Dim iRetry On Error Resume Next For iRetry = 0 To 5 Set obj

RE: [ActiveDir] OT (Sort of): Determining the Edition of Windows Installed

2004-06-17 Thread Tashildar, Dinesh (Cognizant)
Hi Glenn, Did you used wmi to get this information ? Use below script to determine edition --- On Error Resume Next strComputer = "." Set objWMIService = GetObject("winmgmts:\\"