It is possible... you only have to do it another way...
query AD for the object that matches a certain sAMAccountName
-------------------------------------------------------------------
sDomainDNSW2Kx = "ADCORP.LAN"
ssAMAccountName = "JORGE"
Set oConnection = CreateObject("ADODB.Connection")
Set oCommand = CreateObject("ADODB.Command")
oConnection.Provider = "ADsDSOObject"
oConnection.Open "ADs Provider"
Set oCommand.ActiveConnection = oConnection
sQuery = "SELECT DistinguishedName FROM 'LDAP://" & sDomainDNSW2Kx & "' WHERE 
sAMAccountName = '" & ssAMAccountName & "'"
oCommand.CommandText = sQuery
Set oResults = oCommand.Execute
sObjDN = oResults.Fields("DistinguishedName")
-------------------------------------------------------------------
cheers,
Jorge

________________________________

From: [EMAIL PROTECTED] on behalf of Burkes, Jeremy [Contractor]
Sent: Wed 11/30/2005 9:05 PM
To: ActiveDir@mail.activedir.org
Subject: RE: [ActiveDir] VBSCRIPT ADSI IADs Get Method



Nevermind, just found the answer to my own question, and it is no, must use the 
persons CN, no other attributes are accepted, good to know.  Thanks for the 
potential help.

 

Jeremy

 

________________________________

From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Burkes, Jeremy 
[Contractor]
Sent: Wednesday, November 30, 2005 3:02 PM
To: ActiveDir@mail.activedir.org
Subject: [ActiveDir] VBSCRIPT ADSI IADs Get Method

 

Everyone,

            I am trying to write a vbscript to connect to a user account using 
the samaccountname attribute to update some info.  Is this even possible and if 
so can someone provide a code sample, I would think it would look something 
like this for Test in the Microsoft domain:

 

            LDAP://sAMAccountName=Test, OU=Users,DC=Microsoft,DC=COM or 
LDAP://sAMAccountName=Test,CN=Users,DC=Microsoft,DC=COM

 

            Then again, maybe this is not even possible.  If not should I use 
ADO instead even though I am returning 1 record with each query, seems 
inefficient way to me when I can just use an ADSI pointer.

 

Jeremy

--------------------------
Jeremy Burkes
System Analyst/MIS SPHQ
[EMAIL PROTECTED]
PH: 202-764-1270 Fax: 202-764-1503

 



This e-mail and any attachment is for authorised use by the intended 
recipient(s) only. It may contain proprietary material, confidential 
information and/or be subject to legal privilege. It should not be copied, 
disclosed to, retained or used by, any other party. If you are not an intended 
recipient then please promptly delete this e-mail and any attachment and all 
copies and inform the sender. Thank you.

<<winmail.dat>>

Reply via email to