Discussion :

[neuneu1]

Bonjour,

pour m'amuse , je souhaite me connecte a un serveur (perso sur vpc) afin de cree des Ou useretc..

je pensais y etre arrive avec ADo mais ca plante pour le table name.

j'ai pas vu sur internet des tutos

merci
Bon WK

[neuneu1]

J ai une erreur avec ado me disant que le fournisseur n'est pas supporte??

ca ne me parle pas

merci

[aityahia]

ou est le rapport Avec l'ADO et l'Active directory

Active Directory Définition.
http://fr.wikipedia.org/wiki/Active_Directory

Ado ActiveX Data Object
est un moyen de conecté a une base de données tel que access,Oracle,SQL Server....
http://www.microsoft.com/france/msdn...es/DA_ADO.mspx

[Kaféine]

ou est le rapport Avec l'ADO et l'Active directory

et oui aityahia tu peux accéder à Active directory via ADO

Je me suis penché sur la question recemment sur un problème de connexion à un catalogue LDAP.

en fait avec ADO c'est simple.
le fournisseur du ADOConnection est "Fournisseur Ole pour annuaire Active Directory"

avec un TQuery il suffit de taper une requete du genre

exemple:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
SELECT AdsPath, CN, SN FROM 'LDAP://...' 
WHERE 
objectClass='user' 
ORDER BY sn

[aityahia]

bravo la vous venez de m'apprendre queque chose demain je ferai un test.

dans Active directory et un serveur LDAP je me suis déjai conecté a un serveur LDAP mais pas avec ADO..

[neuneu1]

Oui comme je travail sur serveur il y a un obdc sur l a gestion bd.
Je ne sais pas si ca marche sur un xp du domain, mon avis non, mais l'applis que je souhaite m'amuser a faire sert gere les Ou, et user.

je vais teste les reponse

merci

[neuneu1]

Je suis desole j'ai pas e niveau, apparament il me manque des parametre

j'ai merai si c'est possible affiche les user d une UO ds un dbgrid.

Je devrai peut etre essaye en vbs et recuper les donnes mais ...

merci

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
Query1.SQL.Add:=('SELECT * FROM LDAP://dc=serveur,dc=delphi,dc=local ,ou=user  ');

[Erreur] Unit1.pas(34): E2035 Pas assez de paramètres originaux
[Erreur] Unit1.pas(34): E2010 Types incompatibles : 'Integer' et 'string'

[Kaféine]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
SELECT AdsPath, CN, SN FROM 'LDAP://DC=NOMDOMAINE,DC=COM' WHERE objectClass='user' ORDER BY sn

ceci te donne tous les utilisateurs, leurs noms et leur prenoms

[neuneu1]

Desole Kafeine
mais marche pas le code

tjrs les meme erreur affiche plus la construction de la requete.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
Query1.SQL.Add:=('SELECT AdsPath, CN, SN FROM LDAP://DC=delphi,DC=local WHERE objectClass=''user'' ''ORDER BY sn') ;

[aityahia]

j'ai indiqué mon domaine dans l'emplacement.
j'ai le méssage d'erreur le "Tableau n'existe pas"

[neuneu1]

Moi j'arrive pas a passer la requete??

Mais bon je debute , j'ai surement des erreur de synthaxe

[neuneu1]

J'ai essaye de connecte la table directement via composant meme message que aityahia
.Mais je pense que c'est normale vu la structure d Ad

[neuneu1]

Bon j'ai trouve ou metre la comande sql directement dans le query

je pense qu on peut le mettre dans le code mai je vois pas encore comment.

MAintenat faut que je comprenne comment faire marche tout ca

[Kaféine]

Malheureusement avec ADO tu peux pas faire ce que tu veux au niveau active directory.
si tu connais le modele COM, et son utilisation dans delphi, tu peux attaquer directement ActiveDs_TLB ou la tu peux faire plein de truc.

[neuneu1]

Non, je connais pas

je crois que je vais passer par de script