博客
关于我
JavaScript 1 播放器
阅读量:292 次
发布时间:2019-03-01

本文共 1186 字,大约阅读时间需要 3 分钟。

<html>
<head>
</head>
<body>
<Script Language="JavaScript">
song = new Array()
var x = 0
song[1] = "007主题曲之一 "
song[2] = "007主题曲之二 "
song[3] = "999朵玫瑰 "
song[4] = "X-档案主题曲"
song[5] = "用心良苦"
song[6] = "泰坦尼克主题曲"
function prev(){
if (x>1)
{
    x--
    document.midi.typein.value=song [x]
}
}
function next()
{
    var max= song.length-1
    if (x<max)
    {
        x++
        document.midi.typein.value=song [x]
    }
}
function go()
{
    if (x != 0)
    {
        location.href='song'+x+'.mid'
        //以上指定播放的是当前路径的midi文件,文件名分别是song1.mid-song6.mid //
    }
}
function start()
{
    x=1
    document.midi.typein.value=song [x]
}
function end()
{
    x=song.length-1
    document.midi.typein.value=song [x]
}
function cls()
{
    document.midi.typein.value="选曲"
}
</Script>
<!--====2、将以下代码加入HTML的<body></body>之间区:-->
<BODY οnlοad="cls()">
<FORM Name="midi">
<INPUT NAME="typein" TYPE="text" SIZE="25" ALIGN=top><BR>
<font size=3>
<INPUT TYPE=Button Value="|<<" Align=left οnclick="start()">
<INPUT TYPE=Button Value="<<" Align=left οnclick="prev()">
<input type=Button value="PLAY" align=left onClick="go()" name="Button">
<INPUT TYPE=Button Value=">>" Align=left οnclick="next()">
<INPUT TYPE=Button Value=">>|" Align=left οnclick="end()">
</font>
</FORM>
</body>
</html> 

转载地址:http://ygzo.baihongyu.com/

你可能感兴趣的文章
Navicat因导入的sql文件中时间数据类型有参数而报错的原因(例:datetime(3))
查看>>
Navicat如何连接MySQL
查看>>
navicat导入.sql文件出错2006- MySQLserver has gone away
查看>>
Navicat导入海量Excel数据到数据库(简易介绍)
查看>>
Navicat工具Oracle数据库复制 or 备用、恢复功能(评论都在谈论需要教)
查看>>
Navicat工具中建立数据库索引
查看>>
navicat工具查看MySQL数据库_表占用容量_占用空间是多少MB---Linux工作笔记048
查看>>
navicat怎么导出和导入数据表
查看>>
Navicat怎样同步两个数据库中的表
查看>>
Navicat怎样筛选数据
查看>>
Navicat报错connection is being used
查看>>
Navicat报错:1045-Access denied for user root@localhost(using passwordYES)
查看>>
Navicat控制mysql用户权限
查看>>
navicat操作mysql中某一张表后, 读表时一直显示正在载入,卡死不动,无法操作
查看>>
Navicat连接mysql 2003 - Can't connect to MySQL server on ' '(10038)
查看>>
Navicat连接mysql数据库中出现的所有问题解决方案(全)
查看>>
Navicat连接Oracle出现Oracle library is not loaded的解决方法
查看>>
Navicat连接Oracle数据库以及Oracle library is not loaded的解决方法
查看>>
Navicat连接sqlserver提示:未发现数据源名并且未指定默认驱动程序
查看>>
navicat连接远程mysql数据库
查看>>