以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 关于InsertHTML标签内容的问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=142773) |
-- 作者:ap9709130 -- 发布时间:2019/11/5 21:03:00 -- 关于InsertHTML标签内容的问题 老师 我的代码如下: Dim wb As New WeUI wb.InsertHTML("<h3 align=\'left\' style=\'margin-top:5px\'>当前时间:" & Date.now & "</h3>") wb.AppendHTML("<script src=\'/hito/time.js\'></script>") e.WriteString(wb.Build) js 代码是在网上看到的,想用动态的标签来显示时间: function startTime(){ var today = new Date(); var h = today.getHours(); var m = today.getMinutes(); var s = today.getSeconds(); m = checkTime(m); s = checkTime(s); var h1= document.getElementsByTagName("h3")[0]; h1.innerHTML=h+":"+m+":"+s; setInterval(function(){ startTime() },1000) } function checkTime(i){ if(i<10){ i = "0"+i; } return i } 我试了一下,不会报错,但时间也不会变。要怎么改才能做到标签的时候和时钟一样动起来?
|
-- 作者:有点蓝 -- 发布时间:2019/11/5 21:18:00 -- Dim wb As New WeUI wb.InsertHTML("<h3 align=\'left\' style=\'margin-top:5px\'>当前时间:" & Date.now & "</h3>") wb.AppendHTML("<script src=\'/hito/time.js\'></script>",True) wb.InsertHTML("<script>startTime()</script>")
e.WriteString(wb.Build) |
-- 作者:ap9709130 -- 发布时间:2019/11/5 21:49:00 -- 蓝老师 用了你的代码,页面什么也没有。标签都不见了。
|
-- 作者:ap9709130 -- 发布时间:2019/11/5 21:52:00 -- 有点蓝 我弄错了。页面还是一样,时间不会动
|
-- 作者:有点蓝 -- 发布时间:2019/11/5 22:19:00 -- 我测试没有问题。按f12看浏览器提示什么错误 |