以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  js代码中 location="app.htm";会自动进入app页面，有没有办法实现等待用户选择了在进入app页面呢？  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=168918)
--  作者：cnsjroom
--  发布时间：2021/5/27 0:16:00
--  js代码中 location="app.htm";会自动进入app页面，有没有办法实现等待用户选择了在进入app页面呢？
 js代码中 location="app.htm";会自动进入app页面，

有没有办法实现当gzs页面10秒后 我有举报线索可以选择  然后等待用户选择了在进入app页面呢？
function countDown() {
    cnt=cnt-1;
    var bt1 = document.getElementById(\'btn1\');
    if(cnt === 0){
        bt1.disabled=false;
        bt1.innerHTML = "我有举报线索";
        bt1.style.backgroundColor = "#04be02";
        location="app.htm";
    } 
    else {
bt1.innerHTML = "请仔细阅读举报须知内容(" + cnt + "秒)"
setTimeout(countDown,1000);
    }
}

gzs页面代码
……
        With wb.AddButtonGroup("form1","btg1",True)
            .Add("btn1", "我有举报线索", "submit")
        End With
        wb.InsertHTML("<script>" & vars("ajaxform") & "</script>")
        wb.AppendHTML("<script>document.getElementById(\'btn1\').disabled=true;document.getElementById(\'btn1\').style.backgroundColor = \'#b2b2b2\';var cnt = 10;setTimeout(countDown,1000);</script>")
        e.WriteString(wb.Build) \'生成网页
……
--  作者：有点蓝
--  发布时间：2021/5/27 9:11:00
--  
先跳转到一个选择页面：location="选择.htm"，在现在页面里选择后，点击按钮再跳转到app