中国DOS联盟论坛

中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --
联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟
中国DOS联盟论坛
现在时间是 2026-08-05 07:59
48,038 主题排行 / 350,123 发帖 / 今日 0 篇 / 48,251 会员排行
DOS批处理 & 脚本技术(批处理室) » 搜索mp3没有歌词的歌曲文件,并自动用千千静听下载歌词
可打印版本  912 / 1
第1楼 yayumyself 发表于 2007-07-04 16:25
初级用户 发帖 14 积分 36
搜索mp3没有歌词的歌曲文件,并自动用千千静听下载歌词
@echo off&setlocal enabledelayedexpansion&color 1f
mode con:cols=50 lines=25
set n=0
if "%~1"=="" (
echo 请直接拖放包含音乐的文件夹到此文件上
ping /n 6 127.0.0.1>nul&exit
) else (
echo 当前检测目录为:%~1
)
echo _________
for %%i in ("%1\*.wma" "%1\*.mp3") do (
if not exist %1\%%~ni.lrc (
set/a n+=1&set name!n!=%%i&echo %%~nxi --Not Find )
)
echo.
if %n%==0 echo 所有歌词都有歌词文件&pause>nul&exit
echo 共%n%项。
set /p sure=是否用千千静听下载歌词文件(按任意键下载):
for /f "skip=4 tokens=2 delims=>" %%i in ('reg query "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\TTPlayer.exe" /ve 2^>nul') do (
set p=%%i
set p=!p:~4!
)
if "!p!"=="" (
set/p dl=你的系统中没有安装千千静听,是否下载?任意键下载:
start "" "http://wwwcnc.ttplayer.com/download/ttpsetup.exe"
exit
)
del %temp%\musiclist.bat 2>nul
echo @echo off>%temp%\musiclist.bat
for /l %%a in (1,1,%n%) do (
echo start "" "!p!" "!name%%a!">>%temp%\musiclist.bat
)
echo exit>>%temp%\musiclist.bat
start %temp%\musiclist.bat
)
exit

嘿嘿,来自我的百度空间(嘿嘿,做广告)。http://hi.baidu.com/xinghuo

附件
搜索mp3没有歌词的歌曲文件,并自动用千千静听下载歌词.rar (896 bytes)
第2楼 vkill 发表于 2007-07-07 22:05
金牌会员 发帖 1,744 积分 4,103 来自 甘肃.临泽
wget+sed直接到baidu下载,呵呵`
[ 联系联盟系统管理团队 - 中国DOS联盟 - 标准版 ]
Sponsored by ifanr Inc | © 2001–2023