on error resume next
sdn = "cn=test1,ou=Users,dc=mycorp,dc=com"
set wshuser = getobject("LDAP://" & sdn)
if err.number<>0 then
wscript.echo "error 0x" & hex(err.number) & vbcrlf & err.description
else
wscript.echo "The target's distinguished name exists."
end if
set wshuser = nothing