以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  播放时，再次点击播放按钮，能调用Audio.Stop()吗？  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=105849)
--  作者：zhangjian222200
--  发布时间：2017/8/27 22:38:00
--  播放时，再次点击播放按钮，能调用Audio.Stop()吗？
Select Case e.Path
    Case "test.htm"
        Dim wb As New weui
        wb.AddForm("","form1","test1.htm")
        With wb.AddButtonGroup("form1","btg1",True)
            .AddHiddenValue("aaa",0)
            .Add("btn1", "播放", "button").Attri-bute= "on-click=\'myfunction(1)\'"
            已经实现了播放，但是播放时，再次点击播放按钮，能调用Audio.Stop()吗？
        End With
        e.WriteString(wb.Build) \'生成网页
End Select

js代码：
function myfunction(idx){
    document.getElementById("aaa").value = idx
    var result = submitAjaxForm(\'form1\',\'\',false);
    if (result ==\'OK\') {show(\'dlg1\')}
    else if (result ==\'您尚未登录!\') {show(\'dlg2-1\')}
}

test1.htm：
If aaa = 1 Then
    Audio.Play("e:\\web\\wav\\2017-08-27_21_26_15.wav")
    e.WriteString("正在播放!")
    Return "" \'必须的 
End If
[此贴子已经被作者于2017/8/27 22:38:20编辑过]
--  作者：有点甜
--  发布时间：2017/8/27 23:22:00
--  

1、播放，是在服务器电脑上播放的；

 

2、可以写两个按钮，为什么要写在一个按钮？

 

3、js写代码

 

var flag = false

function myfunction(idx){
    flag = !flag
    if(flag){
        document.getElementById("aaa").value = 1
    } else {
        document.getElementById("aaa").value = 2
    }   
    var result = submitAjaxForm(\'form1\',\'\',false);
    if (result ==\'OK\') {show(\'dlg1\')}
    else if (result ==\'您尚未登录!\') {show(\'dlg2-1\')}
}