批量復制、安裝和設置電腦軟件的批處理腳本程序源代碼-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 作者: 甲殼蟲<[e-mail]>
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. 作者: 甲殼蟲<[e-mail]>
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, 作者：甲殼蟲 <[e-mail]>`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. └─圖壓