forked from fydexx/fjnu-kms
-
Notifications
You must be signed in to change notification settings - Fork 1
/
FAFU正版Windows、Office 激活脚本（双击打开，然后选是）.bat
306 lines (284 loc) · 11.6 KB
/
FAFU正版Windows、Office 激活脚本（双击打开，然后选是）.bat
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
::
:: 版本号：20171229
:: 制作者：神奇海螺（零点IT协会）
:: 鸣 谢：hnfeng（远景论坛）
:: 鸣 谢：ss06009180（吾爱破解）
:: ::
@echo off
setlocal EnableDelayedExpansion&color 3e & cd /d "%~dp0"
title Windows/Office 激活脚本 - 福建农林大学校园软件正版化
%1 %2
ver | find "5." > NUL && goto :start
mshta vbscript:createobject("shell.application").shellexecute("%~s0","goto :start","","runas",1)(window.close)&goto :eof
:start
mode con: cols=100 lines=30
echo.
echo ::::::::::::::::::::::::::::::::::::::::::::::::::::
echo :: ::
echo :: 福建农林大学 校园软件正版化 激活脚本 ::
echo :: 仅供福建农林大学校园网内使用 ::
echo :: 修改自 福师大零点IT协会 ::
echo :: 2019-3-26 ::
echo :: ::
echo ::::::::::::::::::::::::::::::::::::::::::::::::::::
echo :: ::
echo :: 【脚本支持】 ::
echo :: 〇 Windows 10 专业版 ::
echo :: 〇 Windows 8.1 专业版 ::
echo :: 〇 Windows 8 专业版 ::
echo :: 〇 Windows 7 专业版 ::
echo :: 〇 Windows Server 2012 R2 ::
echo :: 〇 Windows Server 2008 R2 ::
echo :: 〇 Office 2016 专业增强版 ::
echo :: 〇 Office 2013 专业增强版 ::
echo :: 〇 Office 2010 专业增强版 ::
echo :: 〇 不在列表中的其它版本会尝试激活 ::
echo :: ::
echo ::::::::::::::::::::::::::::::::::::::::::::::::::::
echo.
echo.
echo 提示：请按空格键开始激活。
echo.
pause > NUL
cls
:: 如果激活失败，可能是因为连不到 KMS 服务器了，
:: 你仅需修改下面的 KMS IP 和服务器地址
set KMSSER=210.34.80.101
echo 正在设置激活服务器地址……
cscript //Nologo %windir%\system32\slmgr.vbs /skms %KMSSER%
echo [OK] 成功设置激活服务器地址。
echo.
echo 正在检查与激活服务器的连接情况，请稍候……
ping %KMSSER% | find "超时" > NUL && goto fail
ping %KMSSER% | find "目标主机" > NUL && goto fail
ping %KMSSER% | find "无法访问" > NUL && goto fail
ping %KMSSER% | find "故障" > NUL && goto fail
echo [OK] 成功连接上激活服务器。
echo.
echo 正在检查系统的激活情况，将自动跳过永久激活的系统。
cscript //Nologo %windir%\system32\slmgr.vbs /xpr | find "已永久激活" > NUL && goto wintooff
:starta
ver | find "6.1." > NUL && goto win7
ver | find "6.2." > NUL && goto win8
ver | find "6.3." > NUL && goto win81
ver | find "10.0." > NUL && goto win10
ver | find "5." > NUL && goto :xptooff
echo 未找到合适的系统……
pause
exit
:win7
echo.
echo 【当前系统】Windows 7 或 Windows Server 2008 R2
set Professional=FJ82H-XT6CR-J8D7P-XQJJ2-GPDD4
set ProfessionalN=MRPKT-YTG23-K7D7T-X2JMM-QY7MG
set ProfessionalE=W82YF-2Q76Y-63HXB-FGJG9-GF7QX
set Enterprise=33PXH-7Y6KF-2VJC9-XBBR8-HVTHH
set EnterpriseN=YDRBP-3D83W-TY26F-D46B2-XCKRJ
set EnterpriseE=C29WB-22CC8-VJ326-GHFJW-H9DH4
set ServerWeb=6TPJF-RBVHG-WBW2R-86QPH-6RTM4
set ServerHPC=TT8MH-CG224-D3D7Q-498W2-9QCTX
set ServerStandard=YC6KT-GKW9T-YTKYR-T4X34-R7VHC
set ServerEnterprise=489J6-VHDMP-X63PK-3K798-CPX3Y
set ServerDatacenter=74YFP-3QFB3-KQT8W-PMXWJ-7M648
set ServerEnterpriseIA64=GT63C-RJFQ3-4GMB6-BRFB9-CB83V
goto windowsstart
:win8
echo.
echo 【当前系统】Windows 8 或 Windows Server 2012 R2
set Professional=NG4HW-VH26C-733KW-K6F98-J8CK4
set ProfessionalN=XCVCF-2NXM9-723PB-MHCB7-2RYQQ
set Core=BN3D2-R7TKB-3YPBD-8DRP2-27GG4
set Enterprise=32JNW-9KQ84-P47T8-D8GGY-CWCK7
set EnterpriseN=JMNMF-RHW7P-DMY6X-RF3DR-X2BQT
set CoreN=8N2M2-HWPGY-7PGT9-HGDD8-GVGGY
set CoreSingleLanguage=2WN2H-YGCQR-KFX6K-CD6TF-84YXQ
set CoreCountrySpecific=4K36P-JN4VD-GDC6V-KDT89-DYFKP
set ServerMultiPointPremium=XNH6W-2V9GX-RGJ4K-Y8X6F-QGJ2G
set ServerMultiPointStandard=HM7DN-YVMH3-46JC3-XYTG7-CYQJJ
set ServerStandard=XC9B7-NBPP2-83J2H-RHMBY-92BT4
set ServerDatacenter=48HP8-DN98B-MYWDG-T2DCC-8W83P
set ProfessionalWMC=GNBB8-YVD74-QJHX6-27H4K-8QHDG
set CoreARM=DXHJF-N9KQX-MFPVR-GHGQK-Y7RKV
goto windowsstart
:win81
echo.
echo 【当前系统】Windows 8.1 或 Windows Server 2012 R2
set Core=M9Q9P-WNJJT-6PXPY-DWX8H-6XWKK
set CoreARM=XYTND-K6QKT-K2MRH-66RTM-43JKP
set CoreCountrySpecific=NCTT7-2RGK8-WMHRF-RY7YQ-JTXG3
set CoreN=7B9N3-D94CG-YTVHR-QBPX3-RJP64
set CoreSingleLanguage=BB6NG-PQ82V-VRDPW-8XVD2-V8P66
set EmbeddedIndustry=NMMPB-38DD4-R2823-62W8D-VXKJB
set EmbeddedIndustryA=VHXM3-NR6FT-RY6RT-CK882-KW2CJ
set EmbeddedIndustryE=FNFKF-PWTVT-9RC8H-32HB2-JB34X
set Enterprise=MHF9N-XY6XB-WVXMC-BTDCT-MKKG7
set EnterpriseN=TT4HM-HN7YT-62K67-RGRQJ-JFFXW
set Professional=GCRJD-8NW9H-F2CDX-CCM8D-9D6T9
set ProfessionalN=HMCNV-VVBFX-7HMBH-CTY9B-B4FXY
set ProfessionalWMC=789NJ-TQK6T-6XTH8-J39CJ-J8D3P
set ServerCloudStorageCore=3NPTF-33KPT-GGBPR-YX76B-39KDD
set ServerCloudStorage=3NPTF-33KPT-GGBPR-YX76B-39KDD
set ServerDatacenter=W3GGN-FT8W3-Y4M27-J84CP-Q3VJ9
set ServerDatacenterCore=W3GGN-FT8W3-Y4M27-J84CP-Q3VJ9
set ServerStandard=D2N9P-3P6X9-2R39C-7RTCD-MDVJX
set ServerStandardCore=D2N9P-3P6X9-2R39C-7RTCD-MDVJX
set ServerSolution=KNC87-3J2TX-XB4WP-VCPJV-M4FWM
set ServerSolutionCore=KNC87-3J2TX-XB4WP-VCPJV-M4FWM
goto windowsstart
:win10
echo.
echo 【当前系统】Windows 10 或 Windows Server 2016
set Core=TX9XD-98N7V-6WMQ6-BX7FG-H8Q99
set CoreCountrySpecific=PVMJN-6DFY6-9CCP6-7BKTT-D3WVR
set CoreN=3KHY7-WNT83-DGQKR-F7HPR-844BM
set CoreSingleLanguage=7HNRX-D7KGG-3K4RQ-4WPJ4-YTDFH
set Professional=W269N-WFGWX-YVC9B-4J6C9-T83GX
set ProfessionalN=MH37W-N47XK-V7XM9-C7227-GCQG9
set Enterprise=NPPR9-FWDCX-D2C8J-H872K-2YT43
set EnterpriseN=DPH2V-TTNVB-4X9Q3-TJR4H-KHJW4
set Education=NW6C2-QMPVW-D7KKK-3GKT6-VCFB2
set EducationN=2WH4N-8QGBV-H22JP-CT43Q-MDWWJ
set EnterpriseS=WNMTR-4C88C-JK8YV-HQ7T2-76DF9
set EnterpriseSN=2F77B-TNFGY-69QQF-B8YKP-D69TJ
ver | find "10.0.10" > NUL && goto windowsstart
set EnterpriseS=DCPHK-NFMTC-H88MJ-PFHPY-QJ4BJ
set EnterpriseSN=QFFDN-GRT3P-VKWWX-X7T3R-8B639
set ServerDatacenter=CB7KF-BWN84-R7R2Y-793K2-8XDDG
set ServerStandard=WC2BQ-8NRM3-FDDYY-2BFGV-KHKQY
set ServerSolution=JCKRF-N37P4-C2D82-9YXRT-4M63B
goto windowsstart
:windowsstart
for /f "tokens=3 delims= " %%i in ('reg QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID"') do set EditionID=%%i
if defined %EditionID% (
cscript //Nologo %windir%\system32\slmgr.vbs /ipk !%EditionID%!
cscript //Nologo %windir%\system32\slmgr.vbs /ato
) else (
echo 找不到系列号，可能是旗舰版之类的系统……
ver | find "6.1." > NUL && goto oem7
ver | find "6.0." > NUL && goto oem7
)
goto office
:wintooff
echo [OK] 系统已经永久激活！转入 Office 激活。
goto office
:office
echo 正在检查安装的 Office 版本。
call :GetOfficePath 14 Office2010
call :ActOffice 14 Office2010
call :GetOfficePath 15 Office2013
call :ActOffice 15 Office2013
call :GetOfficePath 16 Office2016
call :ActOffice 16 Office2016
echo.
echo 检查是否存在 Office 2016 零售版，将执行 Retail 转 VOL。
if exist "%ProgramFiles%\Microsoft Office\Office16\ospp.vbs" set _Office16Path=%ProgramFiles%\Microsoft Office\Office16
if exist "%ProgramFiles(x86)%\Microsoft Office\Office16\ospp.vbs" set _Office16Path=%ProgramFiles(x86)%\Microsoft Office\Office16
if DEFINED _Office16Path (echo [OK] 已发现 Office2016 零售版
call :ActOffice 16 Office2016
) else (echo 未发现 Office2016 零售版)
echo [OK] 操作成功完成！
echo.
echo 请按空格键结束激活。
pause > NUL
goto finish
exit
:ActOffice
if DEFINED _Office%1Path (
cd /d "!_Office%1Path!"
echo.
echo 检查 %2 的激活状态。
cscript //nologo ospp.vbs /act | find /i "successful" > NUL && (
echo [OK] %2 已经激活，自动跳过 & echo.) || (
echo %2 未激活，正尝试进行激活。
if %1 EQU 16 call :Licens16
cscript //nologo ospp.vbs /sethst:%KMSSER% > NUL
cscript //nologo ospp.vbs /act | find /i "successful" && (
echo.&echo ***** [OK] %2 激活成功 ***** & echo.) || (echo.&echo [FAIL]***** %2 激活失败 ***** & echo.)
)
)
cd /d "%~dp0"
goto :EOF
:GetOfficePath
echo.&echo 正在检测 %2 产品的安装路径...
set _Office%1Path=
set _Reg32=HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\%1.0\Common\InstallRoot
set _Reg64=HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Office\%1.0\Common\InstallRoot
reg query "%_Reg32%" /v "Path" > nul 2>&1 && FOR /F "tokens=2*" %%a IN ('reg query "%_Reg32%" /v "Path"') do SET "_OfficePath1=%%b"
reg query "%_Reg64%" /v "Path" > nul 2>&1 && FOR /F "tokens=2*" %%a IN ('reg query "%_Reg64%" /v "Path"') do SET "_OfficePath2=%%b"
if DEFINED _OfficePath1 (if exist "%_OfficePath1%ospp.vbs" set _Office%1Path=!_OfficePath1!)
if DEFINED _OfficePath2 (if exist "%_OfficePath2%ospp.vbs" set _Office%1Path=!_OfficePath2!)
set _OfficePath1=
set _OfficePath2=
if DEFINED _Office%1Path (echo 已发现 %2) else (echo 未发现 %2)
goto :EOF
:Licens16
for /f %%x in ('dir /b ..\root\Licenses16\project???vl_kms*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" >nul
for /f %%x in ('dir /b ..\root\Licenses16\proplusvl_kms*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" >nul
for /f %%x in ('dir /b ..\root\Licenses16\standardvl_kms*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" >nul
for /f %%x in ('dir /b ..\root\Licenses16\visio???vl_kms*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" >nul
for /f %%x in ('dir /b ..\root\Licenses16\project???vl_mak*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" >nul
for /f %%x in ('dir /b ..\root\Licenses16\proplusvl_mak*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" >nul
for /f %%x in ('dir /b ..\root\Licenses16\standardvl_mak*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" >nul
for /f %%x in ('dir /b ..\root\Licenses16\visio???vl_mak*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" >nul
cscript ospp.vbs /inpkey:NYH39-6GMXT-T39D4-WVXY2-D69YY >nul
cscript ospp.vbs /inpkey:7WHWN-4T7MP-G96JF-G33KR-W8GF4 >nul
cscript ospp.vbs /inpkey:RBWW7-NTJD4-FFK2C-TDJ7V-4C2QP >nul
cscript ospp.vbs /inpkey:XQNVK-8JYDB-WJ9W3-YJ8YR-WFG99 >nul
cscript ospp.vbs /inpkey:YG9NW-3K39V-2T3HJ-93F3Q-G83KT >nul
cscript ospp.vbs /inpkey:PD3PC-RHNGV-FXJ29-8JK7D-RJRJK >nul
goto :EOF
exit
:xptooff
cls
echo 【当前系统】WindowsXP 或 Win2003，不支持激活。
call :GetOfficePath 14 Office2010
call :ActOffice 14 Office2010
exit
:fail
cls
echo.
echo 无法连接到服务器，但kms服务可能可用。
echo 请选择想执行的操作。
echo ---------------------------------------------------
echo 【1】尝试重新连接服务器
echo 【2】预配置模式（不支持 Windows 7 x64 下激活32位 Office）
echo 【3】退出
echo ---------------------------------------------------
choice /c 123 /n /m "请输入选项前的序号: "
SET ERRORTEMP=%ERRORLEVEL%
IF %ERRORTEMP%==1 goto start
IF %ERRORTEMP%==2 goto starta
IF %ERRORTEMP%==3 goto exit
:oem7
cls
echo 当前系统不支持Windows激活。
echo 是否尝试激活Office？
echo ---------------------------------------------------
echo 【1】激活Office
echo 【2】退出
echo ---------------------------------------------------
choice /c 123 /n /m "请输入选项前的序号: "
SET ERRORTEMP=%ERRORLEVEL%
IF %ERRORTEMP%==1 goto office
IF %ERRORTEMP%==2 goto exit
exit
:exit
exit
:localkms
echo
exit
:finish
cls
echo.
echo ::::::::::::::::::::::::::::::::::::::::::::::::::::
echo :: ::
echo :: 福建农林大学 校园软件正版化 激活脚本 ::
echo :: ::
echo :: 感谢支持校园软件正版化 ::
echo :: ::
echo ::::::::::::::::::::::::::::::::::::::::::::::::::::
echo.
echo 提示：激活完成，10秒后自动退出。
echo 下次激活重新运行此脚本即可。
choice /t 10 /d y /n >nul
exit