批量复制、安装和设置电脑软件的批处理脚本程序源代码

批量复制、安装和设置电脑软件的批处理脚本程序源代码-2022年1月6日

https://www.autoahk.com/archives/39241

https://www.cnblogs.com/delphixx/p/15771095.html

下载链接:

https://www.123pan.com/s/vfk9-dpCn3

https://ds920.lanzoup.com/b01167g5c

密码: e6c3

我能力有限，无法使用路径中带有空格符的 %~dp0

如果有那位网友有完美的带空格路径解决方案请在本文最下面的评论区回复一下，谢谢。

D:\ProgramSetup\Setup.bat

1. rem 批量复制、安装和设置电脑软件的批处理脚本程序源代码-2022年1月6日
2. rem D:\ProgramSetup\Setup.bat
3. rem 可以在局域网共享文件夹、RaiDrive连接群晖WebDAV后映射的虚拟磁盘或者银灿IS903量产U盘USB-CD-ROM中运行此批处理脚本
4. rem 路径中不可以有空格
6. rem 1、复制批处理脚本所在文件夹中的文件到D:\Program
7. Start /Wait Robocopy.exe %~dp0 D:\Program\ /e /mt /r:3 /w:3 *.*
9. rem 2、全自动静默安装AutoHotkey自动化热键脚本编程环境
10. Start /Wait D:/Program/AutoHotkey/AutoHotkey_1.1.33.10_setup.exe /S /A32 /U32 /U64 /D=D:/Program/AutoHotkey/
12. rem 3、等待3秒钟
13. ping -n 3 127.0.0.1>nul 2>nul
15. rem 4、设置AHK类型的自动化热键脚本文件的右键菜单关联（新建、运行、编译、编辑）
16. Start D:/Program/AutoHotkey/RightMenuSetup.ahk
17. rem 作者: 甲壳虫<jdchenjian@gmail.com>
18. rem 修改作者： 兔子
20. rem 5、运行、显示、最大化并激活 Total Commander 10.00 程序窗口
21. Start D:\Program\TotalCMD\Run.ahk
23. rem 6、运行并最小化 Everything 程序窗口
24. Start /Min D:\Program\Everything\Everything.exe
26. rem 7、运行Maye（快速启动工具，用于管理和使用快捷方式、
27. rem 设置快捷键（TotalCMD设置为F8，Everything设置为F11））
28. Start D:\Program\Maye\Maye.exe
29. rem https://blog.arae.cc/post/25830.html
30. rem https://github.com/25H/Maya/releases/latest
31. rem https://www.lanzoux.com/b0bqwqjvg
33. exit

D:/Program/AutoHotkey/RightMenuSetup.ahk

1. /*
2. D:/Program/AutoHotkey/RightMenuSetup.ahk
3. AutoHotkey 版本: 1.x
4. 操作系统: WinXP
5. 作者: 甲壳虫<jdchenjian@gmail.com>
6. 博客: http://hi.baidu.com/jdchenjian
7. 脚本说明： 此工具用来修改 AutoHotkey 脚本的右键菜单关联，适用于 AutoHotkey 安装版、绿色版。
8. 脚本版本： 2009-01-21
10. 修改作者： 兔子
11. 更新说明：
12. 2010.01.09 之前某个时间，修改AHK路径、编辑器路径、编译器路径，默认全部在当前目录下寻找
13. 2010.01.09 去掉默认在新建菜单的勾
14. 2010.06.21 如果SCITE为默认编辑器，则复制个人配置文件“SciTEUser.properties”到%USERPROFILE%
15. 2010.06.25 修正因#NoEnv使%USERPROFILE%变量直接引用无效
16. 2016.04.18 删除“2010.06.21”的改动
17. */
19. ; --- 20190207 晓亮修改 ---
20. #NoEnv
21. SetWorkingDir, %A_ScriptDir%
23. ; 管理员权限运行
24. RunWith("admin")
27. #NoEnv
28. #SingleInstance, force
29. SendMode Input
30. SetWorkingDir %A_ScriptDir%
32. ; 版本(仅用于显示）
33. Script_Version=v1.0.3.2
35. ; AutoHotkey 原版的相关信息写在注册表HKCR主键中，
36. ; 尝试是当前用户否有权操作该键，如果无权操作HKCR键（受限用户），
37. ; 可通过操作注册表HKCU键来实现仅当前用户关联AHK脚本。
38. IsLimitedUser:=0
39. RegWrite, REG_SZ, HKCR, .test
40. if ErrorLevel
41. IsLimitedUser:=1
42. RegDelete, HKCR, .test
43. if ErrorLevel
44. IsLimitedUser:=1
46. if IsLimitedUser=0 ; 非受限用户操作HKCR键
47. {
48. RootKey=HKCR
49. Subkey=
50. }
51. else ; 受限用户操作HKCU键
52. {
53. RootKey=HKCU
54. Subkey=Software\Classes\ ; <-- 为简化后面的脚本，此子键须以“\”结尾
55. }
57. ; 检查是否存在AHK注册表项
58. RegRead, FileType, %RootKey%, %Subkey%.ahk
59. if FileType<>
60. {
61. RegRead, value, %RootKey%, %Subkey%%FileType%\Shell\Open\Command ;AHK路径
62. AHK_Path:=PathGetPath(value)
63. RegRead, value, %RootKey%, %Subkey%%FileType%\Shell\Edit\Command ;编辑器路径
64. Editor_Path:=PathGetPath(value)
65. RegRead, value, %RootKey%, %Subkey%%FileType%\Shell\Compile\Command ;编译器路径
66. Compiler_Path:=PathGetPath(value)
67. RegRead, Template_Name, %RootKey%, %Subkey%.ahk\ShellNew, FileName ;模板文件名
68. }
69. else
70. FileType=AutoHotkeyScript
72. if AHK_Path=
73. {
74. IfExist, %A_ScriptDir%\AutoHotkey.exe
75. AHK_path=%A_ScriptDir%\AutoHotkey.exe
76. }
78. if Editor_Path=
79. {
80. IfExist, %A_ScriptDir%\SciTE\SciTE.exe
81. Editor_Path=%A_ScriptDir%\SciTE\SciTE.exe
82. }
84. if Compiler_Path=
85. {
86. IfExist, %A_ScriptDir%\Compiler\Ahk2Exe.exe
87. Compiler_Path=%A_ScriptDir%\Compiler\Ahk2Exe.exe
88. }
90. if Template_Name=
91. Template_Name=Template.ahk
93. ; --- 20190207 晓亮修改 ---
94. ;设置AHK默认文件夹为 D:\Program\AutoHotkey
95. AHK_path=D:\Program\AutoHotkey\AutoHotkeyU32.exe
96. Editor_Path=D:\Program\AutoHotkey\SciTE\SciTE.exe
97. Compiler_Path=D:\Program\AutoHotkey\Compiler\Ahk2Exe.exe
99. Gui, Add, Tab, x10 y10 w480 h250 Choose1, 设置|说明
100. Gui, Tab, 1
101. Gui, Add, GroupBox, x20 y40 w460 h50 , “运行脚本”关联的 AutoHotkey
102. Gui, Add, Edit, x35 y60 w340 h20 vAHK_Path, %AHK_path%
103. Gui, Add, Button, x385 y60 w40 h20 gFind_AHK, 浏览
105. Gui, Add, GroupBox, x20 y100 w460 h50 , “编辑脚本”关联的编辑器
106. Gui, Add, Edit, x35 y120 w340 h20 vEditor_Path, %Editor_Path%
107. Gui, Add, Button, x385 y120 w40 h20 gChoose_Editor, 浏览
108. Gui, Add, Button, x430 y120 w40 h20 gDefault_Editor, 默认
110. Gui, Add, GroupBox, x20 y160 w460 h50 , “编译脚本”关联的编译器
111. Gui, Add, Edit, x35 y180 w340 h20 vCompiler_Path, %Compiler_Path%
112. Gui, Add, Button, x385 y180 w40 h20 gChoose_Compiler, 浏览
113. Gui, Add, Button, x430 y180 w40 h20 gDefault_Compiler, 默认
115. Gui, Add, Checkbox, x35 y230 w270 h20 gNew_Script vNew_Script, 右键“新建”菜单中增加“AutoHotkey 脚本”
116. Gui, Add, Button, x310 y230 w80 h20 vEdit_Template gEdit_Template, 编辑脚本模板
117. Gui, Add, Button, x400 y230 w80 h20 vDelete_Template gDelete_Template, 删除脚本模板
119. Gui, Tab, 2
120. Gui, Font, bold
121. Gui, Add, Text,, AutoHotkey 脚本关联工具 ScriptSetting %Script_Version%
122. Gui, Font
123. Gui, Font, CBlue underline
124. Gui, Add, Text, gWebsite, 作者：甲壳虫 <jdchenjian@gmail.com>`n`n博客：http://hi.baidu.com/jdchenjian
125. Gui, Font
126. Gui, Add, Text, w450, 此工具用来修改 AutoHotkey 脚本的右键菜单关联，适用于 AutoHotkey 安装版、绿色版。
127. Gui, Add, Text, w450, 您可以用它来修改默认脚本编辑器、编译器，修改默认的新建脚本模板。设置后，在右键菜单中添加“运行脚本”、“编辑脚本”、“编译脚本”和“新建 AutoHotkey 脚本”等选项。
128. Gui, Add, Text, w450, 要取消脚本的系统关联，请按“卸载”。注意：卸载后您将无法通过双击来运行脚本，也不能通过右键菜单来启动脚本编辑器...
130. Gui, Tab
131. Gui, Add, Button, x100 y270 w60 h20 default gInstall, 设置
132. Gui, Add, Button, x200 y270 w60 h20 gUninstall, 卸载
133. Gui, Add, Button, x300 y270 w60 h20 gCancel, 取消
135. Gui, Show, x250 y200 h300 w500 CEnter, ScriptSetting %Script_Version%
136. GuiControl, Disable, Edit_Template ; 使“编辑脚本模板”按钮无效
137. IfNotExist, %A_WinDir%\ShellNew\%Template_Name%
138. GuiControl, Disable, Delete_Template ; 使“删除脚本模板”按钮无效
140. ; 当鼠标指向链接时，指针变成手形
141. hCurs:=DllCall("LoadCursor","UInt",NULL,"Int",32649,"UInt") ;IDC_HAND
142. OnMessage(0x200,"WM_MOUSEMOVE")
144. ; --- 20190207 晓亮修改 ---
145. goto,Install
146. return
148. ; 改变鼠标指针为手形
149. WM_MOUSEMOVE(wParam,lParam)
150. {
151. global hCurs
152. MouseGetPos,,,,ctrl
153. if ctrl in static2
154. DllCall("SetCursor","UInt",hCurs)
155. return
156. }
157. return
159. GuiClose:
160. GuiEscape:
161. Cancel:
162. ExitApp
164. ; 查找 AutoHotkey 主程序
165. Find_AHK:
166. Gui +OwnDialogs
167. FileSelectFile, AHK_Path, 3, , 查找 AutoHotkey.exe, AutoHotkey.exe
168. if AHK_Path<>
169. GuiControl,,AHK_Path, %AHK_Path%
170. gosub Default_Compiler
171. return
173. ; 选择脚本编辑器
174. Choose_Editor:
175. Gui +OwnDialogs
176. FileSelectFile, Editor_Path, 3, , 选择脚本编辑器, 程序(*.exe)
177. if Editor_Path<>
178. GuiControl,,Editor_Path, %Editor_Path%
179. return
181. ; 默认脚本编辑器
182. Default_Editor:
183. IfExist, %A_ScriptDir%\SciTE\SciTE.exe
184. Editor_Path=%A_ScriptDir%\SciTE\SciTE.exe
185. else ifExist, %A_WinDir%\system32\notepad.exe
186. Editor_Path=%A_WinDir%\system32\notepad.exe
187. GuiControl,, Editor_Path, %Editor_Path%
188. return
190. ; 选择脚本编译器
191. Choose_Compiler:
192. Gui +OwnDialogs
193. FileSelectFile, Compiler_Path, 3, , 选择脚本编译器, 程序(*.exe)
194. if Compiler_Path<>
195. GuiControl,,Compiler_Path, %Compiler_Path%
196. return
198. ; 默认脚本编译器
199. Default_Compiler:
200. GuiControlGet, AHK_Path
201. SplitPath, AHK_Path, ,AHK_Dir
202. IfExist, %AHK_Dir%\Compiler\Ahk2Exe.exe
203. {
204. Compiler_Path=%AHK_Dir%\Compiler\Ahk2Exe.exe
205. GuiControl,, Compiler_Path, %Compiler_Path%
206. }
207. return
209. ; 设置
210. Install:
211. Gui, Submit
212. IfNotExist, %AHK_Path%
213. {
214. MsgBox, 16, ScriptSetting %Script_Version%, AutoHotkey 路径错误 ！
215. return
216. }
218. IfNotExist, %Editor_Path%
219. {
220. MsgBox, 16, ScriptSetting %Script_Version%, 编辑器路径错误 ！
221. return
222. }
224. IfNotExist, %Compiler_Path%
225. {
226. MsgBox, 16, ScriptSetting %Script_Version%, 编译器路径错误 ！
227. return
228. }
230. ; 写入注册表
231. RegWrite, REG_SZ, %RootKey%, %Subkey%.ahk,, %FileType%
232. if New_Script=1
233. {
234. RegWrite, REG_SZ, %RootKey%, %Subkey%.ahk\ShellNew, FileName, %Template_Name%
235. IfNotExist, %A_WinDir%\ShellNew\%Template_Name%
236. gosub Create_Template
237. }
238. else
239. {
240. ; --- 20190207 晓亮修改 ---
241. ; --- 此处不要删除右键新建ahk文件的菜单所以注释掉此代码
242. ;RegDelete, %RootKey%, %Subkey%.ahk\ShellNew
243. IfExist, %A_WinDir%\ShellNew\%Template_Name%
244. gosub Delete_Template
245. }
247. RegWrite, REG_SZ, %RootKey%, %Subkey%%FileType%,, AutoHotkey 脚本
248. RegWrite, REG_SZ, %RootKey%, %Subkey%%FileType%\DefaultIcon,, %AHK_Path%`,1
249. RegWrite, REG_SZ, %RootKey%, %Subkey%%FileType%\Shell,, Open
250. RegWrite, REG_SZ, %RootKey%, %Subkey%%FileType%\Shell\Open,, 运行脚本
251. RegWrite, REG_SZ, %RootKey%, %Subkey%%FileType%\Shell\Open\Command,, "%AHK_Path%" "`%1" `%*
252. RegWrite, REG_SZ, %RootKey%, %Subkey%%FileType%\Shell\Edit,, 编辑脚本
253. RegWrite, REG_SZ, %RootKey%, %Subkey%%FileType%\Shell\Edit\Command,, "%Editor_Path%" "`%1"
254. RegWrite, REG_SZ, %RootKey%, %Subkey%%FileType%\Shell\Compile,, 编译脚本
255. IfInString, Compiler_Path, Ahk2Exe.exe
256. RegWrite, REG_SZ, %RootKey%, %Subkey%%FileType%\Shell\Compile\Command,, "%Compiler_Path%" /in "`%1"
257. else
258. RegWrite, REG_SZ, %RootKey%, %Subkey%%FileType%\Shell\Compile\Command,, "%Compiler_Path%" "`%1"
260. /* 新版的scite不需要将“SciTEUser.properties”放在“USERPROFILE”目录下了
261. if Editor_Path=%A_ScriptDir%\SciTE\SciTE.exe
262. {
263. EnvGet,USERPROFILE,USERPROFILE
264. FileCopy,%A_ScriptDir%\SciTE\SciTEUser.properties,%USERPROFILE%\SciTEUser.properties,1
265. }
266. */
268. ;MsgBox, 64, ScriptSetting %Script_Version%, 设置完毕 ！
269. ExitApp
271. ; 卸载
272. Uninstall:
273. ; --- 20190207 晓亮修改 ---
274. ;MsgBox, 36, ScriptSetting %Script_Version%
275. ;, 注意：卸载后您将无法通过双击来运行脚本，也不能通过右键菜单来启动脚本编辑器...`n`n确定要取消 AHK 脚本的系统关联吗 ？
276. ;IfMsgBox, Yes
277. ;{
278. ;RegDelete, %RootKey%, %Subkey%.ahk
279. ;RegDelete, %RootKey%, %Subkey%%FileType%
280. ;gosub Delete_Template
281. ;ExitApp
282. ;}
283. return
285. ; 编辑脚本模板
286. Edit_Template:
287. GuiControlGet, Editor_Path
288. IfNotExist, %Editor_Path%
289. {
290. MsgBox, 64, ScriptSetting %Script_Version%, 脚本编辑器路径错误 ！
291. return
292. }
293. IfNotExist, %A_WinDir%\ShellNew\%Template_Name%
294. gosub Create_Template
295. Run, %Editor_Path% %A_WinDir%\ShellNew\%Template_Name%
296. return
298. ; 使编辑脚本模板按钮有效/无效
299. New_Script:
300. GuiControlGet, New_Script
301. if New_Script=0
302. GuiControl, Disable, Edit_Template
303. else
304. GuiControl, Enable, Edit_Template
305. return
307. ; 新建脚本模板
308. Create_Template:
309. GuiControlGet, AHK_Path
310. FileGetVersion, AHK_Ver, %AHK_Path%
312. FileAppend,
313. (
314. /*
315. AutoHotkey 版本: %AHK_Ver%
316. 操作系统: %A_OSVersion%
317. 作者: %A_UserName%
318. 网站: http://www.AutoHotkey.com
319. 脚本说明：
320. 脚本版本： v1.0
321. */
323. #NoEnv
324. SendMode Input
325. SetWorkingDir `%A_ScriptDir`%
327. ), %A_WinDir%\ShellNew\%Template_Name%
329. GuiControl, Enable, Delete_Template ; 使“删除脚本模板”按钮有效
330. return
332. ; 删除脚本模板
333. Delete_Template:
335. ; --- 20190207 晓亮修改 ---
336. ;MsgBox, 36, ScriptSetting %Script_Version%
337. ; , 要删除当前的 AHK 脚本模板吗 ？`n`n脚本模板被删除后，仍可通过本工具重建模板。
338. ;IfMsgBox, Yes
339. ;FileDelete, %A_WinDir%\ShellNew\%Template_Name%
340. ;GuiControl, Disable, Delete_Template ; 使“删除脚本模板”按钮无效
341. return
343. ; 打开网站
344. Website:
345. Run, http://hi.baidu.com/jdchenjian
346. return
348. ; 从注册表值字符串中提取路径
349. PathGetPath(pSourceCmd)
350. {
351. local Path, ArgsStartPos = 0
352. if (SubStr(pSourceCmd, 1, 1) = """")
353. Path := SubStr(pSourceCmd, 2, InStr(pSourceCmd, """", false, 2) - 2)
354. else
355. {
356. ArgsStartPos := InStr(pSourceCmd, " ")
357. if ArgsStartPos
358. Path := SubStr(pSourceCmd, 1, ArgsStartPos - 1)
359. else
360. Path = %pSourceCmd%
361. }
362. return Path
363. }
370. ; 强制自身进程以 管理员权限 或 普通权限 或 ANSI 或 U32 或 U64 版本运行。
371. ; 例1: runwith("admin","u32") 强制自身以 u32 + 管理员权限 运行。
372. ; 例2: runwith("","ansi") 强制自身以 ansi 版本运行（权限不变）。
373. ; 例3: runwith("normal") 强制自身以 普通权限 运行（版本不变）。
374. RunWith(RunAsAdmin:="Default", ANSI_U32_U64:="Default")
375. {
376. ; 格式化预期的模式
377. switch, RunAsAdmin
378. {
379. case "Normal","Standard","No","0": RunAsAdmin:=0
380. case "Admin","Yes","1": RunAsAdmin:=1
381. case "default": RunAsAdmin:=A_IsAdmin
382. default: RunAsAdmin:=A_IsAdmin
383. }
384. switch, ANSI_U32_U64
385. {
386. case "A32","ANSI","A": ANSI_U32_U64:="AutoHotkeyA32.exe"
387. case "U32","X32","32": ANSI_U32_U64:="AutoHotkeyU32.exe"
388. case "U64","X64","64": ANSI_U32_U64:="AutoHotkeyU64.exe"
389. case "default": ANSI_U32_U64:="AutoHotkey.exe"
390. default: ANSI_U32_U64:="AutoHotkey.exe"
391. }
392. ; 获取传递给 “.ahk” 的用户参数（不是 /restart 之类传递给 “.exe” 的开关参数）
393. for k, v in A_Args
394. {
395. if (RunAsAdmin=1)
396. {
397. ; 转义所有的引号与转义符号
398. v:=StrReplace(v, "\", "\\")
399. v:=StrReplace(v, """", "\""")
400. ; 无论参数中是否有空格，都给参数两边加上引号
401. ; Run 的内引号是 "
402. ScriptParameters .= (ScriptParameters="") ? """" v """" : A_Space """" v """"
403. }
404. else
405. {
406. ; 转义所有的引号与转义符号
407. ; 注意要转义两次 Run 和 RunAs.exe
408. v:=StrReplace(v, "\", "\\")
409. v:=StrReplace(v, """", "\""")
410. v:=StrReplace(v, "\", "\\")
411. v:=StrReplace(v, """", "\""")
412. ; 无论参数中是否有空格，都给参数两边加上引号
413. ; RunAs.exe 的内引号是 \"
414. ScriptParameters .= (ScriptParameters="") ? "\""" v "\""" : A_Space "\""" v "\"""
415. }
416. }
418. ; 判断当前 exe 是什么版本
419. if (!A_IsUnicode)
420. RunningEXE:="AutoHotkeyA32.exe"
421. else if (A_PtrSize=4)
422. RunningEXE:="AutoHotkeyU32.exe"
423. else if (A_PtrSize=8)
424. RunningEXE:="AutoHotkeyU64.exe"
426. ; 运行模式与预期相同，则直接返回。 ANSI_U32_U64="AutoHotkey.exe" 代表不对 ahk 版本做要求。
427. if (A_IsAdmin=RunAsAdmin and (ANSI_U32_U64="AutoHotkey.exe" or ANSI_U32_U64=RunningEXE))
428. return
429. ; 如果当前已经是使用 /restart 参数重启的进程，则报错避免反复重启导致死循环。
430. else if (RegExMatch(DllCall("GetCommandLine", "str"), " /restart(?!\S)"))
431. {
432. 预期权限:=(RunAsAdmin=1) ? "管理员权限" : "普通权限"
433. 当前权限:=(A_IsAdmin=1) ? "管理员权限" : "普通权限"
434. ErrorMessage=
435. (LTrim
436. 预期使用: %ANSI_U32_U64%
437. 当前使用: %RunningEXE%
439. 预期权限: %预期权限%
440. 当前权限: %当前权限%
442. 程序即将退出。
443. )
444. MsgBox 0x40030, 运行状态与预期不一致, %ErrorMessage%
445. ExitApp
446. }
447. else
448. {
449. ; 获取 AutoHotkey.exe 的路径
450. SplitPath, A_AhkPath, , Dir
451. if (RunAsAdmin=0)
452. {
453. ; 强制普通权限运行
454. switch, A_IsCompiled
455. {
456. ; %A_ScriptFullPath% 必须加引号，否则含空格的路径会被截断。%ScriptParameters% 必须不加引号，因为构造时已经加了。
457. ; 工作目录不用单独指定，默认使用 A_WorkingDir 。
458. case, "1": Run, RunAs.exe /trustlevel:0x20000 "\"%A_ScriptFullPath%\" /restart %ScriptParameters%",, Hide
459. default: Run, RunAs.exe /trustlevel:0x20000 "\"%Dir%\%ANSI_U32_U64%\" /restart \"%A_ScriptFullPath%\" %ScriptParameters%",, Hide
460. }
461. }
462. else
463. {
464. ; 强制管理员权限运行
465. switch, A_IsCompiled
466. {
467. ; %A_ScriptFullPath% 必须加引号，否则含空格的路径会被截断。%ScriptParameters% 必须不加引号，因为构造时已经加了。
468. ; 工作目录不用单独指定，默认使用 A_WorkingDir 。
469. case, "1": Run, *RunAs "%A_ScriptFullPath%" /restart %ScriptParameters%
470. default: Run, *RunAs "%Dir%\%ANSI_U32_U64%" /restart "%A_ScriptFullPath%" %ScriptParameters%
471. }
472. }
473. ExitApp
474. }
475. }

D:\Program\TotalCMD\Run.ahk

1. ;
2. ;/*
3. ; D:\Program\TotalCMD\Run.ahk
4. ;===========================================
5. ; 设置激活或者隐藏 Total Commander 10.00 主窗口的快捷键为 F8
6. ; https://www.autoahk.com/archives/37780
7. ; https://www.cnblogs.com/delphixx/p/15718194.html
8. ;
9. ; 脚本作者 : ds920
10. ; 最新版本 : 1.1
11. ; 更新时间 : 2021年12月22日
12. ;
13. ; 用法: (需要最新版本 AHK v1.1.31+)
14. ; 1. 到飞扬时空的新浪博客下载并安装TotalCommander中文增强版到文件夹D:/TotalCMD
15. ; 2. 将本脚本保存为"RunTC.ahk"并复制到D:/TotalCMD文件夹中
16. ; 3. 使用Maye来设置RunTC.ahk的热键为 F8
17. ;
18. ; 升级更新历史:
19. ; 版本1.0 2021年12月22日 新建 创建此AutoHotkey脚本并测试通过F8热键功能
20. ; 版本1.1 2021年12月22日 修改 调整删除 SetTimer 定时器时判断TC主窗口是否激活的顺序
21. ; 把基于窗口类的激活判断语句"if(WinActive("ahk_class" TTOTAL_CMD))"放在最外层
22. ; 防止有相同标题的窗口激活时（例如：相同标题的浏览器等等）窗口激活误判
23. ;
24. ; 由于AutoHotkey的Hotkey语句设置的热键必需在任务栏或者桌面进程激活时才有效,
25. ; 所以请使用Maye来设置Total Commander的热键 F8
26. ; https://blog.arae.cc/post/25830.html
27. ; https://github.com/25H/Maya/releases/
28. ;
29. ; 可以用 Total Commander 访问用RaiDrive异地远程连接群晖WebDAV文件服务并映射成的本地虚拟磁盘盘符 Z: 分区
30. ; 可以用 Total Commander 访问用NetDrive2异地远程连接群晖SFTP文件服务并映射成的本地虚拟磁盘盘符 Y: 分区
31. ; 可以用支持 Total Commander的WebDAV文件服务访问插件异地远程连接群晖WebDAV文件服务中的网络共享文件夹
32. ; 可以用KeePass或者KeePass2Android来连接坚果云或者
33. ; 群晖NAS的WebDAV文件服务来管理网址、用户名、账号、密码、口令、暗号、纪念日等个人敏感隐私信息和数据
34. ; 可以用FileZilla Pro 专业版软件异地远程连接群晖的WebDAV文件服务并
35. ; 批量上传文件夹到群晖的 RAID 1 镜像存储池中的共享文件夹之中
36. ; 可以用腾讯文档的电脑客户端来新建在线文档和在线表格来进行办公文档和办公表格的分享和协作
37. ; 可以用Bulk Rename Utility 2.7.1.2来批量重命名或者编号群晖WebDAV文件服务中的共享文件夹中的大量文件
38. ; 可以用Double Killer Pro V 2.1.0.104来批量删除群晖WebDAV文件服务中的共享文件夹中的重复文件
39. ; 可以安装并升级更新"火绒安全软件"来防杀电脑病毒木马恶意软件并拦截垃圾广告弹出的骚扰窗口
40. ; 可以用SGI备份还原映像总裁镜像总裁一键还原工具软件来备份保护Windows操作系统和
41. ; 电脑中应用程序软件和设置到GHO系统镜像文件
42. ; SGI备份还原映像总裁镜像总裁一键还原工具软件官方网址是 https://www.sysceo.com/Software-softwarei-id-253.html
43. ; 以便今后用杏雨梨云启动维护系统可启动固态U盘来恢复电脑系统应用程序软件GHO系统镜像文件到电脑的系统分区C盘
44. ; 可以用Shadow Defender 影子卫士来保护Windows操作系统和电脑中应用程序软件的设置,
45. ; 防止电脑软件设置被未授权的用户和程序非法更改和破坏
46. ; 如果无法安装 Shadow Defender 影子卫士时可以用"DeepFreeze冰点还原精灵"或者
47. ; "PowerShadow影子系统"或者"Returnil Virtual System(RVS)"来代替影子卫士
48. ;
49. ;===========================================
50. ;*/
52. #SingleInstance,Ignore
53. loop,5
54. {
55. DetectHiddenWindows,On
56. Sleep,5
57. IfWinExist,QQ595076941_AutoAHKRun
58. ExitApp
59. }
60. Gui, Show, Hide,QQ595076941_AutoAHKRun
61. #Persistent
62. ; #NoTrayIcon
63. DetectHiddenWindows,On
64. SetTitleMatchMode,2
65. ; 设置激活或者隐藏 Total Commander 10.00 主窗口的快捷键为 F8
66. ; Hotkey,F8,ActivateOrHideWindowHotkey
67. ActivateOrHideWindowHotkey()
68. return
69. ; ——————————————————–
70. ActivateOrHideWindowHotkey()
71. {
72. ; MsgBox,PressedHotkey检测到已经按下快捷键
73. Sleep,5
74. IfWinActive,ahk_class TTOTAL_CMD
75. {
76. Sleep,5
77. if(WinActive(ahk_class TTOTAL_CMD))
78. {
79. Sleep,5
80. WinGetClass, MyClass, A
81. IfInString,MyClass,TTOTAL_CMD
82. {
83. Sleep,5
84. IfWinActive,Total Commander
85. {
86. TCTitle:="Total Commander"
87. Sleep,5
88. WinGetActiveTitle,Title
89. IfInString,Title,%TCTitle%
90. {
91. ; MsgBox,MinimizeWindow最小化指定窗口
92. WinMinimize,Total Commander ahk_class TTOTAL_CMD
93. Sleep,5
94. ExitApp
95. }
96. }
97. }
98. }
99. }
100. else
101. {
102. ; MsgBox,ActivateWindow显示并且最大化并且激活指定窗口
103. SetTimer,ActivateWindowTimer,20
104. }
105. }
106. ; ——————————————————–
107. ;根据窗口类名显示并激活Total Commander窗口
108. ActivateWindowTimer()
109. {
110. ; 1、如果程序没有运行则运行程序,这里我把可执行文件名改成了TotalCMD-v10.exe
111. Process,Exist,TotalCMD-v10.exe
112. if (%ErrorLevel%=0)
113. {
114. IfExist,D:/Program/TotalCMD/TotalCMD.exe
115. {
116. Run,D:/Program/TotalCMD/TotalCMD.exe
117. }
118. else
119. {
120. MsgBox,找不到文件 D:/Program/TotalCMD/TotalCMD.exe
121. return
122. }
123. }
124. ; 2、显示并激活（切换到）指定窗口
125. WinShow,Total Commander ahk_class TTOTAL_CMD
126. WinMove,Total Commander ahk_class TTOTAL_CMD,,0,0,A_ScreenWidth,A_ScreenHeight
127. WinActivate,Total Commander ahk_class TTOTAL_CMD
128. WinMaximize,Total Commander ahk_class TTOTAL_CMD
129. Sleep,5
130. DetectHiddenWindows,On
131. SetTitleMatchMode,2
132. WinGet, WinID, ID,Total Commander ahk_class TTOTAL_CMD
133. DllCall("SwitchToThisWindow", "UInt", WinID, "UInt", 1)
134. ; 3、检查指定窗口是否激活成功，
135. ; 假如激活成功则退出Timer计时器循环执行，
136. ; 如果激活失败则继续尝试激活指定窗口
138. Sleep,5
139. IfWinActive,ahk_class TTOTAL_CMD
140. {
141. Sleep,5
142. if(WinActive(ahk_class TTOTAL_CMD))
143. {
144. Sleep,5
145. WinGetClass, MyClass, A
146. IfInString,MyClass,TTOTAL_CMD
147. {
148. Sleep,5
149. IfWinActive,Total Commander
150. {
151. TCTitle:="Total Commander"
152. Sleep,5
153. WinGetActiveTitle,Title
154. IfInString,Title,%TCTitle%
155. {
156. SetTimer,ActivateWindowTimer,Delete
157. Sleep,5
158. ExitApp
159. }
160. }
161. }
162. }
163. }
164. }
166. ;================= The End =================
168. ;
170. /*
172. ;================= 根据窗口类名激活或者隐藏窗口的AutoHotkey函数 =================
173. ; 请使用 窗口信息工具 AHKInfo 1.3.5 获取窗口的类名
174. ;根据窗口类名激活或者隐藏窗口
175. ActivateOrHideWindow(VarExeFileName:="TotalCMD-v10″,VarWinClassName:="TTOTAL_CMD")
176. {
177. ; 1、如果程序没有运行则运行程序
178. Process,Exist,%VarExeFileName%.exe
179. if (%ErrorLevel%=0)
180. {
181. IfExist,%VarExeFileName%.exe
182. {
183. Run,%VarExeFileName%.exe
184. return
185. }
186. else
187. {
188. MsgBox,找不到文件 %VarExeFileName%.exe
189. return
190. }
191. }
192. ; 2、如果窗口未置顶则显示并激活（切换到）指定窗口
193. IfWinNotActive,ahk_class %VarWinClassName%
194. {
195. loop,2
196. {
197. Sleep,50
198. WinShow,ahk_class %VarWinClassName%
199. ;~ WinMaximize,ahk_class %VarWinClassName%
200. Sleep,50
201. WinGet, WinID, ID,ahk_class %VarWinClassName%
202. Sleep,50
203. DllCall("SwitchToThisWindow", "UInt", WinID, "UInt", 1)
204. }
205. return
206. }
207. ; 3、如果窗口已经显示并置顶则隐藏窗口
208. ;~ WinMinimize,ahk_class %VarWinClassName%
209. WinHide,ahk_class %VarWinClassName%
210. }
212. */
213. ;

D:\ProgramSetup\Tree.txt

1. 卷 软件 的文件夹 PATH 列表
2. 卷序列号为 ILOV-EYOU
3. D:.
4. ├─AutoHotkey
5. │ ├─AHK电子书
6. │ ├─Compiler
7. │ ├─Icon
8. │ └─SciTE
9. │ ├─extensions
10. │ ├─locales
11. │ ├─toolbar
12. │ │ └─Lib
13. │ ├─tools
14. │ │ ├─AHK 正则终结者
15. │ │ │ └─Lib
16. │ │ ├─AHK 爬虫终结者
17. │ │ │ ├─jsoneditor-5.15.0
18. │ │ │ │ └─dist
19. │ │ │ │ └─img
20. │ │ │ └─Lib
21. │ │ ├─AHK 脚本关联工具
22. │ │ ├─AHK-Rare
23. │ │ │ ├─assets
24. │ │ │ ├─lib
25. │ │ │ │ └─Highlighters
26. │ │ │ └─tools
27. │ │ ├─ahkinfo
28. │ │ ├─AhkSpy
29. │ │ ├─AHK_Window_Info
30. │ │ ├─Au3Record
31. │ │ ├─Auto-GUI
32. │ │ │ ├─Constantine
33. │ │ │ ├─Icons
34. │ │ │ ├─Include
35. │ │ │ ├─Lib
36. │ │ │ └─Settings
37. │ │ ├─Auto-Syntax-Tidy
38. │ │ │ └─Syntax
39. │ │ ├─AutoItMacroGenerator
40. │ │ ├─AutoScriptWriter
41. │ │ ├─CLISD
42. │ │ ├─ColorFinder
43. │ │ │ └─Lib
44. │ │ ├─eXeScope
45. │ │ ├─FindText
46. │ │ ├─GenDocs
47. │ │ │ ├─Demo
48. │ │ │ └─Lib
49. │ │ ├─iCodeRepository3
50. │ │ │ ├─Clipboard_monitor
51. │ │ │ ├─help
52. │ │ │ │ └─pictures
53. │ │ │ └─爱码源码仓库
54. │ │ │ ├─AutoHotkey
55. │ │ │ └─AutoHotkey2
56. │ │ ├─Lib
57. │ │ │ └─DebugVars
58. │ │ ├─MacroCreator
59. │ │ │ ├─Documentation
60. │ │ │ │ ├─Lib
61. │ │ │ │ └─MacroCreator_Help-doc
62. │ │ │ │ ├─Examples
63. │ │ │ │ └─Images
64. │ │ │ ├─Lang
65. │ │ │ ├─LIB
66. │ │ │ └─Resources
67. │ │ │ └─Icons
68. │ │ ├─MagicBox
69. │ │ │ ├─Examples
70. │ │ │ ├─Functions
71. │ │ │ ├─Icons
72. │ │ │ ├─Lib
73. │ │ │ └─Settings
74. │ │ ├─SciTE交互示例
75. │ │ ├─SmartGUI
76. │ │ ├─Spy++
77. │ │ ├─TestSuite
78. │ │ ├─ViewWizard
79. │ │ ├─WindowSpy
80. │ │ ├─智能操作
81. │ │ └─自动更新
82. │ ├─user
83. │ │ ├─Extensions
84. │ │ ├─Macros
85. │ │ ├─Scriptlets
86. │ │ ├─Settings
87. │ │ └─Styles
88. │ ├─中文帮助
89. │ └─技巧
90. ├─Everything
91. ├─FileZillaPro
92. │ ├─Data
93. │ ├─docs
94. │ ├─filezillacfg
95. │ ├─KeePass
96. │ │ ├─Languages
97. │ │ ├─Plugins
98. │ │ └─XSL
99. │ ├─locales
100. │ │ ├─an
101. │ │ ├─ar
102. │ │ ├─az
103. │ │ ├─bg_BG
104. │ │ ├─ca
105. │ │ ├─ca_ES@valencia
106. │ │ ├─co
107. │ │ ├─cs_CZ
108. │ │ ├─cy
109. │ │ ├─da
110. │ │ ├─de
111. │ │ ├─el
112. │ │ ├─es
113. │ │ ├─et
114. │ │ ├─eu
115. │ │ ├─fa_IR
116. │ │ ├─fi_FI
117. │ │ ├─fr
118. │ │ ├─gl_ES
119. │ │ ├─he_IL
120. │ │ ├─hr
121. │ │ ├─hu_HU
122. │ │ ├─hy
123. │ │ ├─id_ID
124. │ │ ├─is
125. │ │ ├─it
126. │ │ ├─ja_JP
127. │ │ ├─ka
128. │ │ ├─kab
129. │ │ ├─km_KH
130. │ │ ├─ko_KR
131. │ │ ├─ku
132. │ │ ├─ky
133. │ │ ├─lo_LA
134. │ │ ├─lt_LT
135. │ │ ├─lv_LV
136. │ │ ├─mk_MK
137. │ │ ├─nb_NO
138. │ │ ├─ne
139. │ │ ├─nl
140. │ │ ├─nn_NO
141. │ │ ├─oc
142. │ │ ├─pl_PL
143. │ │ ├─pt_BR
144. │ │ ├─pt_PT
145. │ │ ├─ro_RO
146. │ │ ├─ru
147. │ │ ├─sk_SK
148. │ │ ├─sl_SI
149. │ │ ├─sr
150. │ │ ├─sv
151. │ │ ├─ta
152. │ │ ├─th_TH
153. │ │ ├─tr
154. │ │ ├─uk_UA
155. │ │ ├─vi_VN
156. │ │ ├─zh_CN
157. │ │ └─zh_TW
158. │ ├─resources
159. │ │ ├─16x16
160. │ │ ├─20x20
161. │ │ ├─24x24
162. │ │ ├─32x32
163. │ │ ├─480x480
164. │ │ ├─48x48
165. │ │ ├─blukis
166. │ │ │ ├─16x16
167. │ │ │ ├─32x32
168. │ │ │ └─48x48
169. │ │ ├─classic
170. │ │ │ └─16x16
171. │ │ ├─cyril
172. │ │ │ └─16x16
173. │ │ ├─default
174. │ │ │ └─480x480
175. │ │ ├─flatzilla
176. │ │ │ ├─16x16
177. │ │ │ ├─24x24
178. │ │ │ ├─32x32
179. │ │ │ └─48x48
180. │ │ ├─lone
181. │ │ │ ├─16x16
182. │ │ │ ├─32x32
183. │ │ │ └─48x48
184. │ │ ├─minimal
185. │ │ │ ├─16x16
186. │ │ │ └─32x32
187. │ │ ├─opencrystal
188. │ │ │ ├─16x16
189. │ │ │ ├─20x20
190. │ │ │ ├─24x24
191. │ │ │ ├─32x32
192. │ │ │ └─48x48
193. │ │ ├─sun
194. │ │ │ └─48x48
195. │ │ ├─tango
196. │ │ │ ├─16x16
197. │ │ │ ├─32x32
198. │ │ │ └─48x48
199. │ │ └─xrc
200. │ └─手动复制备份的配置和数据文件
201. │ ├─7z1900
202. │ ├─7zSfxTool
203. │ │ ├─Plugin
204. │ │ └─SFX 模块
205. │ └─TrafficMonitor显示电脑网速监控悬浮窗
206. │ ├─Logo
207. │ └─skins
208. │ ├─0默认皮肤
209. │ ├─皮肤01
210. │ ├─皮肤02
211. │ ├─皮肤03
212. │ ├─皮肤04
213. │ ├─皮肤05
214. │ ├─皮肤06
215. │ ├─皮肤07
216. │ ├─皮肤08
217. │ ├─皮肤09
218. │ ├─皮肤10
219. │ ├─皮肤11
220. │ └─皮肤12
221. ├─FolderSizes
222. ├─FSCapture
223. │ └─Languages
224. ├─Hash
225. ├─IObitUnlocker
226. ├─JexChan
227. ├─KeePass
228. │ ├─Languages
229. │ ├─Plugins
230. │ └─XSL
231. ├─Maye
232. │ ├─bak
233. │ ├─cache
234. │ │ ├─icon
235. │ │ └─search
236. │ └─skin
237. ├─PowerOff
238. ├─Robocopy
239. ├─SGI
240. ├─TotalCMD
241. │ ├─Cache
242. │ ├─Filter32
243. │ ├─Language
244. │ └─User
245. ├─TrafficMonitor
246. │ ├─Logo
247. │ └─skins
248. │ ├─0默认皮肤
249. │ ├─皮肤01
250. │ ├─皮肤02
251. │ ├─皮肤03
252. │ ├─皮肤04
253. │ ├─皮肤05
254. │ ├─皮肤06
255. │ ├─皮肤07
256. │ ├─皮肤08
257. │ ├─皮肤09
258. │ ├─皮肤10
259. │ ├─皮肤11
260. │ └─皮肤12
261. ├─WizTree
262. │ ├─locale
263. │ │ ├─bg
264. │ │ │ └─LC_MESSAGES
265. │ │ ├─da
266. │ │ │ └─LC_MESSAGES
267. │ │ ├─de
268. │ │ │ └─LC_MESSAGES
269. │ │ ├─el
270. │ │ │ └─LC_MESSAGES
271. │ │ ├─en
272. │ │ │ └─LC_MESSAGES
273. │ │ ├─es
274. │ │ │ └─LC_MESSAGES
275. │ │ ├─fr
276. │ │ │ └─LC_MESSAGES
277. │ │ ├─hu
278. │ │ │ └─LC_MESSAGES
279. │ │ ├─it
280. │ │ │ └─LC_MESSAGES
281. │ │ ├─ja
282. │ │ │ └─LC_MESSAGES
283. │ │ ├─ko
284. │ │ │ └─LC_MESSAGES
285. │ │ ├─nl
286. │ │ │ └─LC_MESSAGES
287. │ │ ├─no
288. │ │ │ └─LC_MESSAGES
289. │ │ ├─pl
290. │ │ │ └─LC_MESSAGES
291. │ │ ├─pt_BR
292. │ │ │ └─LC_MESSAGES
293. │ │ ├─ru
294. │ │ │ └─LC_MESSAGES
295. │ │ ├─sk
296. │ │ │ └─LC_MESSAGES
297. │ │ ├─sr
298. │ │ │ └─LC_MESSAGES
299. │ │ ├─sv
300. │ │ │ └─LC_MESSAGES
301. │ │ ├─tr
302. │ │ │ └─LC_MESSAGES
303. │ │ ├─uk
304. │ │ │ └─LC_MESSAGES
305. │ │ ├─zh_CHS
306. │ │ │ └─LC_MESSAGES
307. │ │ └─zh_CHT
308. │ │ └─LC_MESSAGES
309. │ └─log
310. ├─_Fix
311. │ └─局域网共享
312. │ └─备用版本-一键设置局域网共享
313. ├─_Setup
314. │ ├─DeepFreeze
315. │ │ ├─360文件解锁
316. │ │ │ ├─Config
317. │ │ │ │ └─defaultskin
318. │ │ │ ├─MINI
319. │ │ │ └─Utils
320. │ │ └─LockHunter32
321. │ ├─FastCopy
322. │ │ └─doc
323. │ ├─NetDrive2
324. │ ├─ShadowDefender
325. │ └─WebDrive
326. └─图压