签到天数: 264 天 连续签到: 1 天 [LV.8]以坛为家I
|
楼主 |
发表于 2024-4-7 22:06
|
显示全部楼层
@echo off
set "MusicDir=%~dp0D:\Program_Files_\MP3_Player\千千静听"
set "MusicDirReg=%MusicDir:\=\\%"
if "%1"=="" (
call :Main
) else (
call :%1
if not "%2"=="SkipRefresh" (
assoc .=.
)
) >nul 2>nul
exit /b
::以管理员身份运行
:Main
title 关联文件
fltmc >nul || mshta vbscript:CreateObject("Shell.Application").ShellExecute("%~dpnx0","%*",,"runas",1)(window.close) && exit /b
fltmc >nul || mshta vbscript:CreateObject("Shell.Application").ShellExecute("%~dpnx0","%*",,"runas",1)(window.close) && exit /b
call "%~dpnx0" Install
::执行创建注册表关联项
:Install
(
echo Windows Registry Editor Version 5.00
call :RegAssoc AA TTPlayer 1
call :RegAssoc AAC TTPlayer 1
call :RegAssoc A52 TTPlayer 1
call :RegAssoc AC3 TTPlayer 1
call :RegAssoc AIF TTPlayer 1
call :RegAssoc AIFC TTPlayer 1
call :RegAssoc AIFF TTPlayer 1
call :RegAssoc AU TTPlayer 1
call :RegAssoc SND TTPlayer 1
call :RegAssoc CDA TTPlayer 1
call :RegAssoc CUE TTPlayer 1
call :RegAssoc DTS TTPlayer 1
call :RegAssoc DTSWAV TTPlayer 1
call :RegAssoc FLA TTPlayer 1
call :RegAssoc FLAC TTPlayer 1
call :RegAssoc MIDI TTPlayer 1
call :RegAssoc MID TTPlayer 1
call :RegAssoc RMI TTPlayer 1
call :RegAssoc MOD TTPlayer 1
call :RegAssoc FAR TTPlayer 1
call :RegAssoc IT TTPlayer 1
call :RegAssoc MTM TTPlayer 1
call :RegAssoc S3M TTPlayer 1
call :RegAssoc UMX TTPlayer 1
call :RegAssoc XM TTPlayer 1
call :RegAssoc APE TTPlayer 1
call :RegAssoc MAC TTPlayer 1
call :RegAssoc MP1 TTPlayer 1
call :RegAssoc MP2 TTPlayer 1
call :RegAssoc MP3 TTPlayer 1
call :RegAssoc MP3PRO TTPlayer 1
call :RegAssoc MPA TTPlayer 1
call :RegAssoc M4A TTPlayer 1
call :RegAssoc MP+ TTPlayer 1
call :RegAssoc MPC TTPlayer 1
call :RegAssoc OPUS TTPlayer 1
call :RegAssoc RA TTPlayer 1
call :RegAssoc TAK TTPlayer 1
call :RegAssoc TTA TTPlayer 1
call :RegAssoc OGG TTPlayer 1
call :RegAssoc WAV TTPlayer 1
call :RegAssoc WMA TTPlayer 1
call :RegAssoc M3U TTPlayer 1
call :RegAssoc M3U8 TTPlayer 1
call :RegAssoc TTBL TTPlayer 1
call :RegAssoc TTPL TTPlayer 1
) >"%Temp%\Install_YinYue.reg"
reg import "%Temp%\Install_YinYue.reg"
del /f "%Temp%\Install_YinYue.reg"
goto :eof
::关联相关文件类型
:RegAssoc :: <%1=Ext> <%2=ExeName> <%3=IconIndex>
echo [HKEY_CLASSES_ROOT\TTPlayer.%1\DefaultIcon]
echo @="%MusicDirReg%\\%2.exe,%3"
echo [HKEY_CLASSES_ROOT\WPS.%1\Shell\Open\Command]
echo @="\"%MusicDirReg%\\%2.exe\" \"%%1\""
echo [HKEY_CLASSES_ROOT\.%1]
echo @="TTPlayer.%1"
goto :eof
::timeout /t 6 >nul
pause
上述批处理运行无效 |
|