595076941@qq.com

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

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

 

REM D:APPAutoRunProgramAutoRun.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

 

 

autorun

 

 

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

 

 

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

 

posted @ 2025-11-17 15:38  QQ595076941  阅读(3)  评论(0)    收藏  举报
595076941@qq.com