AlainGarcia
Messages postés1Date d'inscriptionmardi 16 novembre 2010StatutMembreDernière intervention28 février 2011 28 févr. 2011 à 11:11
Bonjour,
En Access 2003, j'obteins le message d'erreur suivant à l'exécution de la ligne 46 :
Erreur automation
Le domaine spécifié n'existe pas ou n'a pas pu être contacté
Cela proviendrait-il d'un problème de droit accès au LDAP ?
Merci pour vos réponses.
neo2k2
Messages postés126Date d'inscriptionjeudi 16 janvier 2003StatutMembreDernière intervention 9 novembre 20093 18 sept. 2008 à 19:24
Ben typiquement, en ajoutant dans ton code :
'dans la déclaration des variables
Dim ucap as String, phone as string
'dans les propriétés recherchées des utilisateurs
phone = (objuser.telephoneNumber)
ucap = mid(nom,1,1)
'dans la requête sql, je remplace par exemple prenom par phone
sql = "Insert Into lognames2 Values('" & login & "','" & nom & "','" & phone & "','" & org & "'," & validite & ",'" & expi & "')"
Ces simples modifications ne génèrent PAS d'erreur mais la table créée est... vide.
Peux-tu tester chez toi et le cas échéant modifier ton fichier access avec 3 colonnes supplémentaires "phone, mobile, cap" dans la table en adaptant la requête en conséquence? SVP
Merci d'avance
cs_baloc
Messages postés56Date d'inscriptionlundi 8 septembre 2008StatutMembreDernière intervention29 octobre 2010 18 sept. 2008 à 18:55
dans un premier temps, il y a l'option explicit, donc faut définir les variables.
ensuite si tu as des messages d'erreur envoye moi un message ça sera plus simple^^
neo2k2
Messages postés126Date d'inscriptionjeudi 16 janvier 2003StatutMembreDernière intervention 9 novembre 20093 18 sept. 2008 à 13:33
Excellente source! Cependant, je n'arrive pas à modifier quoique ce soit dans la DB.
Par exemple, j'aimerais rajouter 3 colonnes dans la table lognames2: je crée donc mes 2 colonnes, je les configure et je paramètre dans la macro les champs correspondants (telephoneNumber et Mobile de l'AD). Résultat: plus aucune donnée ne s'ajoute mais aucun message d'erreur.
Peux-tu m'expliquer comment faire???
p.s.: seul petit bémol à mon sens: arrêter d'utiliser une nomenclature française (nom last et prenom first... ;o)) lol
cs_baloc
Messages postés56Date d'inscriptionlundi 8 septembre 2008StatutMembreDernière intervention29 octobre 2010 11 sept. 2008 à 12:22
merci pour cette remarque. prochaine modification pour les memberof d'ici peu.
cs_MPi
Messages postés3877Date d'inscriptionmardi 19 mars 2002StatutMembreDernière intervention17 août 201823 11 sept. 2008 à 11:18
Simple commentaire...
Tu dois déclarer chacune de tes variables explicitement.
Lorsque tu écris ceci
Dim objconn, objRS, objuser As Object
seul objuser est considéré comme Object. Les autres sont Variant.
Il faut donc écrire comme ceci
Dim objconn As Object, objRS As Object, objuser As Object
28 févr. 2011 à 11:11
En Access 2003, j'obteins le message d'erreur suivant à l'exécution de la ligne 46 :
Erreur automation
Le domaine spécifié n'existe pas ou n'a pas pu être contacté
Cela proviendrait-il d'un problème de droit accès au LDAP ?
Merci pour vos réponses.
18 sept. 2008 à 19:24
'dans la déclaration des variables
Dim ucap as String, phone as string
'dans les propriétés recherchées des utilisateurs
phone = (objuser.telephoneNumber)
ucap = mid(nom,1,1)
'dans la requête sql, je remplace par exemple prenom par phone
sql = "Insert Into lognames2 Values('" & login & "','" & nom & "','" & phone & "','" & org & "'," & validite & ",'" & expi & "')"
Ces simples modifications ne génèrent PAS d'erreur mais la table créée est... vide.
Peux-tu tester chez toi et le cas échéant modifier ton fichier access avec 3 colonnes supplémentaires "phone, mobile, cap" dans la table en adaptant la requête en conséquence? SVP
Merci d'avance
18 sept. 2008 à 18:55
ensuite si tu as des messages d'erreur envoye moi un message ça sera plus simple^^
18 sept. 2008 à 13:33
Par exemple, j'aimerais rajouter 3 colonnes dans la table lognames2: je crée donc mes 2 colonnes, je les configure et je paramètre dans la macro les champs correspondants (telephoneNumber et Mobile de l'AD). Résultat: plus aucune donnée ne s'ajoute mais aucun message d'erreur.
Peux-tu m'expliquer comment faire???
p.s.: seul petit bémol à mon sens: arrêter d'utiliser une nomenclature française (nom last et prenom first... ;o)) lol
11 sept. 2008 à 12:22
11 sept. 2008 à 11:18
Tu dois déclarer chacune de tes variables explicitement.
Lorsque tu écris ceci
Dim objconn, objRS, objuser As Object
seul objuser est considéré comme Object. Les autres sont Variant.
Il faut donc écrire comme ceci
Dim objconn As Object, objRS As Object, objuser As Object
C'est la même chose pour les String et autres