Använder nedanstående kod för att lista användare ur Active Directory med ASP, men problemet är att jag inte kan få den att lista användarnamnen... Jag kan däremot lista bland annat description och mail med hjälp av denna kod, genom att sätta strList till "description" eller "mail". Prova med <code>samaccountname</code>istället. samaccountname funkade inte heller, men däremot funkade följande: Hej,Lista användarnamn ur AD med ASP
Jag har bland annat provat sätta strList till "Userprincipalname", men det resulterar i det beskrivande felmeddelandet "Unspecified error"... Jag har även chansat på olika varianter så som "User", "Username" "logonname" osv men utan resultat.
Någon som har någon idé om vad felet kan vara? Eller som har förslag på annan lösning?
<code>
Sub ListAD
strList = "name"
Set Conn = Server.CreateObject("ADODB.Connection")
Set ADRS = Server.CreateObject("ADODB.Recordset")
Conn.Provider = "ADsDSOObject"
strConn = "Active Directory Provider"
Conn.Open strConn
strRS = "Select '"&strList&"' from 'LDAP://MyDomain WHERE objectClass='user'"
ADRS.Open strRS, Conn, 1, 1
%><font face="Verdana" size="2">Antal Träffar: <%=ADRS.recordcount%></font><BR><BR><%
Do Until ADRS.EOF
if not isnull(ADRS(strList)) then
%><font face="Verdana" size="1"><%=Join(ADRS(strList))%></font><BR><%
end if
ADRS.MoveNext
Loop
End Sub
</code>Sv: Lista användarnamn ur AD med ASP
Tror det kan funka.
Mvh MagnusSv: Lista användarnamn ur AD med ASP
<code>
Sub ListAD
strDomain = "WinNT://MyDomain"
Set TheDomain = GetObject(strDomain)
TheDomain.Filter = Array("User")
For Each User In TheDomain
response.Write User.Name %><br><%
Next
Set Computer = Nothing
Set TheDomain = Nothing
End sub
</code>Sv: Lista användarnamn ur AD med ASP
vet du vad man mer kan få ut för info?
User.description
osv.....
//Henke