Deletes an ADAM inetOrgPerson account named Carolphilips.
On Error Resume Next Set objOU = GetObject("LDAP://localhost:389/ou=Accounting,dc=fabrikam,dc=com") objOU.Delete "inetOrgPerson", "cn=carolphilips"
On Error Resume Next Set objOU = GetObject("LDAP://localhost:389/ou=Accounting,dc=fabrikam,dc=com") objOU.Delete "inetOrgPerson", "cn=carolphilips"