List_GPMC_Information.hta (In the book)

Download file: list_gpmc_information.hta (2 Kb)

<HTML>
<HEAD>
<!--
Script : List_GPMC_Information.wsf
From the book "Group Policy" by Jeremy Moskowitz

The contents of this script are provided "as is".  
No warranty of any kind, either express or implied, is made in relation 
to the availability, accuracy, reliability or content of this script.
ALWAYS test scripts before using in your production network!
-->
<TITLE>List GPMC Information</TITLE>
  <HTA:APPLICATION ID="List_GPMC_Information" 
    APPLICATIONNAME="List_GPMC_Information" 
    BORDER="dialog"
    CAPTION="yes"
    CONTEXTMENU="yes"
    ICON="graphics/title.ico"
    INNERBORDER="yes"
    MINIMIZEBUTTON="yes"
    MAXIMIZEBUTTON="yes"
    SHOWINTASKBAR="yes"
    SCROLLABLE="yes"
    SINGLEINSTANCE="yes"
    SYSMENU="yes"
    WINDOWSTATE="maximize">
  <LINK href='GroupPolicy.css' rel="stylesheet" type="text/css">
  <SCRIPT src='GPMgmt.vbs' language="VBScript"></SCRIPT>
  <SCRIPT src='HTA_Help.vbs' language="VBScript"></SCRIPT>
</HEAD>
<BODY>
<SCRIPT language="VBScript">
Sub Window_OnLoad
self.resizeTo 500,400
Dim gpmSitesContainer
CreateGPMObjects
Set gpmSitesContainer = gpm.GetSitesContainer(dnsForestRoot,"","",0)

' Assign text values
gpmDomain_Domain_Span.innerHTML = gpmDomain.Domain
gpmDomain_DC_Span.innerHTML = gpmDomain.DomainController
gpmSC_Forest_Span.innerHTML = gpmSitesContainer.Forest
gpmSC_DC_Span.innerHTML = gpmSitesContainer.DomainController
gpmSC_Domain_Span.innerHTML = gpmSitesContainer.Domain
End Sub
</SCRIPT>
<div class="Title">List GPMC Information</div>
<button onclick="window.print()">Print</button>
<p>
<div class="Heading">Here is a litte information from the GPMDomain object:</div>
Domain Controller: <span id="gpmDomain_DC_Span"></span><br>
Domain:<span id="gpmDomain_Domain_Span"></span>
</p>
<p>
<div class="Heading">Here is a little information from the GPMSitesContainer object</div>
Forest: <span id="gpmSC_Forest_Span"></span><br>
Domain Controller:<span id="gpmSC_DC_Span"></span><br>
Domain: <span id="gpmSC_Domain_Span"></span>
</p>
</BODY>
</HTML>
 

Be a hero! Report a problem with this web page here

Event Calendar

Find out where and when Jeremy will be speaking next.

November 2008
SMTWTFS
1
2345678
9101112131415
16171819202122
23242526272829
30
Prev Month Current Month Next Month
Mon, Nov 10 - Thu, Nov 13
Windows Connections -- Vegas
It's WinConnections time! All sorts of great speeches this time. GP Troubleshooting, My Pre-Con, App-V 101. Will you be there?
www.winconnections.com
Mon, Nov 17 - Tue, Nov 18
Two-Day Intensive Group Policy Essentials Workshop (taught by Jeremy Moskowitz (Lead Instructor) - GPanswers.com / Moskowitz, Inc. )
 Final class of 2008.
This is a Two-Day Intensive Group Policy Essentials Workshop in Atlanta, GA !
Wed, Nov 19 - Thu, Nov 20
Two-Day "Group Policy 2.0" Catch-Up Workshop (taught by Jeremy Moskowitz (Lead Instructor) - GPanswers.com / Moskowitz, Inc. )
 Final class of 2008.
This is a Two-Day "Group Policy 2.0" Catch-Up Workshop in Atlanta, GA !
Fri, Nov 21 - Fri, Nov 21
One-Day Advanced Group Policy Workshop (XP/Vista Focused) (taught by Jeremy Moskowitz (Lead Instructor) - GPanswers.com / Moskowitz, Inc. )
 Final class of 2008.
This is a One-Day Advanced Group Policy Workshop (XP/Vista Focused) in Atlanta, GA !