none
Renomear computadores via script RRS feed

  • Pergunta

  • Caros amigos,

    Mais uma vez, conto com a ajuda dos senhores para resolver este problema. 

    Preciso de um script para renomear 200 computadores conforme planilha excel disponivel na rede e na descrição do computador apareça o usuário que está logado.  vi alguns tópicos, mais nenhum mem atendeu.

    Ps.  Pode acontecer de 2 máquinas executares o script simultaneamente.

    Grato,

    Deivid Soares.

    terça-feira, 12 de janeiro de 2010 03:10

Respostas

  • Marcellus,

    Agradeço sua ajuda. 

    O script para alterar a DESCRIÇÃO do micro está perfeito, porém o link que você me indicou eu já havia entrado e não funcionou.  Parece que ele não le a planilha com os novos nomes.

    Grato.

    Deivid.

    Somente para acrescentar, não consegui fazer funcionar o script que busca em uma planilha excel o novo nome do computador, conforme link indicado pelo amigo Marcellus.  Quando executo o mesmo nada acontece.

    Grato pela ajuda.

    Deivid.
    • Marcado como Resposta Deivid Soares quarta-feira, 19 de maio de 2010 14:00
    segunda-feira, 18 de janeiro de 2010 01:32

Todas as Respostas

  • Caros amigos,

    Mais uma vez, conto com a ajuda dos senhores para resolver este problema. 

    Preciso de um script para renomear 200 computadores conforme planilha excel disponivel na rede e na descrição do computador apareça o usuário que está logado.  vi alguns tópicos, mais nenhum mem atendeu.

    Ps.  Pode acontecer de 2 máquinas executares o script simultaneamente.

    Grato,

    Deivid Soares.


    Deivid.

    Veja o link abaixo. Esse altera o terminal de acordo com uma planilha do excel,

    http://social.technet.microsoft.com/Forums/pt-BR/scriptadminpt/thread/8e8af477-0e6c-4dbd-b273-23e21fabecdb

    E se caso precise, alteração da descrição é bem simples. Sendo necessário permissão ao usuário. (Insira o final do outro script)

    Segue o script...

    Const HKEY_LOCAL_MACHINE = &H80000002

    strComputer = "."

    Set objRegistry = GetObject _
        ("winmgmts:\\" & strComputer & "\root\default:StdRegProv")
    Set WshShell = WScript.CreateObject("WScript.Shell")

    strKeyPath = "System\CurrentControlSet\Services\lanmanserver\parameters"
    strValueName = "srvcomment"
    strDescription = WshShell.ExpandEnvironmentStrings("%USERNAME%")

    objRegistry.SetStringValue HKEY_LOCAL_MACHINE, strKeyPath, strValueName, strDescription



    Poste os resultados e se útil classifique!
    []s,
    " Qm tem boca vai a roma, meu fogão tem 6 e não saiu da cozinha ainda"
    terça-feira, 12 de janeiro de 2010 13:09
  • Marcellus,

    Agradeço sua ajuda. 

    O script para alterar a DESCRIÇÃO do micro está perfeito, porém o link que você me indicou eu já havia entrado e não funcionou.  Parece que ele não le a planilha com os novos nomes.

    Grato.

    Deivid.
    sexta-feira, 15 de janeiro de 2010 20:20
  • Marcellus,

    Agradeço sua ajuda. 

    O script para alterar a DESCRIÇÃO do micro está perfeito, porém o link que você me indicou eu já havia entrado e não funcionou.  Parece que ele não le a planilha com os novos nomes.

    Grato.

    Deivid.

    Somente para acrescentar, não consegui fazer funcionar o script que busca em uma planilha excel o novo nome do computador, conforme link indicado pelo amigo Marcellus.  Quando executo o mesmo nada acontece.

    Grato pela ajuda.

    Deivid.
    • Marcado como Resposta Deivid Soares quarta-feira, 19 de maio de 2010 14:00
    segunda-feira, 18 de janeiro de 2010 01:32