none
Adicionando usuário na estação RRS feed

  • Pergunta

  • Preciso de um script onde eu possa adicionar um usuário com previlegio de administrador na estacão de trabalho quando precisar?

     

    Abs 

    segunda-feira, 19 de maio de 2008 16:50

Respostas

  • Olá Victorino,

    O script abaixo cria um usuário local na estação de trabalho e o coloca no grupo Administrators.
    Vale lembrar que se o SO estivem em português, é necessário trocar a Administrators por Administradores na linha 8.

    Espero que ajude.

    Abs,

    Hermes Cerelli.


    strComputer = "<Nome do computador>"
    Set colAccounts = GetObject("WinNT://" & strComputer)
    Set objUser = colAccounts.Create("user", "<UserName>")
    objUser.FullName = "<Nome completo do usuário>"
    objUser.Description = "<Descrição do usuário>"
    objUser.SetPassword "<password>"
    objUser.SetInfo
    Set Group = GetObject("WinNT://" & strComputer & "/Administrators,group")
    Group.Add(objUser.ADspath)



    segunda-feira, 19 de maio de 2008 17:26

Todas as Respostas

  • Olá Victorino,

    O script abaixo cria um usuário local na estação de trabalho e o coloca no grupo Administrators.
    Vale lembrar que se o SO estivem em português, é necessário trocar a Administrators por Administradores na linha 8.

    Espero que ajude.

    Abs,

    Hermes Cerelli.


    strComputer = "<Nome do computador>"
    Set colAccounts = GetObject("WinNT://" & strComputer)
    Set objUser = colAccounts.Create("user", "<UserName>")
    objUser.FullName = "<Nome completo do usuário>"
    objUser.Description = "<Descrição do usuário>"
    objUser.SetPassword "<password>"
    objUser.SetInfo
    Set Group = GetObject("WinNT://" & strComputer & "/Administrators,group")
    Group.Add(objUser.ADspath)



    segunda-feira, 19 de maio de 2008 17:26
  •  

    Hermes,

     

    Muito bom cara, me atendeu.

     

    Abs

    terça-feira, 20 de maio de 2008 19:49