1
# 查询所有计算机
2
Get-ADComputer -Filter *
3

4
DistinguishedName : CN=QYNET-CORE01,OU=Domain Controllers,DC=qy,DC=net
5
DNSHostName       : QYNET-CORE01.qy.net
6
Enabled           : True
7
Name              : QYNET-CORE01
8
ObjectClass       : computer
9
SamAccountName    : QYNET-CORE01$
10

11
DistinguishedName : CN=QYNET-EXCHANGE,OU=Computer,OU=Operation,OU=Organization,DC=qy,DC=net
12
DNSHostName       : QYNET-EXCHANGE.qy.net
13
Enabled           : True
14
Name              : QYNET-EXCHANGE
15
ObjectClass       : computer
16
SamAccountName    : QYNET-EXCHANGE$
17

18
# 当前实验域共查询到 6 个计算机对象，其余对象为：
19
# QYNET-CORE02、QYNET-WEBUI、QYNET-PROXY、QYNET-USER01

1
# 查询某台计算机的全部属性
2
Get-ADComputer -Identity QYNET-CORE01 -Properties *
3

4
CanonicalName          : qy.net/Domain Controllers/QYNET-CORE01
5
CN                     : QYNET-CORE01
6
Created                : 2026/9/4 12:42:17
7
Description            :
8
DistinguishedName      : CN=QYNET-CORE01,OU=Domain Controllers,DC=qy,DC=net
9
DNSHostName            : QYNET-CORE01.qy.net
10
Enabled                : True
11
LastLogonDate          : 2026/9/14 13:34:01
12
Name                   : QYNET-CORE01
13
ObjectClass            : computer
14
OperatingSystem        : Windows Server 2016 Datacenter Evaluation
15
OperatingSystemVersion : 10.0 (14393)
16
PasswordLastSet        : 2026/9/4 12:42:33
17
SamAccountName         : QYNET-CORE01$

1
$days = (Get-Date).AddDays(-90)
2

3
Get-ADComputer -Filter * -Properties LastLogonTimeStamp |
4
    Where-Object {
5
        -not $_.LastLogonTimeStamp -or
6
        $_.LastLogonTimeStamp -lt $days.ToFileTime()
7
    } |
8
    Select-Object Name,
9
        @{Name="LastLogon";Expression={
10
            if ($_.LastLogonTimeStamp) {
11
                [datetime]::FromFileTime($_.LastLogonTimeStamp)
12
            }
13
        }}
14

15
# 当前 qy.net 中没有超过 90 天未登录的计算机，因此无输出

1
$computerName = "QYNET-WEBUI"
2

3
$lastLogons = Get-ADDomainController -Filter * |
4
    ForEach-Object {
5
        $computer = Get-ADComputer `
6
            -Identity $computerName `
7
            -Server $_.HostName `
8
            -Properties LastLogon
9

10
        [pscustomobject]@{
11
            DomainController = $_.HostName
12
            LastLogon = if ($computer.LastLogon -gt 0) {
13
                [datetime]::FromFileTime($computer.LastLogon)
14
            }
15
        }
16
    }
17

18
$lastLogons | Sort-Object LastLogon -Descending
19

20
DomainController      LastLogon
21
----------------      -------------
22
QYNET-CORE01.qy.net   2026/9/10 15:57:35
23
QYNET-CORE02.qy.net   2026/9/10 15:57:35
24

25
$lastLogons |
26
    Sort-Object LastLogon -Descending |
27
    Select-Object -First 1
28

29
DomainController      LastLogon
30
----------------      -------------
31
QYNET-CORE01.qy.net   2026/9/10 15:57:35

1
Set-ADComputer `
2
    -Identity PC-LAB-01 `
3
    -Description "实验室测试计算机" `
4
    -Location "Shanghai-Lab-A" `
5
    -ManagedBy "CN=浅月,OU=User,OU=Admin,OU=Organization,DC=qy,DC=net"
6

7
# 执行成功时默认无输出，重新查询验证
8
Get-ADComputer -Identity PC-LAB-01 `
9
    -Properties Description,Location,ManagedBy |
10
    Select-Object Name,Description,Location,ManagedBy
11

12
Name        : PC-LAB-01
13
Description : 实验室测试计算机
14
Location    : Shanghai-Lab-A
15
ManagedBy   : CN=浅月,OU=User,OU=Admin,OU=Organization,DC=qy,DC=net

1
New-ADComputer `
2
    -Name "PC-LAB-01" `
3
    -SamAccountName "PC-LAB-01$" `
4
    -DNSHostName "PC-LAB-01.qy.net" `
5
    -Path "OU=Computer,OU=Organization,DC=qy,DC=net" `
6
    -Description "实验室测试计算机" `
7
    -Enabled $true `
8
    -PassThru
9

10
DistinguishedName : CN=PC-LAB-01,OU=Computer,OU=Organization,DC=qy,DC=net
11
DNSHostName       : PC-LAB-01.qy.net
12
Enabled           : True
13
Name              : PC-LAB-01
14
ObjectClass       : computer
15
SamAccountName    : PC-LAB-01$

1
# SMB
2
Test-NetConnection -ComputerName QYNET-CORE01 -Port 445
3

4
ComputerName     : QYNET-CORE01
5
RemoteAddress    : 10.0.0.10
6
RemotePort       : 445
7
InterfaceAlias   : Ethernet
8
TcpTestSucceeded : True
9

10
# WinRM HTTP
11
Test-NetConnection -ComputerName QYNET-CORE01 -Port 5985
12

13
ComputerName     : QYNET-CORE01
14
RemoteAddress    : 10.0.0.10
15
RemotePort       : 5985
16
InterfaceAlias   : Ethernet
17
TcpTestSucceeded : True

1
$credential = Get-Credential "QY\Administrator"
2

3
Add-Computer `
4
    -DomainName "qy.net" `
5
    -OUPath "OU=Computer,OU=Organization,DC=qy,DC=net" `
6
    -Credential $credential `
7
    -PassThru `
8
    -Verbose
9

10
HasSucceeded ComputerName
11
------------ ------------
12
        True PC-LAB-01
13

14
# 入域成功后重启
15
Restart-Computer

1
$quarantineOU = "OU=Disabled Computers,OU=Organization,DC=qy,DC=net"
2

3
$staleComputers | ForEach-Object {
4
    Disable-ADAccount -Identity $_
5
    Move-ADObject -Identity $_.DistinguishedName -TargetPath $quarantineOU
6
}
7

8
# 成功时默认无输出，重新查询验证
9
Get-ADComputer `
10
    -SearchBase $quarantineOU `
11
    -Filter * |
12
    Select-Object Name,Enabled,DistinguishedName
13

14
Name        Enabled DistinguishedName
15
----        ------- -----------------
16
PC-OLD-01     False CN=PC-OLD-01,OU=Disabled Computers,OU=Organization,DC=qy,DC=net
17
PC-STOCK-02   False CN=PC-STOCK-02,OU=Disabled Computers,OU=Organization,DC=qy,DC=net

1
# 在管理端确认计算机所在 OU
2
Get-ADComputer -Identity PC-LAB-01 |
3
    Select-Object Name,DistinguishedName
4

5
Name      DistinguishedName
6
----      -----------------
7
PC-LAB-01 CN=PC-LAB-01,OU=Lab,OU=Computer,OU=Organization,DC=qy,DC=net
8

9
# 在目标计算机上刷新组策略
10
gpupdate /force
11

12
Updating policy...
13
Computer Policy update has completed successfully.
14
User Policy update has completed successfully.
15

16
# 查看计算机实际应用的策略
17
gpresult /Scope Computer /R
18

19
COMPUTER SETTINGS
20
-----------------
21
    CN=PC-LAB-01,OU=Lab,OU=Computer,OU=Organization,DC=qy,DC=net
22
    Applied Group Policy Objects
23
    -----------------------------
24
        Default Domain Policy
25
        Lab Computer Policy

1
@echo off
2

3
rem ================================================================
4
rem qy.net 域加入教学脚本
5
rem
6
rem BAT 负责：检查管理员权限、启动内嵌 PowerShell、接收退出代码。
7
rem PowerShell 负责：参数输入与校验、网络配置、改名、加域和重启。
8
rem
9
rem 为什么采用这种组合？
10
rem 传统 BAT 不擅长处理网卡对象、IP 校验和安全凭据；PowerShell
11
rem 对这些 Windows 管理任务有原生命令，而 BAT 便于直接双击启动。
12
rem ================================================================
13

14
rem EnableExtensions 启用现代 CMD 扩展语法；setlocal 防止变量污染父 CMD。
15
setlocal EnableExtensions
16

17
rem 切换到 UTF-8 代码页，尽量避免中文提示乱码。
18
chcp 65001 >nul
19
title qy.net 域加入向导
20

21
rem fltmc 需要管理员权限。这里只利用其退出代码判断是否为提升会话，
22
rem 不会修改筛选器或系统配置。
23
fltmc >nul 2>&1
24
if errorlevel 1 (
25
    echo [错误] 请右键此脚本，选择“以管理员身份运行”。
26
    echo.
27
    pause
28
    exit /b 1
29
)
30

31
rem %~f0 表示当前 BAT 自身的绝对路径。
32
rem PowerShell 稍后会重新读取这个文件，并执行标记行之后的脚本内容。
33
set "JOIN_SCRIPT_PATH=%~f0"
34

35
rem 强制调用 Windows PowerShell 5.1，因为 Add-Computer 与传统 AD/RSAT
36
rem 环境的兼容性最好。-NoProfile 可避免个人 Profile 影响脚本行为。
37
powershell.exe -NoLogo -NoProfile -ExecutionPolicy Bypass -Command ^
38
  "$lines = Get-Content -LiteralPath $env:JOIN_SCRIPT_PATH;" ^
39
  "$marker = [Array]::IndexOf($lines, '# POWERSHELL-BEGIN');" ^
40
  "if ($marker -lt 0) { throw '找不到内嵌 PowerShell 脚本。' };" ^
41
  "$code = $lines[($marker + 1)..($lines.Length - 1)] -join [Environment]::NewLine;" ^
42
  "& ([ScriptBlock]::Create($code))"
43

44
rem 保存 PowerShell 返回的退出代码：0 表示正常完成，非 0 表示失败。
45
set "JOIN_EXIT_CODE=%ERRORLEVEL%"
46
echo.
47
if not "%JOIN_EXIT_CODE%"=="0" (
48
    echo [失败] 加域流程没有完成，退出代码：%JOIN_EXIT_CODE%
49
) else (
50
    echo [完成] 加域命令已提交。
51
)
52
echo.
53
pause
54
exit /b %JOIN_EXIT_CODE%
55

56
# POWERSHELL-BEGIN
57

58
<#
59
从这一行开始是内嵌 PowerShell。
60
CMD 在前面已经 exit /b，因此不会把以下内容当作 BAT 命令执行。
61
#>
62

63
# 让未处理的 PowerShell 错误直接进入 catch，防止失败后继续执行。
64
$ErrorActionPreference = 'Stop'
65

66
# 固定环境参数：域名、两个真实存在的目标 OU、默认加域账户。
67
# 密码不会写入文件，稍后由 Get-Credential 安全读取。
68
$domainName = 'qy.net'
69
$adminComputerOU = 'OU=Computer,OU=Admin,OU=Organization,DC=qy,DC=net'
70
$operationComputerOU = 'OU=Computer,OU=Operation,OU=Organization,DC=qy,DC=net'
71
$defaultDomainUser = 'QY\Administrator'
72

73
<#
74
.SYNOPSIS
75
要求用户把同一个值输入两次。
76

77
.DESCRIPTION
78
只有两次内容完全相同才返回结果，用来降低计算机名、IP、DNS 等
79
关键配置因输入错误而造成的风险。
80

81
.PARAMETER Label
82
显示给用户看的字段名称。
83

84
.PARAMETER AllowEmpty
85
允许两次都直接回车。当前仅用于可选的备用 DNS。
86
#>
87
function Read-ConfirmedValue {
88
    param(
89
        [Parameter(Mandatory)]
90
        [string]$Label,
91

92
        [switch]$AllowEmpty
93
    )
94

95
    while ($true) {
96
        $first = (Read-Host "请输入$Label").Trim()
97

98
        if (-not $AllowEmpty -and [string]::IsNullOrWhiteSpace($first)) {
99
            Write-Host "[提示] $Label 不能为空。" -ForegroundColor Yellow
100
            continue
101
        }
102

103
        $second = (Read-Host "请再次输入$Label进行确认").Trim()
104

105
        if ($first -ceq $second) {
106
            return $first
107
        }
108

109
        Write-Host "[提示] 两次输入不一致，请重新输入。" -ForegroundColor Yellow
110
    }
111
}
112

113
<#
114
.SYNOPSIS
115
检查文本是不是有效的 IPv4 地址。
116

117
.DESCRIPTION
118
IPAddress.TryParse 可以判断地址格式；AddressFamily 再排除 IPv6，
119
从而确保后面的 New-NetIPAddress 收到的是 IPv4。
120
#>
121
function Test-IPv4Address {
122
    param([string]$Address)
123

124
    $parsed = $null
125
    return [System.Net.IPAddress]::TryParse($Address, [ref]$parsed) -and
126
        $parsed.AddressFamily -eq [System.Net.Sockets.AddressFamily]::InterNetwork
127
}
128

129
<#
130
.SYNOPSIS
131
使用统一格式显示错误并终止脚本。
132

133
.DESCRIPTION
134
exit 1 会把失败状态返回给外层 BAT，外层据此显示“流程没有完成”。
135
#>
136
function Stop-WithMessage {
137
    param([string]$Message)
138

139
    Write-Host "[错误] $Message" -ForegroundColor Red
140
    exit 1
141
}
142

143
# -------------------------- 初始化检查 --------------------------
144

145
# 清屏并显示脚本用途及远程连接中断风险。
146
Clear-Host
147
Write-Host '==============================================' -ForegroundColor Cyan
148
Write-Host '              qy.net 域加入向导' -ForegroundColor Cyan
149
Write-Host '==============================================' -ForegroundColor Cyan
150
Write-Host
151
Write-Host '请在待加域计算机本地运行此脚本。' -ForegroundColor Yellow
152
Write-Host '网络配置修改后，远程连接可能会立即中断。' -ForegroundColor Yellow
153
Write-Host
154

155
# Win32_ComputerSystem.PartOfDomain 可以判断当前设备是否已经入域。
156
# 已入域设备涉及改名、退域或修复信任关系，不应走“首次加域”流程。
157
$computerSystem = Get-CimInstance -ClassName Win32_ComputerSystem
158
if ($computerSystem.PartOfDomain) {
159
    Stop-WithMessage "当前计算机已经加入域 $($computerSystem.Domain)。本脚本只用于首次加域。"
160
}
161

162
# 列出没有被禁用的网卡，让用户复制正确的 Name 作为 InterfaceAlias。
163
Write-Host '当前可用网络适配器：' -ForegroundColor Cyan
164
Get-NetAdapter |
165
    Where-Object Status -ne 'Disabled' |
166
    Select-Object Name,InterfaceDescription,Status,LinkSpeed |
167
    Format-Table -AutoSize
168

169
# -------------------------- 收集参数 ----------------------------
170

171
# 每一项均要求输入两次。静态 IP 必须同时具备前缀长度与默认网关。
172
$computerName = Read-ConfirmedValue -Label '新计算机名（建议不超过 15 个字符）'
173
$interfaceAlias = Read-ConfirmedValue -Label '网络适配器名称（例如 Ethernet）'
174
$ipAddress = Read-ConfirmedValue -Label '静态 IPv4 地址'
175
$prefixLengthText = Read-ConfirmedValue -Label '子网前缀长度（例如 24）'
176
$defaultGateway = Read-ConfirmedValue -Label '默认网关'
177
$dnsServer1 = Read-ConfirmedValue -Label '首选 DNS 服务器'
178
$dnsServer2 = Read-ConfirmedValue -Label '备用 DNS 服务器（没有则两次都直接回车）' -AllowEmpty
179

180
# 根据设备用途选择 OU，避免终端和服务器套用错误的 GPO。
181
Write-Host
182
Write-Host '请选择计算机对象的目标 OU：' -ForegroundColor Cyan
183
Write-Host "  1. 管理终端：$adminComputerOU"
184
Write-Host "  2. 业务服务器：$operationComputerOU"
185

186
$targetOU = $null
187
while (-not $targetOU) {
188
    $ouChoice = Read-ConfirmedValue -Label '目标 OU 编号（1 或 2）'
189
    switch ($ouChoice) {
190
        '1' { $targetOU = $adminComputerOU }
191
        '2' { $targetOU = $operationComputerOU }
192
        default {
193
            Write-Host '[提示] 只能输入 1 或 2。' -ForegroundColor Yellow
194
        }
195
    }
196
}
197

198
# -------------------------- 校验参数 ----------------------------
199

200
# NetBIOS 兼容名称建议不超过 15 个字符，并避免非法字符和首尾连字符。
201
if ($computerName.Length -gt 15 -or
202
    $computerName -notmatch '^[A-Za-z0-9](?:[A-Za-z0-9-]*[A-Za-z0-9])?$') {
203
    Stop-WithMessage '计算机名必须为 1～15 个字符，只能包含字母、数字和连字符，且不能以连字符开头或结尾。'
204
}
205

206
# Get-NetAdapter 不仅校验名称，还把网卡对象保存下来供后续步骤使用。
207
try {
208
    $adapter = Get-NetAdapter -Name $interfaceAlias -ErrorAction Stop
209
} catch {
210
    Stop-WithMessage "找不到网络适配器 '$interfaceAlias'。"
211
}
212

213
# 依次验证静态 IP、前缀长度、网关和 DNS，任何一项错误都立即终止。
214
if (-not (Test-IPv4Address $ipAddress)) {
215
    Stop-WithMessage "静态 IP '$ipAddress' 不是有效的 IPv4 地址。"
216
}
217

218
$prefixLength = 0
219
if (-not [int]::TryParse($prefixLengthText, [ref]$prefixLength) -or
220
    $prefixLength -lt 1 -or $prefixLength -gt 32) {
221
    Stop-WithMessage '子网前缀长度必须是 1～32 之间的整数。'
222
}
223

224
if (-not (Test-IPv4Address $defaultGateway)) {
225
    Stop-WithMessage "默认网关 '$defaultGateway' 不是有效的 IPv4 地址。"
226
}
227

228
if (-not (Test-IPv4Address $dnsServer1)) {
229
    Stop-WithMessage "首选 DNS '$dnsServer1' 不是有效的 IPv4 地址。"
230
}
231

232
if ($dnsServer2 -and -not (Test-IPv4Address $dnsServer2)) {
233
    Stop-WithMessage "备用 DNS '$dnsServer2' 不是有效的 IPv4 地址。"
234
}
235

236
# Set-DnsClientServerAddress 接收数组，因此把首选和可选备用 DNS 合并。
237
$dnsServers = @($dnsServer1)
238
if ($dnsServer2) {
239
    $dnsServers += $dnsServer2
240
}
241

242
# -------------------------- 最终确认 ----------------------------
243

244
# 在发生任何修改前集中展示最终配置。
245
Write-Host
246
Write-Host '================ 最终配置确认 ================' -ForegroundColor Cyan
247
Write-Host ("当前计算机名： {0}" -f $env:COMPUTERNAME)
248
Write-Host ("新计算机名：   {0}" -f $computerName)
249
Write-Host ("网络适配器：   {0}" -f $adapter.Name)
250
Write-Host ("静态 IP：      {0}/{1}" -f $ipAddress,$prefixLength)
251
Write-Host ("默认网关：     {0}" -f $defaultGateway)
252
Write-Host ("DNS 服务器：   {0}" -f ($dnsServers -join ', '))
253
Write-Host ("目标域：       {0}" -f $domainName)
254
Write-Host ("目标 OU：      {0}" -f $targetOU)
255
Write-Host '================================================' -ForegroundColor Cyan
256
Write-Host
257

258
# 要求输入完整单词 JOIN，避免误按 Y 或 Enter 就开始修改网络。
259
$confirmation = Read-Host '确认无误后请输入 JOIN；输入其他内容将取消'
260
if ($confirmation -cne 'JOIN') {
261
    Write-Host '[取消] 未修改任何配置。' -ForegroundColor Yellow
262
    exit 0
263
}
264

265
# -------------------------- 安全预检查 --------------------------
266

267
# Ping 只能发现“明确正在响应”的地址，不能百分百证明地址未占用；
268
# 因此通过这里只是最低限度的防冲突检查，正式环境还应核对 DHCP/IPAM。
269
Write-Host
270
Write-Host '[预检查] 检查目标 IP 是否已经响应……' -ForegroundColor Cyan
271
if (Test-Connection -ComputerName $ipAddress -Count 1 -Quiet -ErrorAction SilentlyContinue) {
272
    Stop-WithMessage "目标 IP $ipAddress 当前能够响应。为避免 IP 冲突，流程已经停止。"
273
}
274

275
# AD 加域依赖 _ldap._tcp.dc._msdcs.<domain> SRV 记录。
276
# 如果指定 DNS 无法解析它，提前停止比改完网络后再失败更安全。
277
Write-Host '[预检查] 使用指定 DNS 查询 qy.net 域控 SRV 记录……' -ForegroundColor Cyan
278
try {
279
    $srvRecords = Resolve-DnsName `
280
        -Name '_ldap._tcp.dc._msdcs.qy.net' `
281
        -Type SRV `
282
        -Server $dnsServer1 `
283
        -DnsOnly `
284
        -ErrorAction Stop
285

286
    $srvRecords |
287
        Where-Object Type -eq 'SRV' |
288
        Select-Object NameTarget,Port,Priority,Weight |
289
        Format-Table -AutoSize
290
} catch {
291
    Stop-WithMessage "指定 DNS 无法解析 qy.net 域控 SRV 记录：$($_.Exception.Message)"
292
}
293

294
# -------------------------- 获取凭据 ----------------------------
295

296
# Get-Credential 返回 PSCredential，密码以 SecureString 保存，
297
# 不会作为明文变量或命令行参数出现在脚本中。
298
$domainUserInput = Read-Host "请输入加域账户（直接回车使用 $defaultDomainUser）"
299
$domainUser = if ([string]::IsNullOrWhiteSpace($domainUserInput)) {
300
    $defaultDomainUser
301
} else {
302
    $domainUserInput.Trim()
303
}
304

305
$credential = Get-Credential `
306
    -UserName $domainUser `
307
    -Message '请输入用于加入 qy.net 域的凭据'
308

309
if (-not $credential) {
310
    Stop-WithMessage '没有取得域凭据。'
311
}
312

313
# -------------------------- 备份现状 ----------------------------
314

315
# 修改网络前，把 ipconfig、IP 配置和 DNS 配置写入临时文件。
316
# 若加域失败，这份记录可用于人工核对和恢复；脚本不会盲目自动回滚。
317
$backupPath = Join-Path `
318
    $env:TEMP `
319
    ("qy-domain-join-network-{0}.txt" -f (Get-Date -Format 'yyyyMMdd-HHmmss'))
320

321
Write-Host "[备份] 当前网络配置将保存到 $backupPath" -ForegroundColor Cyan
322
@(
323
    '===== ipconfig /all ====='
324
    (ipconfig /all | Out-String)
325
    '===== Get-NetIPConfiguration ====='
326
    (Get-NetIPConfiguration | Format-List * | Out-String)
327
    '===== Get-DnsClientServerAddress ====='
328
    (Get-DnsClientServerAddress | Format-List * | Out-String)
329
) | Set-Content -LiteralPath $backupPath -Encoding UTF8
330

331
# -------------------------- 应用配置 ----------------------------
332

333
# 整个修改过程放在 try/catch 中。发生异常时会进入 catch、显示错误，
334
# 并把非零退出代码返回给外层 BAT。
335
try {
336
    Write-Host '[1/4] 正在配置静态 IP……' -ForegroundColor Cyan
337

338
    # 删除所选网卡已有的 IPv4 地址，防止 DHCP 地址与新静态地址并存。
339
    Get-NetIPAddress `
340
        -InterfaceAlias $adapter.Name `
341
        -AddressFamily IPv4 `
342
        -ErrorAction SilentlyContinue |
343
        Where-Object IPAddress -ne '127.0.0.1' |
344
        Remove-NetIPAddress -Confirm:$false -ErrorAction SilentlyContinue
345

346
    # 删除旧的 IPv4 默认路由，避免添加新网关时发生路由冲突。
347
    Get-NetRoute `
348
        -InterfaceAlias $adapter.Name `
349
        -AddressFamily IPv4 `
350
        -ErrorAction SilentlyContinue |
351
        Where-Object DestinationPrefix -eq '0.0.0.0/0' |
352
        Remove-NetRoute -Confirm:$false -ErrorAction SilentlyContinue
353

354
    # 关闭该网卡的 IPv4 DHCP，然后写入新的静态地址、前缀和网关。
355
    Set-NetIPInterface `
356
        -InterfaceAlias $adapter.Name `
357
        -AddressFamily IPv4 `
358
        -Dhcp Disabled
359

360
    New-NetIPAddress `
361
        -InterfaceAlias $adapter.Name `
362
        -IPAddress $ipAddress `
363
        -PrefixLength $prefixLength `
364
        -DefaultGateway $defaultGateway | Out-Null
365

366
    # AD 客户端必须使用能够解析域控 SRV 记录的内部 DNS。
367
    Write-Host '[2/4] 正在配置 DNS……' -ForegroundColor Cyan
368
    Set-DnsClientServerAddress `
369
        -InterfaceAlias $adapter.Name `
370
        -ServerAddresses $dnsServers
371

372
    # 清除旧 DNS 缓存，避免后续验证继续命中修改前的缓存结果。
373
    Clear-DnsClientCache
374

375
    # 使用已经应用到网卡的新 DNS 再验证一次域控 SRV 记录。
376
    Write-Host '[3/4] 正在验证域 DNS……' -ForegroundColor Cyan
377
    Resolve-DnsName `
378
        -Name '_ldap._tcp.dc._msdcs.qy.net' `
379
        -Type SRV `
380
        -DnsOnly `
381
        -ErrorAction Stop | Out-Null
382

383
    # Add-Computer 的 -NewName 可以把“改名”和“加域”合并到同一次重启中；
384
    # -OUPath 决定计算机对象创建在哪个 OU，-PassThru 返回执行结果。
385
    Write-Host '[4/4] 正在修改计算机名并加入 qy.net……' -ForegroundColor Cyan
386
    $joinResult = Add-Computer `
387
        -DomainName $domainName `
388
        -NewName $computerName `
389
        -OUPath $targetOU `
390
        -Credential $credential `
391
        -PassThru `
392
        -Verbose `
393
        -ErrorAction Stop
394

395
    $joinResult | Format-Table HasSucceeded,ComputerName -AutoSize
396

397
    if (-not $joinResult.HasSucceeded) {
398
        throw 'Add-Computer 没有返回成功状态。'
399
    }
400
} catch {
401
    # 网络可能已经发生变化，所以这里只报告错误和备份路径，
402
    # 不自动套用旧配置，避免错误回滚进一步中断网络。
403
    Write-Host
404
    Write-Host '[失败] 网络配置或加域过程中发生错误：' -ForegroundColor Red
405
    Write-Host $_.Exception.Message -ForegroundColor Red
406
    Write-Host "修改前的网络配置保存在：$backupPath" -ForegroundColor Yellow
407
    Write-Host '请先检查当前网络配置和连通性，再决定是否恢复。' -ForegroundColor Yellow
408
    exit 1
409
}
410

411
# -------------------------- 完成与重启 --------------------------
412

413
# 改名和加域都要在重启后完全生效。15 秒倒计时给管理员留下取消机会。
414
Write-Host
415
Write-Host '[成功] 计算机名和加域请求已提交。' -ForegroundColor Green
416
Write-Host '计算机将在 15 秒后重启；如需取消，请立即运行 shutdown /a。' -ForegroundColor Yellow
417
shutdown.exe /r /t 15 /c "计算机已加入 qy.net，正在重启以完成配置。"
418
exit 0