[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[特效代码] 批处理如何实现根据输入的歌曲名联网查找该歌曲并播放

本帖最后由 pcl_test 于 2016-9-28 14:00 编辑

音乐播放器如何实现??
实现功能:
             输入你想听的歌曲,运行确定后就能播放网络上的连接

            简单说就是输入别人想听的歌不是一开始就固定是什么歌!
假设:我想听------爱你一万年

怎么才能让程序(批处理)执行这个手动过程:

上baidu搜索mp3  输入  --爱你一万年--找到能听的连接----播放!!!

这个过程怎么用bat实现或者不能实现

[ 本帖最后由 jellykid 于 2009-2-26 15:50 编辑 ]

  1. @echo off
  2. set "wmpPath=C:\Program Files\Windows Media Player\wmplayer.exe"
  3. start /min "" "%wmpPath%" "http://hlls.52sharp.com/midi/zhubajie.mid"
复制代码
  1. @echo off
  2. set "wmpPath=C:\Program Files\Windows Media Player\wmplayer.exe"
  3. start /min /b "" "%wmpPath%" "http://cachefile35.rayfile.com/zh-cn/download/6048640b2c4ee0cce9d24e68250b7171/BatHome_PlayList.wpl"
复制代码

[ 本帖最后由 Batcher 于 2009-2-25 20:45 编辑 ]
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

楼上看来是没理解我的意思!

我说的是输入别人想听的不是一开始就固定是什么歌!
假设:我想听------爱你一万年
怎么才能让程序(批处理)执行这个手动过程:

上baidu搜索mp3  输入  --爱你一万年--找到能听的连接----播放!!!

这个过程怎么用bat实现或者不能实现

TOP

BAT不行,需要借助第三方命令行工具!!!!!!!!!!!
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

楼上的到底该用什么工具呢?代码?


batcher的一段代码是固定音乐我不要!
               二段错误!

[ 本帖最后由 jellykid 于 2009-2-26 15:49 编辑 ]

TOP

curl.exe 之类的东东

TOP

curl.exe?
ftp工具?
本人已死!不用联系!~
要联系下来联系!~~

TOP

我顶!
难道没人帮忙回答下??
本人已死!不用联系!~
要联系下来联系!~~

TOP

回复 7楼 的帖子

google搜索curl.exe!
不是ftp工具!
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

  1. @echo off
  2. :loop
  3. cls
  4. set /p str=输入需联网查找和播放的歌曲名:
  5. set "htaurl=http://bathome.net/s/hta/index.html"
  6. set "getid=http://search.kuwo.cn/r.s?all=%str%&ft=music&itemset=web_2013&client=kt&pn=0&rn=5&rformat=json&encoding=utf8"
  7. for /f %%a in ('mshta %htaurl% "eval('('+web('%getid%')+')')['abslist'][0]['MUSICRID']"') do set id=%%a
  8. set "getmusic=http://antiserver.kuwo.cn/anti.s?type=convert_url&rid=%id%&format=mp3|aac&response=url"
  9. for /f %%a in ('mshta %htaurl% "web('%getmusic%')"') do set "music=%%a"
  10. echo;%music%
  11. rem 调用系统自带Windows Media Player播放
  12. start "" wmplayer.exe "%music%"
  13. echo;按任意键重新查找……
  14. pause>nul&goto loop
复制代码

TOP

返回列表