当前位置:神舟问>百科问答>如何让来自网页中的视频循环播放?

如何让来自网页中的视频循环播放?

2024-02-02 10:52:42 编辑:join 浏览量:547

问题补充说明:如何让网页中的视频循环播放?代码如下: <% Sub SelPlay(strUrl,strWidth,StrHeight) 'strurl视频文件的路径,strwidth 宽度,strheight 高度 Dim Exts,isExt If strUrl <> "" Then isExt = LCase(Mid(strUrl,InStrRev(strUrl, ".")+1)) Else isExt = "" End If Exts = "avi,wmv,asf,mov,rm,ra,ram" If Instr(Exts,isExt)=0 Then ***.write "非法视频文件" Else Select Case isExt Case "avi","wmv","asf","mov" ***.write " " Case "mov","rm","ra","ram" ***.write " " ***.write " " ***.write " " ***.write " " ***.write " " ***.write " " ***.write " " ***.write " " ***.write " " ***.write " " ***.write " " ***.write " " ***.write " " ***.write " " ***.write " " ***.write " " ***.write "
" ***.write " " ***.write " " ***.write " " ***.write " " ***.write " " ***.write " " ***.write " " ***.write " " ***.write " " ***.write " " ***.write " " ***.write " " ***.write " " ***.write " " ***.write " " End Select End If End Sub %> <% Call SelPlay("video/3D_1.wmv",280,220) %>

如何让来自网页中的视频循环播放?

可以把loop=""false""

替换成loop=""true""

标签:网页,播放,视频

版权声明:文章由 神舟问 整理收集,来源于互联网或者用户投稿,如有侵权,请联系我们,我们会立即处理。如转载请保留本文链接:https://www.shenzhouwen.com/answer/269087.html
热门文章