57 lines
1.3 KiB
Batchfile
57 lines
1.3 KiB
Batchfile
chcp 936
|
|
REM 设置936编码防止某些中文路径导致批处理失效
|
|
@echo off
|
|
setlocal enabledelayedexpansion
|
|
mode con cols=94 lines=30&color 0a&title 创建桌面快捷方式
|
|
echo.
|
|
echo [+] 获得当前路径:%~dp0
|
|
set path=%~dp0auto_run_python.bat
|
|
echo.
|
|
if exist %path% (
|
|
echo [+] 发现脚本auto_run_python.bat
|
|
echo.
|
|
echo [+] 启动脚本路径：
|
|
echo.
|
|
echo [+] %path%
|
|
echo.
|
|
goto :creat
|
|
) else (
|
|
echo [-] 注意,未发现启动脚本发现脚本auto_run_python.bat,请注意是否改名,程序退出...
|
|
echo.
|
|
pause
|
|
exit
|
|
)
|
|
:creat
|
|
echo [+] 开始创建快捷方式...
|
|
echo.
|
|
rem 设置程序的完整路径(必要)
|
|
set Program=%path%
|
|
rem 设置快捷方式名字(必要)
|
|
set LinkName=写周报了
|
|
rem 程序工作路径
|
|
set WorkDir=%~dp0
|
|
rem 设置快捷方式说明
|
|
set Desc=写周报了
|
|
rem 设置快捷方式图标
|
|
set icon=%~dp0/auto_run_python_favicon.ico
|
|
if not defined WorkDir call:GetWorkDir "%Program%"
|
|
(echo Set WshShell=CreateObject("WScript.Shell"^)
|
|
echo strDesKtop=WshShell.SpecialFolders("DesKtop"^)
|
|
echo Set oShellLink=WshShell.CreateShortcut(strDesKtop^&"\%LinkName%.lnk"^)
|
|
echo oShellLink.TargetPath="%Program%"
|
|
echo oShellLink.WorkingDirectory="%WorkDir%"
|
|
echo oShellLink.WindowStyle=1
|
|
echo oShellLink.Description="%Desc%"
|
|
echo oShellLink.IconLocation="%icon%"
|
|
echo oShellLink.Save)>makelnk.vbs
|
|
echo [+] 桌面快捷方式创建成功!!
|
|
echo.
|
|
makelnk.vbs
|
|
del /f /q makelnk.vbs
|
|
pause
|
|
goto :eof
|
|
:GetWorkDir
|
|
set WorkDir=%~dp1
|
|
set WorkDir=%WorkDir:~,-1%
|
|
pause
|
|
goto :eof |