' Kod przenosi obiekt z jednego w inne miejsce w tej samej domenie
' ------ KONFIGURACJA SKRYPTU ------
strNewParentDN = "LDAP://<NazwaWyrniajcaNowegoObiektuNadrzdnego>"
strObjectDN    = "LDAP://cn=jnowak,<NazwaWyrniajcaStaregoObiektuNadrzdnego>"
strObjectRDN   = "cn=jnowak"
' ------ KONIEC KONFIGURACJI ---------

set objCont = GetObject(strNewParentDN)
objCont.MoveHere strObjectDN, strObjectRDN
