Board logo

标题: [文件操作] 批处理如何将一个文件的快捷方式放入windows启动菜单中 [打印本页]

作者: CAIT    时间: 2024-6-18 13:21     标题: 批处理如何将一个文件的快捷方式放入windows启动菜单中

在用rclone加载alist网盘过程中,需要将D:\Alist\alist.vbs和D:\Alist\rclone\rclone.vbs两个文件的快捷方式加入windows启动菜单%AppData%\Microsoft\Windows\Start Menu\Programs\Startup中,手动拖入能正常运行,现在想用批处理完成,不知应该如何写?感谢!
作者: 77七    时间: 2024-6-18 15:20

  1. @echo off
  2. for %%a in ("D:\Alist\alist.vbs" "D:\Alist\rclone\rclone.vbs") do (
  3. call :CreateShort "%%~a" "%AppData%\Microsoft\Windows\Start Menu\Programs\Startup\%%~na"
  4. )
  5. goto :eof
  6. rem "http://www.bathome.net/redirect.php?goto=findpost&ptid=11050&pid=70331"
  7. :CreateShort
  8. mshta VBScript:Execute("Set a=CreateObject(""WScript.Shell""):Set b=a.CreateShortcut(""%~2.lnk""):b.TargetPath=""%~1"":b.WorkingDirectory=""%~dp1"":b.Save:close")
复制代码

作者: ppll2030    时间: 2024-6-18 16:14

  1. @echo off
  2. set f1="D:\Alist\alist.vbs"
  3. set f2="D:\Alist\rclone\rclone.vbs"
  4. for  %%i in (%f1% %f2%) do (call :lnk "%%~i")
  5. exit
  6. :lnk
  7. mshta VBScript:Execute("Set a=CreateObject(""WScript.Shell""):Set b=a.CreateShortcut(a.SpecialFolders(""StartUp"") & ""\%~n1.lnk""):b.TargetPath=""%~1"":b.WorkingDirectory=""%~dp1"":b.Save:close")
复制代码

作者: CAIT    时间: 2024-6-18 20:25

回复 3# ppll2030


    实测管用!非常感谢!!




欢迎光临 批处理之家 (http://www.bathome.net/) Powered by Discuz! 7.2