Переход организации на новый домен

set user=lannetset
set pass=1123581321
set domain=d1o2m3a4i5n6
:: %USERDOMAIN%
 
Echo %pass%|runas /netonly /user:"%domain%\%user%" "start /W IP\soft\programs\ccleaner\Ccleaner410.exe /S"

@echo off
SetLocal EnableDelayedExpansion
 
call :Reg_Read "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\ccleaner.exe" "Path" CCleanerPath
if not errorlevel 1 (
  if exist "%CCleanerPath%" start "" /WAIT "%CCleanerPath%\CCleaner.exe" /AUTO
)
:cycle
>NUL ping 127.1 -n 2
tasklist /FI "imagename eq ccleaner.exe" |>NUL find /i "ccleaner.exe" && goto cycle
tasklist /FI "imagename eq CCleaner64.exe" |>NUL find /i "CCleaner64.exe" && goto cycle
pause
Exit /B
 
:Reg_Read
  :: %1-вх.Ключ
  :: %2-вх.Имя параметра
  :: %3-исх.Переменная для хранения значения
  :: %4-исх.(опционально)-Переменная для хранения типа параметра
  set "%~3="& if "%~4" neq "" set "%~4="
  ::echo cmd /e:ON /v:ON /c "Reg.exe query "%~1" /v "%~2"^& echo ^!errorlevel^! err %~2"
  For /f "tokens=1-2*" %%a In ('cmd /e:ON /v:ON /c "Reg.exe query "%~1" /v "%~2"^& echo ^!errorlevel^! err %~2"') do (
    if "%%b"=="err" (set err=%%a) else (set "%~3=%%~c"& if "%~4" neq "" set "%~4=%%~b")
  )
Exit /B %err%

netdom renamecomputer "%computername%" /newname:doo-voo /userD:%computername%\kapriz /passwordd:12345678 /reboot:1