以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]webbrower控件中视频播放问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=62625)
--  作者：cqlwsam
--  发布时间：2015/1/5 15:28:00
--  [求助]webbrower控件中视频播放问题

选中视频文件，然后在webbrowser控件中播放，无法过这句代码：

 Case "avi","wmv","wmp","wm","asf","mpg","mpeg","mpe","m1v","m2v","mpv2“ \'设置筛选器
                Dim tt3 As String = "<embed autostart=" & False & " Loop=" & -1 & " >“ & ControlPanel & " width=" & 360 & " height=" & 270 & " src=" & tt1 & ">"
                FileSys.WriteAllText(tt2 & "temp.htm",tt3, False, Encoding.Default)

 

 

说”controlpanel“没有事前申明。如何改？谢谢！
[此贴子已经被作者于2015-1-5 15:29:30编辑过]
--  作者：cqlwsam
--  发布时间：2015/1/5 15:32:00
--  
删除了就可以了。谢谢！
--  作者：Bin
--  发布时间：2015/1/5 15:33:00
--  
ControlPanel  这是个变量,你没声明
--  作者：有点甜
--  发布时间：2015/1/5 15:36:00
--  
Dim tt3 As String = "<embed autostart=False Loop=false width=360 height=270 src=\'" & tt1 & "\'></embed>"