From time to time I spend time on troubleshooting Active Directory and SYSVOL replication at my customers. The built in replication schedule are great, but some time it’s nice to force replication on all Domain Controllers to minimize the waiting time… This script will force an instant replication on all domain controllers. ReplicateAD.vbs Option Explicit Dim objDSE, strDN, objContainer, objChild, sCommand, WshShell Set objDSE = GetObject(“LDAP://rootDSE”) strDN = “OU=Domain Controllers,” & objDSE.Get(“defaultNamingContext”) Set objContainer = GetObject(“LDAP://” & strDN) sCommand = “%COMSPEC% /C ” Set WshShell = WScript.CreateObject(“WScript.Shell”) objContainer.Filter = Array(“Computer”) For Each objChild In objContainer WshShell.Run(sCommand & “repadmin /syncall “…
Trending
- Successful Adoption of a “Cloud First” Strategy
- Speaking at Nordic Virtual Summit
- Workplace Ninja User Group Denmark February Meetup
- Workplace Ninja User Group Denmark Meetup – May 2022
- Workplace Ninja User Group Denmark Meetup – April 2022
- Speaking at Modern Endpoint Management Summit 2022
- Speaking at Nordic Virtual Summit 2022 – 3nd Edition
- CoLabora Recordings – January 2022