Board logo

标题: [系统增强] 批处理创建快捷方式 [打印本页]

作者: fml520    时间: 2008-4-3 22:24     标题: 批处理创建快捷方式

文本拖放到这里创建快捷方式
  1. @echo off
  2. color a0
  3. for /f "delims= eol=" %%i in ('findstr /n .* %1') do set url=%1
  4. set /p mz=输入快捷方式的名字:
  5. echo set WSHShell = CreateObject("WScript.Shell") >快捷方式.vbs
  6. echo DesktopPath = WSHShell.SpecialFolders("Desktop") >>快捷方式.vbs
  7. echo set Shortcut1 = WSHShell.CreateShortcut(DesktopPath + "\%mz%.lnk") >>快捷方式.vbs
  8. echo Shortcut1.TargetPath = %url% >>快捷方式.vbs
  9. echo Shortcut1.Save() >>快捷方式.vbs
  10. start "" "快捷方式.vbs"
  11. cls
  12. call title  正在创建.......
  13. echo.
  14. echo.
  15. echo          正在创建.......
  16. echo.
  17. echo.
  18. ping 1.1 /w 300>nul
  19. del 快捷方式.vbs
  20. cls
  21. echo.
  22. echo.
  23. echo                 完成
  24. echo.
  25. echo.
  26. ping 1.1 /w 300>nul
复制代码

作者: fml520    时间: 2008-4-3 22:25

是看了 VBS 的 创建快捷方式代码,自己改成P处理。主要是为了方便自己用。
作者: 狱渊    时间: 2013-5-1 13:15

直接右键···




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