[THIN] Re: OT: Scripting Domain Replication

  • From: "Sullivan, Glenn" <GSullivan@xxxxxxxxxxxxxx>
  • To: "'thin@xxxxxxxxxxxxx'" <thin@xxxxxxxxxxxxx>
  • Date: Tue, 14 Jan 2003 15:38:15 -0500

Here is a script I wrote to synch our AD:
Option Explicit

Dim objRootDSE, objOU, comDLL
Dim strDomainName
Dim objDomainController, objDomainController2
Dim intResult

Set objRootDSE = GetObject("LDAP://rootDSE";)
strDomainName = objRootDSE.Get("defaultNamingContext")
wscript.echo "Beginning Synch for " & strDomainName
WScript.Echo "---------------------------------------------------"
WScript.Echo

Set objOU = GetObject("LDAP://OU=Domain Controllers," & strDomainName)
Set comDLL = CreateObject("IADsTools.DCFunctions")

For Each objDomainController In objOU
        For Each objDomainController2 In objOU
                If objDomainController.cn <> objDomainController2.cn Then
                        WScript.echo "  Requesting Synch between " &
objDomainController.cn & " and " & objDomainController2.cn
                        intResult =
comDLL.ReplicaSync(CStr(objDomainController.cn), CStr(strDomainName),
CStr(objDomainController2.cn))
                        If intResult=0 Then 
                                wscript.echo "     Completed successfully." 
                        Else 
                                wscript.echo "     Failed " &
comDLL.LastErrorText
                        End If
                        WScript.Echo
                End If
        Next
Next


Watch the word wrap...

HTH,

Glenn Sullivan, MCSE+I  MCDBA
David Clark Company Inc.


-----Original Message-----
From: TheThin [mailto:TheThin@xxxxxxxxxxxxxxxxxxxxx]
Sent: Tuesday, January 14, 2003 2:59 PM
To: thin@xxxxxxxxxxxxx
Subject: [THIN] OT: Scripting Domain Replication



I'm trying to fix a user creation script.  It creates the user and adds
them to the correct groups just fine, but it's having difficulty with
the home directories.

When the home directory is created, it then runs cacls to set the
correct permissions on it, but the perms that should give the user full
control give "Unknown User" full control.  I'm guessing that the domain
is not replicating to the server in time.

Is there a way to script domain replication using vbscript or does
anyone know what is causing this?

Thanks,

Bill

Bill Denney / bdenney@xxxxxxxxxxxxxxxxxxxxx
Phone: 678-781-5261
Systems Analyst / Politis Consulting
3 Dunwoody Park / Suite 103 / Atlanta, GA 30338

*********************************************** 
This Weeks Sponsor: WM Software
WMS Messenger for TSE
Affordable Instant Messaging for Terminal Servers
http://www.wmsoftware.com/wmsm/
************************************************
For Archives, to Unsubscribe, Subscribe or 
set Digest or Vacation mode use the below link.

http://thethin.net/citrixlist.cfm
*********************************************** 
This Weeks Sponsor: WM Software
WMS Messenger for TSE
Affordable Instant Messaging for Terminal Servers
http://www.wmsoftware.com/wmsm/
************************************************
For Archives, to Unsubscribe, Subscribe or 
set Digest or Vacation mode use the below link.

http://thethin.net/citrixlist.cfm

Other related posts: