OVH Cloud OVH Cloud

erreur 800A0414

11 réponses
Avatar
fxd
Bonjour,

Je me trouve confronté a une erreur 800A0414 : "L'appel d'une fonction Sub
n'admet pas de parentheses"

Appel de la fonction :
CreateUser(Nom, Prenom, Login, OU)

-------------------------------
Function CreateUser(Nom,Prenom,LoginName,OU)


'Creation user
Set objRoot = GetObject("LDAP://rootDSE")
Set objDomain = GetObject("LDAP://" & objRoot.Get("defaultNamingContext"))

'Set myOU=objDomain.Create("organizationalUnit", "ou=LaboMicrosoft")
'myOU.Put "Description", "OU crée par Laboratoire Microsoft"
'myOU.SetInfo

myOU = GetObject (LDAPPREFIXE & OU & "," & LDAP)
Set myUser = myOU.Create("User", "cn="&Nom&" "&Prenom)
myUser.Put "sAMAccountName", Login
myUser.Put "Description", Nom&Prenom
myUser.SetInfo
myUser.SetPassword "init00"
myUser.AccountDisabled = True
myUser.SetInfo

' mise dans group
Const ADS_PROPERTY_APPEND = 3

Set objGroup = GetObject (LDAPPREFIXE&"cn="&Nom&" "&Prenom& "," &OU& ","&
LDAP)
objGroup.PutEx ADS_PROPERTY_APPEND, "member", Array("cn="&OU&",OU="&OU&","&
LDAP)
objGroup.SetInfo

End Function



Merci
FXD

10 réponses

1 2
Avatar
Jean
Je me trouve confronté a une erreur 800A0414 : "L'appel d'une fonction Sub
n'admet pas de parentheses"


Ben prenez le numéro de ligne inclu dans le message d'erreur et retirez
les parenthèses.

--
Jean - JMST
Belgium

Avatar
fxd
il n'y a pas besoin de parentheses pour passé des multiples parametres a une
fonction ?



"Jean" a écrit dans le message de news:

Je me trouve confronté a une erreur 800A0414 : "L'appel d'une fonction
Sub n'admet pas de parentheses"


Ben prenez le numéro de ligne inclu dans le message d'erreur et retirez
les parenthèses.

--
Jean - JMST
Belgium





Avatar
scraper
Bonjour fxd, dans le message
news:
tu disais :


il n'y a pas besoin de parentheses pour passé des multiples
parametres a une fonction ?


non, sauf si tu affectes son résultat à une variable ...

toto = CreateUser(Nom, Prenom, Login, OU)

ou

CreateUser Nom, Prenom, Login, OU



--

Adresse invalide
Merci de répondre sur le forum ...
http://scraper.chez.tiscali.fr

scraper

Avatar
Jean
il n'y a pas besoin de parentheses pour passé des multiples parametres a une
fonction ?


La preuve par 9 :


'---8<---
Set WS=CreateObject("WScript.Shell")
WS.PopUp "coucou1"
WS.PopUp("coucou2")
WS.PopUp "coucou3",2
'la ligne suivante génère une erreur pq'on passe plus d'un paramètre
WS.Popup("coucou4",2)
'---8<---

Amicalement,

--
Jean - JMST
Belgium

Avatar
sympatix
Hello World !

il n'y a pas besoin de parentheses pour passé des multiples parametres a
une fonction ?



Je met aussi mon petit grain de sel...

l'appel d'une sub se fait avec parenthèses, uniquement si l'on utilise le
mot "call":


Ma_Sub paramètre1, paramètre2

équivaut à

Call Ma_sub (paramètre1, paramètre2)




--
Cordialement
saint_path_x_arobase_t'es_laide_euh_point_fr

(Antispam: Ôter les "toto" dans l'adresse, pour me répondre)

Avatar
Do Re Mi chel La Si Do
l'appel d'une sub se fait avec parenthèses, uniquement si l'on utilise
le mot "call":




Donc, si j'appelle une Call-girl, je dois mettre ma femme entre parenthèses
; c'est ça ?
Fais part de tes expériences, SVP. Merci.

@-salutations

Michel Claveau



Avatar
sympatix
Donc, si j'appelle une Call-girl, je dois mettre ma femme entre
parenthèses ; c'est ça ?
Fais part de tes expériences, SVP. Merci.


Oui, c'est exactement ça.
Et à condition que la call-girl soit en string:

Call Girl (String1, ma_femme)

;-)

--
Cordialement
saint_path_x_arobase_t'es_laide_euh_point_fr

(Antispam: Ôter les "toto" dans l'adresse, pour me répondre)

Avatar
Do Re Mi chel La Si Do
En Java, il y a une instruction, qui pourrait t'aider :
GetStringFromObject( )

MCI
Avatar
sympatix
GetStringFromObject( )
Je ne connais pas Java, mais, ça ne m'a pas l'air d'être un language austère

;-)

--
Cordialement
saint_path_x_arobase_t'es_laide_euh_point_fr

(Antispam: Ôter les "toto" dans l'adresse, pour me répondre)

Avatar
~Jean-Marc~ [MVP]
Salutations *sympatix* !
Dans <news:
tu nous disais :
GetStringFromObject( )


Je ne connais pas Java, mais, ça ne m'a pas l'air d'être un language
austère ;-)


Test Austère : ON

--
~Jean-Marc~
oups...


1 2