Tech Experience


Criar contas de usuário usando uma planilha
janeiro 23, 2008, 1:22 pm
Filed under: WINDOWS SERVER 2003

Por Victor Hugo Rodrigues 

Data de criação: 18/01/2008 

Resumo

Quantas vezes nos deparamos com o desafio de criar muitas contas de usuário e só temos em mão uma planilha ou um arquivo de teste com o nome do usuário? 

Este artigo aplica-se aos seguintes produtos e tecnologias:

  • Windows Server 2003
  • Active Directory

 Criando contas de usuário usando uma planilha com VBScript

Há alguns meses estava de frente com um grande desafio criar mais de 500 contas de usuário no Active Directory, só tinha em mãos o nome completo deles.E agora? Criar todos na mão? Submeter-me a um provável erro digitação? Perder tempo?

Pesquisando na internet encontrei esse site http://www.computerperformance.co.uk/, contém muitos tutoriais e scripts.Nele encontrei o um excelente script que utiliza uma planilha para criar os usuários no Active Directory.

Link do Script: http://www.computerperformance.co.uk/vbscript/vbscript_user_spreadsheet.htm 

Links Relacionados

·         http://www.computerperformance.co.uk/ 

Conclusão

No site apesar de Inglês esta muito bem explicado.Quem estiver com duvidas quanto como montar a planilha e o script, coloca nos comentários as duvidas que eu mando a planilha e o script por e-mail.


11 Comentários até o momento
Deixe um comentário

Ótimo site!

Comentário por Mílcher C. Camargo

Favor enviar a planilha e o script criando contas de usuário.

Atenciosamente
Manoel Freire de Araújo Filho

Comentário por Manoel Freire de Araújo Filho

[...] o script, coloca nos comentários as duvidas que eu mando a planilha e o script por e-mail. Fonte: techexp Tags: Windows Server [...]

Pingback por Criar contas de usuário usando uma planilha « Soluções Microsoft em Ambiente Corporativo

Ola Tudo Bem,

Estava lendo seu material, achei interessante criação de usuario pela planilha, como eu preciso criar 300 usuarios voce pode me mandar planilha por e-mail…

Obrigado

Comentário por Tony Anderson

Boa tarde
muito interessante, mas pode-me mandar um exel e script para eu poder tentar, pois tenho 1500 contas de alunos para criar
Prof. Luis Cordeiro

Comentário por Luis Cordeiro

Prezado estou com dificuldades de adicionar o usuario a um grupo no AD. Fiz o Script segue!

‘ ——————————————————’
Option Explicit
Dim objRootLDAP, objContainer, objUser, objShell, objGroup
Dim objExcel, objSpread, intRow
Dim strUser, strOU, strSheet
Dim strCN, strPWD, strUserDN, strAcao, strError, strChamado,strgrupo

const strDomainDN = “DC=empresa,DC=timbrasil,DC=com,DC=br”

strSheet = “C:\ADScripts\grupo\Grupo.xls”

Set objExcel = CreateObject(“Excel.Application”)
Set objSpread = objExcel.Workbooks.Open(strSheet)

objExcel.Visible =true

intRow = 2

Do Until objExcel.Cells(intRow,1).Value = “”
strCN = Trim(objExcel.Cells(intRow, 1).Value)
strUserDN = GetUserDNBysAMAccountName(strCN)
strgrupo = Trim(objExcel.Cells(intRow, 2).Value)

Dim bolReturn
bolReturn = Grupo(strgrupo)
if bolReturn then
objExcel.Cells(intRow, 4).Value=”OK”
Else
objExcel.Cells(intRow, 4).Value=”NOK”
objExcel.Cells(intRow, 5).Value=strError

End If

objExcel.Cells(intRow, 3).Value=strUserDN

intRow = intRow + 1
Loop
objExcel.Quit

Function GetUserDNBysAMAccountName(byval strpUserLogonName)

Dim objCon
Dim objRs

Dim strSQL

Set objCon = createobject(“ADODB.Connection”)
Set objRs = createobject(“ADODB.Recordset”)

strSQL = “;(sAMAccountName=” & strpUserLogonName & “);distinguishedName;subtree”
objCon.Provider = “ADSDSOObject”

call objCon.Open(“ADs Provider”)

Set objRs = objCon.Execute(strSQL)

if not objRs.EOF then
GetUserDNBysAMAccountName = objRs.Fields(0).Value
else
GetUserDNBysAMAccountName = “”
end if

Call objCon.Close

set objCon = nothing
set objRs = nothing

End Function

Function Grupo (byval strUserDN)

grupo = True

Const ADS_PROPERTY_APPEND = 3

Dim objGroup
Set objGroup = GetObject (“LDAP://” & strUserDN)
objGroup.PutEx ADS_PROPERTY_APPEND, _
“member”,Array (“” & strgrupo & “”)
objGroup.SetInfo

End Function

WScript.Quit

Comentário por Joelson

Olá…….gostei muito do site…..olhei também sobre como criar as contas….mas não entendi muito bem….poderia me ajudar????Não estou sabendo nem como faz a planilha e nem o script e muito menos como executá-la…..grato se puder me ajudar..

Comentário por Ricardo

Oi, vc poderia enviar a planilha pra mim? Preciso criar constantemente vários usuários no AD e sempre perco muito tempo. Ficaria muito agradecida.
t+

Comentário por manuela

só completando, se possível a planilha tivesse as opções de que o usuário não pode alterar a senha e a senha nunca expira. Isso facilitaria muito a minha vida

Comentário por manuela

ola desejo ter uma planilha para controlar as despesas da minha casa agradece carlos junior

Comentário por carlos junior

Opa muito legal esse post msm
Eu não entendi como montar a planilha, nem cheguei no script ainda
^^ se puder mandar os 2 para eu estudar um pouco
Abraço e vlw
otimo Blog

Comentário por João




Deixe uma resposta

Preencha os seus dados abaixo ou clique em um ícone para log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Sair / Alterar )

Imagem do Twitter

You are commenting using your Twitter account. Sair / Alterar )

Foto do Facebook

You are commenting using your Facebook account. Sair / Alterar )

Connecting to %s



Seguir

Obtenha todo post novo entregue na sua caixa de entrada.