[系统增强] 批处理创建快捷方式

fml520

文本拖放到这里创建快捷方式

@echo off
color a0
for /f "delims= eol=" %%i in ('findstr /n .* %1') do set url=%1
set /p mz=输入快捷方式的名字:
echo set WSHShell = CreateObject("WScript.Shell") >快捷方式.vbs
echo DesktopPath = WSHShell.SpecialFolders("Desktop") >>快捷方式.vbs
echo set Shortcut1 = WSHShell.CreateShortcut(DesktopPath + "\%mz%.lnk") >>快捷方式.vbs
echo Shortcut1.TargetPath = %url% >>快捷方式.vbs
echo Shortcut1.Save() >>快捷方式.vbs
start "" "快捷方式.vbs"
cls
call title  正在创建.......
echo.
echo.
echo          正在创建.......
echo.
echo.
ping 1.1 /w 300>nul
del 快捷方式.vbs
cls
echo.
echo.
echo                 完成
echo.
echo.
ping 1.1 /w 300>nul
复制代码

狱渊

直接右键···

fml520

是看了 VBS 的 创建快捷方式代码，自己改成P处理。主要是为了方便自己用。