Code:
While objDR.Read()
cel = New TableCell
cel.Text = "<OBJECT ID='MediaPlayer' WIDTH='320' HEIGHT='240' CLASSID = 'CLSID:22D6f312-B0F6-11D0-94AB-0080C74C7E95' STANDBY = 'Loading Windows Media Player components...' TYPE='application/x-oleobject'> CODEBASE = 'http://activex.microsoft.com/activex/controls/mplayer/en/' nsmp2inf.cab#Version=6,4,7,1112'<PARAM name='AutoStart' value='True'><PARAM name='bestandsnaam' value='http://devsite/hiantwebtestvideo/Video/" & objDR("VideoPath") & "'/> <EMBED TYPE='application/x-mplayer2' NAME = 'MediaPlayer' SRC='http://devsite/hiantwebtestvideo/Video/" & objDR("VideoPath") & "' WIDTH ='320' HEIGHT='240'></EMBED></OBJECT>"
rij.Cells.Add(cel)
Me.TblResult.Rows.Add(rij)Waneer ik deze code run dan zie ik inderdaad 3 mediaplayers staan. maar er speelt zich niets af.
HTML:
<tr>
<td><OBJECT ID='MediaPlayer' WIDTH='320' HEIGHT='240' CLASSID = 'CLSID:22D6f312-B0F6-11D0-94AB-0080C74C7E95' STANDBY = 'Loading Windows Media Player components...' TYPE='application/x-oleobject'> CODEBASE = 'http://activex.microsoft.com/activex/controls/mplayer/en/' nsmp2inf.cab#Version=6,4,7,1112'<PARAM name='AutoStart' value='True'><PARAM name='bestandsnaam' value='http://testvideo/Video/1.wmv'/> <EMBED TYPE='application/x-mplayer2' NAME = 'MediaPlayer' SRC='http://testvideo/Video/1.wmv' WIDTH ='320' HEIGHT='240'></EMBED></OBJECT></td></tr>