You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
41 lines
1.3 KiB
41 lines
1.3 KiB
@echo off
|
|
setlocal
|
|
|
|
:: 切换命令行到UTF-8编码，以支持中文路径
|
|
chcp 65001
|
|
|
|
set "TARGET_SCRIPT=..\0main.bat"
|
|
set "DESKTOP_FOLDER=%USERPROFILE%\Desktop"
|
|
set "SHORTCUT_NAME=案件管理与分析系统.lnk"
|
|
set "SHORTCUT_ICON=ico\logo.ico"
|
|
set "TARGET_SCRIPT_PATH=%~dp0%TARGET_SCRIPT%"
|
|
set "SHORTCUT_PATH=%DESKTOP_FOLDER%\%SHORTCUT_NAME%"
|
|
|
|
:: 检查桌面是否已存在同名快捷方式
|
|
if exist "%SHORTCUT_PATH%" (
|
|
echo 快捷方式已存在于桌面，不需要创建
|
|
exit /b
|
|
)
|
|
|
|
echo 创建快捷方式到桌面...
|
|
|
|
:: 检查桌面目录是否存在，如果不存在则创建目录
|
|
if not exist "%DESKTOP_FOLDER%" (
|
|
mkdir "%DESKTOP_FOLDER%"
|
|
)
|
|
|
|
:: 使用 powershell 创建快捷方式，并设置图标，且以管理员权限运行
|
|
|
|
powershell -Command "& {$WshShell = New-Object -ComObject WScript.Shell; $Shortcut = $WshShell.CreateShortcut('%SHORTCUT_PATH%'); $Shortcut.TargetPath = '%TARGET_SCRIPT_PATH%'; $Shortcut.WindowStyle = 1; $Shortcut.WorkingDirectory = '%~dp0'; $Shortcut.Arguments = '-runas'; $Shortcut.IconLocation = '%~dp0%SHORTCUT_ICON%'; $Shortcut.Save()}"
|
|
|
|
:: 检查快捷方式是否创建成功
|
|
if exist "%SHORTCUT_PATH%" (
|
|
echo 快捷方式已成功创建到桌面: %SHORTCUT_PATH%
|
|
) else (
|
|
echo 创建快捷方式失败，请检查权限
|
|
)
|
|
|
|
:: 暂停，等待用户按下任意键
|
|
:: pause
|
|
|
|
endlocal
|