Script para agregar usuario a un grupo

01/02/2007 - 20:08 por Edgard Gerardo | Informe spam
Hola, tengo un txt contentivo de los usuarios que necesito agregarlos a un
grupo de seguridad, el archivo txt tienes los usuario en columna, ejemplo:
usuario 1
usuario 2
usuario 3

Quisiera aprovechar este txt para agregar los usuarios a un grupo especifico
y automatizar y acelerar el proceso, dónde o cómo haria el script que me
ayudaría con esto???

Gracias...

Edgard Gerardo

Preguntas similare

Leer las respuestas

#1 Leandro Amore
01/02/2007 - 20:35 | Informe spam
No deberia ser demasiado complejo. te dejo las 2 partes de tu problema, solo
quedaria unirlas ;o)
->Para leer un archivo y tomas los datos<--
Dim arrFileLines()
i = 0

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.OpenTextFile("C:\FSO\ScriptLog.txt", 1)

Do Until objFile.AtEndOfStream
Redim Preserve arrFileLines(i)
arrFileLines(i) = objFile.ReadLine
i = i + 1
Loop

objFile.Close


Const ADS_PROPERTY_APPEND = 3

Set objGroup = GetObject
("LDAP://cn=Atl-Users,cn=Users,dc=NA,dc=fabrikam,dc=com")
objGroup.PutEx ADS_PROPERTY_APPEND, "member",
Array("cn=MyerKen,ou=Management,dc=NA,dc=fabrikam,dc=com")
objGroup.SetInfo


"Edgard Gerardo" wrote in message
news:
Hola, tengo un txt contentivo de los usuarios que necesito agregarlos a un
grupo de seguridad, el archivo txt tienes los usuario en columna, ejemplo:
usuario 1
usuario 2
usuario 3

Quisiera aprovechar este txt para agregar los usuarios a un grupo
especifico
y automatizar y acelerar el proceso, dónde o cómo haria el script que me
ayudaría con esto???

Gracias...

Edgard Gerardo
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida