[R] Problèmes avec _ADDeleteObject

Aide et conseils concernant AutoIt et ses outils.
Règles du forum
.
Répondre
lokidor
Niveau 3
Niveau 3
Messages : 36
Enregistré le : mar. 08 févr. 2011 10:57
Localisation : Sophia Antipolis
Status : Hors ligne

[R] Problèmes avec _ADDeleteObject

#1

Message par lokidor »

Bonjour à tous,

Je suis en ce moment en train de créer une interface permettant la suppression d'un utilisateur AD.

J'utilise l'UDF ADfunction trouvé sur le forum anglais, mais j'ai un petit soucis.

Je ne parviens pas à donner un paramètre qui convienne à cette fonction.

Voici le code utilisé :

Code : Tout sélectionner

#Include <adfunctions.au3>
$input="PBtestSecu"
$resFQDN=_ADSamAccountNameToFQDN($input)
$resDN=_ADDNToDisplayName($resFQDN)
$ProbtpOU="user"
; $object = DisplayName of object to delete. $type="user" or "group".
Func _ADDeleteObject($ou, $resDN, $type)
 
J'ai essayé de mettre le SAMname, le DNname (comme demandé) et même le FQDN, mais rien n'y fait, j'ai toujours cette erreur ><;
We intercepted a COM Error !
Number is : 80072032
Windescription is : Une syntaxe DN non valide a été spécifiée.
Script Line number is : 1828
Du coup, cette fonction échouant, impossible d'avoir l'objet en question et tout et tout.
Bref, ça fait 1h30 que je cherche dans le vent et je commence à en avoir un tout petit peu raz la casquette, je ne sais plus quoi lui donner :x

Please HELP !!! :cry:
Modifié en dernier par lokidor le jeu. 21 avr. 2011 14:13, modifié 1 fois.
Loki,

Le monde avance grâce aux paresseux!
Tirrith
Niveau 1
Niveau 1
Messages : 13
Enregistré le : mar. 15 févr. 2011 18:07
Status : Hors ligne

Re: [..] Problèmes avec _ADDeleteObject

#2

Message par Tirrith »

Hello,

j'ai moi même un peu galéré sur ce genre de problème et ils ne sont hélas pas tous résolus, lol.

j'espère que ceci va t'aider un peu :

Code : Tout sélectionner

If StringMid($sAD_Object, 3, 1) <> "=" Then $sAD_Object = _AD_SamAccountNameToFQDN($sAD_Object) ; sAMAccountName provided
    Local $iAD_Index = StringInStr($sAD_Object, "OU=")
    Local $sAD_OU = StringTrimLeft($sAD_Object, $iAD_Index - 1) ; Strip OU from FQDN
    Local $sAD_DisplayName = StringLeft($sAD_Object, $iAD_Index - 2) ; Strip DisplayName from FQDN
    $sAD_DisplayName = _AD_FixSpecialChars($sAD_DisplayName)
    Local $oAD_OU = _AD_ObjGet("LDAP://" & $sAD_HostServer & "/" & $sAD_OU)
    $oAD_OU.Delete($sAD_Class, $sAD_DisplayName)
    If @error <> 0 Then Return SetError(@error, 0, 0)
Bon courage :-)

Tirrith
lokidor
Niveau 3
Niveau 3
Messages : 36
Enregistré le : mar. 08 févr. 2011 10:57
Localisation : Sophia Antipolis
Status : Hors ligne

Re: [..] Problèmes avec _ADDeleteObject

#3

Message par lokidor »

J'ai trouvé d'où venais le problème.

En fait, il suffisait de faire un AD_Open() puis un AD_Close() à la fin...
Je sais pas pourquoi certaines fonctions fonctionnent sans et d'autre avec mais bon...

Si ça peut aider quelqu'un un jour :P
Loki,

Le monde avance grâce aux paresseux!
Répondre