week_report/创建桌面快捷方式.bat

57 lines
1.3 KiB
Batchfile
Raw Normal View History

2023-08-16 17:30:00 +08:00
chcp 936
REM <20><><EFBFBD><EFBFBD>936<33><36><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ֹijЩ<C4B3><D0A9><EFBFBD><EFBFBD>·<EFBFBD><C2B7><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʧЧ
@echo off
setlocal enabledelayedexpansion
mode con cols=94 lines=30&color 0a&title <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ݷ<EFBFBD>ʽ
echo.
echo [+] <20><><EFBFBD>õ<EFBFBD>ǰ·<C7B0><C2B7>:%~dp0
set path=%~dp0auto_run_python.bat
echo.
if exist %path% (
echo [+] <20><><EFBFBD>ֽű<D6BD>auto_run_python.bat
echo.
echo [+] <20><><EFBFBD><EFBFBD><EFBFBD>ű<EFBFBD>·<EFBFBD><C2B7><EFBFBD><EFBFBD>
echo.
echo [+] %path%
echo.
goto :creat
) else (
echo [-] ע<><D7A2><><CEB4><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ű<EFBFBD><C5B1><EFBFBD><EFBFBD>ֽű<D6BD>auto_run_python.bat,<2C><>ע<EFBFBD><D7A2><EFBFBD>Ƿ<EFBFBD><C7B7><EFBFBD><EFBFBD><EFBFBD>,<2C><><EFBFBD><EFBFBD><EFBFBD>˳<EFBFBD>...
echo.
pause
exit
)
:creat
echo [+] <20><>ʼ<EFBFBD><CABC><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ݷ<EFBFBD>ʽ...
echo.
rem <20><><EFBFBD>ó<EFBFBD><C3B3><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>·<EFBFBD><C2B7>(<28><>Ҫ)
set Program=%path%
rem <20><><EFBFBD>ÿ<EFBFBD><C3BF>ݷ<EFBFBD>ʽ<EFBFBD><CABD><EFBFBD><EFBFBD>(<28><>Ҫ)
set LinkName=д<EFBFBD>ܱ<EFBFBD><EFBFBD><EFBFBD>
rem <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>·<EFBFBD><C2B7>
set WorkDir=%~dp0
rem <20><><EFBFBD>ÿ<EFBFBD><C3BF>ݷ<EFBFBD>ʽ˵<CABD><CBB5>
set Desc=д<EFBFBD>ܱ<EFBFBD><EFBFBD><EFBFBD>
rem <20><><EFBFBD>ÿ<EFBFBD><C3BF>ݷ<EFBFBD>ʽͼ<CABD><CDBC>
2023-08-16 17:44:38 +08:00
set icon=%~dp0/auto_run_python_favicon.ico
2023-08-16 17:30:00 +08:00
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 [+] <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ݷ<EFBFBD>ʽ<EFBFBD><CABD><EFBFBD><EFBFBD><EFBFBD>ɹ<EFBFBD>!!
echo.
makelnk.vbs
del /f /q makelnk.vbs
pause
goto :eof
:GetWorkDir
set WorkDir=%~dp1
set WorkDir=%WorkDir:~,-1%
pause
goto :eof