播放音乐的脚本

原创 2004年06月24日 21:24:00

<SCRIPT LANGUAGE="VBScript">
dim lngMP70
function Listen(str) //str是歌曲路径
On Error Resume Next
lngMP70 = IsObject(CreateObject("WMPlayer.OCX"))
lngMP70 = false
' Windows Media Player 7 Code
If (lngMP70) Then
 document.write "<OBJECT ID=MediaPlayer "
 document.write " CLASSID=CLSID:6BF52A52-394A-11D3-B153-00C04F79FAA6"
 document.write " standby=""Loading Microsoft Windows Media Player components..."" "
 document.write " TYPE=""application/x-oleobject"" width=""310"" height=""64"">"
 document.write "<PARAM NAME=""url"" VALUE=""" + str+ """>"
 document.write "<PARAM NAME=""AutoStart"" VALUE=""true"">"
 document.write "<PARAM NAME=""ShowControls"" VALUE=""1"">"
 document.write "<PARAM NAME=""uiMode"" VALUE=""full"">"
 document.write "</OBJECT>"

' Windows Media Player 6.4 Code
Else
 document.write "<OBJECT ID=MediaPlayer "
 document.write " CLASSID=CLSID:22d6f312-b0f6-11d0-94ab-0080c74c7e95"
 document.write "CODEBASE=http://activex.microsoft.com/activex/controls/mplayer/en/nsmp2inf.cab#Version=6,4,5,715"
 document.write " standby=""Loading Microsoft Windows Media Player components..."" "
 document.write " TYPE=""application/x-oleobject"" width=""310"" height=""64"">"
 document.write "<PARAM NAME=""FileName"" VALUE=""" + str+ """>"
 document.write "<PARAM NAME=""ShowDisplay"" VALUE=""false"">"
 document.write "<PARAM NAME=""AutoStart"" VALUE=""true"">"
 document.write "<PARAM NAME=""ShowControls"" VALUE=""1"">"
 document.write "<PARAM NAME=""PlayCount"" VALUE=""3"">"
 document.write "<PARAM NAME=""ShowStatusBar"" VALUE=""1"">"
 document.write "</OBJECT>"
End If
end function
window.focus()
call Listen(str)

</SCRIPT>

版权声明:本文为博主原创文章,转载请注明来源。

树莓派瞎折腾[1]-实现简单的命令行音乐播放器

该项目主要研究了音乐(尤其是在线音乐)在命令行中播放的方法。并制作了一个脚本,包含以下功能:1.在线搜索,在网易云音乐库中搜索音乐。2.消息显示,搜索返回最靠符合条件的三首歌,并显示歌手/专辑,方便更...
  • WangchangIsHere
  • WangchangIsHere
  • 2017年05月07日 18:22
  • 3296

python实现简单的音乐播放功能

对于热门语言深感兴趣 ,激励自己多多学习和实践,自己也决定做个开头,一步步来实现音乐播放器功能。刚开始的设计,只是实现了简单的音乐播放、暂停、退出功能。至于还有些功能键的添加, 以及树形结构来添加播放...
  • qq_15508113
  • qq_15508113
  • 2015年11月27日 15:47
  • 6281

Android实现简单的音乐播放

android实现音乐播放效果,简单的服务开启。 这里将用到android的四大组件之一:Service 注意:Service是自大组件之一,需要注册。...
  • Json_Jerry
  • Json_Jerry
  • 2016年09月22日 20:05
  • 7222

Android mediaplayer 播放本地音乐文件

阐述mediaplayer播放音乐的流程
  • HUSHILIN001
  • HUSHILIN001
  • 2016年09月08日 10:43
  • 4191

Android中播放音乐的几种方式

Android中播放音乐的几种方式前言 前几天一直在研究RxJava2,也写了记录了几篇博客,但因为工作任务原因,需要研究音频相关的知识,暂时放下Rxjava,本文的demo中,MediaPaly...
  • u013366008
  • u013366008
  • 2017年08月02日 14:54
  • 3177

android 利用 service 实现音乐播放

android利用service实现音乐播放
  • zhao123h
  • zhao123h
  • 2014年06月22日 21:51
  • 2796

实现音乐播放器后台Service服务一直存在的解决思路

最近实现一个音乐播放器的小项目,实现后台播放歌曲的功能,即使退出程序也可以一直播放歌曲,服务不被停止。 实现这个功能的过程中遇到了有两个问题: 问题1、退出程序之后,service播放歌曲的服务在...
  • u010156024
  • u010156024
  • 2015年08月15日 11:08
  • 5810

C#播放背景音乐的五种方法

利用DirectX首先要安装DirectX SDK。安装好之后,在C:\Windows\Microsoft.NET\DirectX for Managed Code\1.0.2902.0目录下有在.n...
  • gatieme
  • gatieme
  • 2016年03月10日 13:49
  • 5825

Android实际音乐播放的代码

//为了防止出现4.4版本前后的差别:利用各种手段,严格处理:在各自的状态做各自应该做的方法。防止底层报error //还要做上来电监听:停止播放的操作 //还包含上一首 下一首的播放 //是在...
  • qq_28676355
  • qq_28676355
  • 2016年03月15日 18:31
  • 1467

Android三种路径的音乐播放,视频播放的两种方式

不同路径上的音乐,它的播放方式又不同。应用内的主要在于得有音频文件的存在,手机内的的的提供正确的uri,而网络上就在网络网络环境的配置了。...
  • Wwoo0
  • Wwoo0
  • 2017年02月09日 23:52
  • 289
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:播放音乐的脚本
举报原因:
原因补充:

(最多只允许输入30个字)