none
Solucion RRS feed

  • Pregunta

  • Yo mismo me contesto esta es una solucion para el que le interese funciona:

    Pero me gustaria refinarlo mas: lo idela seria que pingeara al host primero , si el host responde chekeara el sistema operativo segun el sistema operativo aplicara un metodo u otro para cambiar el nombre , ya que este metodo creo solo funciona en windows xp si el host no responde al ping crea un registro en un txt con los host que no respondieron.

     

    @echo off
    setlocal
    set MachineFile=D:\temp\test.txt
    set AdminUser=Administrador
    set AdminPwd=password

    set UserDomain=dominio\usuario
    set d101715pw=password

    for /f "tokens=1,2* delims=," %%a in ('type "%MachineFile%"') do (
      set OldName=%%~a
      set NewName=%%~b
      set Description=%%~c
      call Stick out tonguerocess
    )
    goto leave

    Stick out tonguerocess
    echo Adding description to %OldName% ...
    :: *** Test mode: remove the ECHO in front of the following line to change the description for real:
    reg add "\\%OldName%\HKLM\System\CurrentControlSet\Services\lanmanserver\parameters" /v "srvcomment" /d "%Description%" /f
    echo Renaming %OldName% to %NewName% ...
    :: *** Test mode: remove the ECHO in front of the following line to rename the computer for real:
    netdom renamecomputer %OldName% /newname:%NewName% /userD:%UserDomain% /passwordd:%d101715pw% /usero:%AdminUser% /passwordo:%AdminPwd% /force
    :leave

    lunes, 14 de julio de 2008 12:46