REM  D:\APP\AutoRun\Program\AutoRun.bat 开机自动启动批处理脚本文件 2025年11月17日

1. REM D:\APP\AutoRun\Program\AutoRun.bat 开机自动启动批处理脚本文件
2. @echo off
3. cd /d D:\APP\AutoRun\Program\
4. start D:\APP\AutoRun\Program\AutoHotkeyA32.exe D:\APP\AutoRun\Program\AutoRun.ahk
5. exit

1. ; D:\APP\AutoRun\Program\AutoRun.ahk 开机自动启动AHK脚本文件
2. ; 开机自动启动项
4. ; ======================================================================
5. ; 1. 检测是否已拥有管理员权限
6. if !A_IsAdmin {
7. ; 2. 无权限时，以管理员身份重启脚本
8. MsgBox, 本脚本需要管理员权限才能运行，即将请求授权...
9. Run *RunAs "%A_ScriptFullPath%" ; *RunAs 是提权关键参数
10. ExitApp ; 退出当前非管理员进程
11. }
12. ; ======================================================================
13. ; 添加快捷方式到所有用户开始菜单程序启动文件夹,设置开机自动运行此脚本
14. ; ==============================
15. ; 仅需修改这2个参数！
16. ; ==============================
17. TargetProgram := "D:\APP\AutoRun\Program\AutoRun.bat" ; 要自启的程序完整路径
18. ShortcutName := "AutoRun-1.lnk" ; 快捷方式名称（必须带.lnk后缀）
20. ; ==============================
21. ; 可选配置（按需修改）
22. ; ==============================
23. AllUsers := true ; false=仅当前用户（无需管理员），true=所有用户（需管理员）
25. ; ==============================
26. ; 核心执行代码（无需修改）
27. ; ==============================
28. ; 获取启动文件夹路径
29. StartupFolder := AllUsers ? A_ProgramData "\Microsoft\Windows\Start Menu\Programs\Startup" : A_AppData "\Microsoft\Windows\Start Menu\Programs\Startup"
30. ShortcutPath := StartupFolder "\" ShortcutName
32. ; 验证目标程序是否存在
33. if !FileExist(TargetProgram) {
34. MsgBox, 错误：找不到程序！`n路径：%TargetProgram%, 0x10 ; 0x10=错误图标
35. ExitApp
36. }
38. ; 所有用户模式需要管理员权限，自动提权
39. if AllUsers && !A_IsAdmin {
40. Run *RunAs "%A_ScriptFullPath%" ; 以管理员身份重启脚本
41. ExitApp
42. }
44. ; 创建快捷方式（通过WScript.Shell COM对象）
45. try {
46. Shell := ComObjCreate("WScript.Shell")
47. Link := Shell.CreateShortcut(ShortcutPath)
48. Link.TargetPath := TargetProgram ; 目标程序路径
49. Link.WorkingDirectory := FileGetDirectory(TargetProgram) ; 工作目录（程序所在文件夹）
50. Link.Save() ; 保存快捷方式
51. ; MsgBox, 快捷方式创建成功！`n位置：%StartupFolder%`n名称：%ShortcutName%, 0x40 ; 0x40=信息图标
52. } catch e {
53. ; MsgBox, 创建失败！`n错误：%Message%, 0x10
54. }
56. ; ======================================================================
57. ; 添加快捷方式到当前用户开始菜单程序启动文件夹,设置开机自动运行此脚本
58. ; ==============================
59. ; 仅需修改这2个参数！
60. ; ==============================
61. TargetProgram := "D:\APP\AutoRun\Program\AutoRun.bat" ; 要自启的程序完整路径
62. ShortcutName := "AutoRun-2.lnk" ; 快捷方式名称（必须带.lnk后缀）
64. ; ==============================
65. ; 可选配置（按需修改）
66. ; ==============================
67. AllUsers := false ; false=仅当前用户（无需管理员），true=所有用户（需管理员）
69. ; ==============================
70. ; 核心执行代码（无需修改）
71. ; ==============================
72. ; 获取启动文件夹路径
73. StartupFolder := AllUsers ? A_ProgramData "\Microsoft\Windows\Start Menu\Programs\Startup" : A_AppData "\Microsoft\Windows\Start Menu\Programs\Startup"
74. ShortcutPath := StartupFolder "\" ShortcutName
76. ; 验证目标程序是否存在
77. if !FileExist(TargetProgram) {
78. MsgBox, 错误：找不到程序！`n路径：%TargetProgram%, 0x10 ; 0x10=错误图标
79. ExitApp
80. }
82. ; 所有用户模式需要管理员权限，自动提权
83. if AllUsers && !A_IsAdmin {
84. Run *RunAs "%A_ScriptFullPath%" ; 以管理员身份重启脚本
85. ExitApp
86. }
88. ; 创建快捷方式（通过WScript.Shell COM对象）
89. try {
90. Shell := ComObjCreate("WScript.Shell")
91. Link := Shell.CreateShortcut(ShortcutPath)
92. Link.TargetPath := TargetProgram ; 目标程序路径
93. Link.WorkingDirectory := FileGetDirectory(TargetProgram) ; 工作目录（程序所在文件夹）
94. Link.Save() ; 保存快捷方式
95. ; MsgBox, 快捷方式创建成功！`n位置：%StartupFolder%`n名称：%ShortcutName%, 0x40 ; 0x40=信息图标
96. } catch e {
97. ; MsgBox, 创建失败！`n错误：%Message%, 0x10
98. }
99. ; 辅助函数：获取文件所在目录
100. FileGetDirectory(Path) {
101. SplitPath, Path, , OutDir
102. return OutDir
103. }
104. ; ======================================================================
105. ; 添加注册表项目,设置开机自动运行此脚本
106. Run,Reg add HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run /v AutoRun-3 /t REG_SZ /d "D:\APP\AutoRun\Program\AutoRun.bat" /f
107. Run,Reg add HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Run /v AutoRun-4 /t REG_SZ /d "D:\APP\AutoRun\Program\AutoRun.bat" /f
108. Run,regedit.exe /s "D:\APP\AutoRun\Program\AutoRun.Reg"
109. ; ======================================================================
110. ; 设置互斥体,阻止脚本重复运行
111. Single(flag) { ;,返回1为重复,返回0为第一个运行
112. DllCall("CreateMutex", "Ptr",0, "int",0, "str", "Ahk_Single_" flag)
113. return A_LastError=0xB7 ? true : false
114. }
115. #SingleInstance,Off ;关闭自带互斥功能
116. if (Single("276193850")) { ;独一无二的字符串用于识别脚本,或者称为指纹?
117. ; MsgBox,16,提示,程序已启动!`n请勿重复运行
118. ExitApp
119. }
120. ; ======================================================================
121. ; 检查是否存在开机自动启动项配置文本文件，如果没有就创建一个示范配置文本文件。
122. IniPath := A_ScriptDir "\..\开机自动启动项.txt"
123. IfNotExist,% IniPath
124. {
125. ; 配置文件内容
126. configContent =
127. (
128. ; D:\APP\AutoRun\开机自动启动项.txt 配置文件
129. D:\APP\TotalCMD\_SetHotkey-TCEV.exe
130. Notepad.exe
131. Calc.exe
132. D:\APP\Maye-Lite\Maye-Lite.exe
133. D:\APP\TotalCMD\TotalCMD.exe
134. D:\APP\FastCopy\FastCopy.bat
135. D:\APP\Coodesker\Coodesker.exe
136. D:\APP\QQ\QQ.exe
137. D:\APP\Dexpot\Dexpot.exe
138. C:\Program Files\zspace\极空间.exe
139. C:\Program Files (x86)\滴答清单\TickTick.exe
140. C:\Program Files\ynote-desktop\有道云笔记.exe
141. C:\app\GoodSync\x64\GoodSync2Go.exe
142. )
143. ; 写入配置文件
144. ; 为了支持中文文件夹目录,在文件末尾处追加(写入)
145. ; 文本(如果有必要, 首先创建文件).指定编码或编码页,
146. ; 例如 UTF-8, UTF-16 或 CP936.如果文件包含 UTF-8 或
147. ; UTF-16 字节顺序标记(BOM), 则忽略此参数和默认编码.
148. FileAppend, % configContent,% IniPath, UTF-8
149. }
150. ; ======================================================================
151. ; 逐行读取文本文件的内容, 每次读取一行并运行读到的程序。
152. loop, Read,% IniPath
153. {
154. loop, Parse, A_LoopReadLine, % A_Tab
155. {
156. ; MsgBox, Field number %A_Index% is %A_LoopField%.
157. IfExist,% A_LoopField
158. {
159. Run,% A_LoopField
160. }
161. }
162. }
163. ; ======================================================================
164. ; 等待30秒钟，让互斥体存在30秒钟，阻止另外的脚本重复运行
165. Sleep,30000
166. ExitApp

1. Windows Registry Editor Version 5.00
3. [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run]
4. "AutoRun-5"="\"D:\\APP\\AutoRun\\Program\\AutoRun.bat\" "
6. [HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Run]
7. "AutoRun-6"="\"D:\\APP\\AutoRun\\Program\\AutoRun.bat\" "

1. REM D:\APP\AutoRun\Program\打开当前用户启动文件夹.bat
2. start "" "shell:startup"
3. exit

1. REM D:\APP\AutoRun\Program\打开所有用户启动文件夹.bat
2. start "" "shell:common startup"
3. exit

1. ; D:\APP\AutoRun\开机自动启动项.txt 配置文件
2. D:\APP\TotalCMD\_SetHotkey-TCEV.exe
3. Notepad.exe
4. Calc.exe
5. D:\APP\Maye-Lite\Maye-Lite.exe
6. D:\APP\TotalCMD\TotalCMD.exe
7. D:\APP\FastCopy\FastCopy.bat
8. D:\APP\Coodesker\Coodesker.exe
9. D:\APP\QQ\QQ.exe
10. D:\APP\Dexpot\Dexpot.exe
11. C:\Program Files\zspace\极空间.exe
12. C:\Program Files (x86)\滴答清单\TickTick.exe
13. C:\Program Files\ynote-desktop\有道云笔记.exe
14. C:\app\GoodSync\x64\GoodSync2Go.exe

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

https://www.cnblogs.com/delphixx/p/19233074