Error de automatización

26/11/2004 - 13:33 por Josep Fontanals Dotras | Informe spam

Public Function CreateUserHomeDirectory()
Dim ou As IADsContainer
Const Wait_on_return = True
Const HIDE_WINDOW = 0
Const User_root_unc = "\\dc1\users" 'Set Home Folder location Here

Set ou = GetObject("LDAP://cn=Users,Dc=domhesnt,dc=local")
'Create user
Set usr = ou.Create("user", "CN=James Smith")
usr.Put "samAccountName", "jsmith"
usr.Put "sn", "Smith"
usr.Put "givenName", "james"
usr.Put " userPrincipalname", "jsmith@domhesnt.scs.es"
usr.SetInfo 'Siempre da error de automatizacion

Alguien sabe porque la instruccion usr.Setinfo siempre me da error de
automatización

Atentamente

Josep Fontanals

Siga el debate

2 respuestas

Tengo una respuesta

Preguntas similare

Mostrar todos los temas similares

Leer las respuestas

#1 Marc [MVP Windows]

26/11/2004 - 13:48 | Informe spam

Prueba quitando

usr.Put "sn", "Smith"
usr.Put "givenName", "james"
usr.Put " userPrincipalname", ""

Saludos,

Marc
MCP - MVP Windows Shell/User
Oracle9i Certified Associate (OCA)

Este mensaje se proporciona "como está" sin garantías de ninguna clase, y no otorga ningún derecho.

"Josep Fontanals Dotras" escribió en el mensaje news:OiMT$

Public Function CreateUserHomeDirectory()
Dim ou As IADsContainer
Const Wait_on_return = True
Const HIDE_WINDOW = 0
Const User_root_unc = "\\dc1\users" 'Set Home Folder location Here

Set ou = GetObject("LDAP://cn=Users,Dc=domhesnt,dc=local")
'Create user
Set usr = ou.Create("user", "CN=James Smith")
usr.Put "samAccountName", "jsmith"
usr.Put "sn", "Smith"
usr.Put "givenName", "james"
usr.Put " userPrincipalname", ""
usr.SetInfo 'Siempre da error de automatizacion

Alguien sabe porque la instruccion usr.Setinfo siempre me da error de
automatización

Atentamente

Josep Fontanals

Responder a este mensaje

#2 Josep Fontanals Dotras

26/11/2004 - 14:23 | Informe spam

Muchas gracias:
Por lo que veo tengo que conocer exactamente que atributos tengo yo
definidos en el directorio activo.

Gracias

Josep

"Marc [MVP Windows]" escribió en el mensaje
news:
Prueba quitando

usr.Put "sn", "Smith"
usr.Put "givenName", "james"
usr.Put " userPrincipalname", ""

Saludos,

Marc
MCP - MVP Windows Shell/User
Oracle9i Certified Associate (OCA)

Este mensaje se proporciona "como está" sin garantías de ninguna clase, y no
otorga ningún derecho.

"Josep Fontanals Dotras" escribió en el mensaje
news:OiMT$

Public Function CreateUserHomeDirectory()
Dim ou As IADsContainer
Const Wait_on_return = True
Const HIDE_WINDOW = 0
Const User_root_unc = "\\dc1\users" 'Set Home Folder location Here

Set ou = GetObject("LDAP://cn=Users,Dc=domhesnt,dc=local")
'Create user
Set usr = ou.Create("user", "CN=James Smith")
usr.Put "samAccountName", "jsmith"
usr.Put "sn", "Smith"
usr.Put "givenName", "james"
usr.Put " userPrincipalname", ""
usr.SetInfo 'Siempre da error de automatizacion

Alguien sabe porque la instruccion usr.Setinfo siempre me da error de
automatización

Atentamente

Josep Fontanals

Siga el debate Respuesta

Responder a este mensaje

Ads by Google

Hacer una pregunta

Tengo una respuesta

Busqueda sugerida