更改计算机名称，修改密码

更改计算机名称：

#重命名计算机，加入工作组
$NewComputerName = "WEB"
$workgroup = "WKGROUP"
$ComputerInfo = Get-WmiObject -Class Win32_ComputerSystem 
$ComputerInfo.rename($NewComputerName)
$ComputerInfo.JoinDomainOrWorkgroup($workgroup)

更改计算机名称Function：

Function Rename-Computer( $NewName,$AutoRestart=$false )
  {
    $computer=Get-WMIObject  Win32_ComputerSystem
    $null = $computer.Rename( $NewName )
    if($AutoRestart) { Restart-Computer -Force }
  }

修改密码：

#修改Administrator密码
Write-host "当前管理员密码已设置为：$userpass" -ForegroundColor Red
$computerName=$env:computername
$username="administrator"
$u = [ADSI]"WinNT://$computerName/$userName,User" 
$u.SetPassword($userpass)
$u.SetInfo()