Eh insertado el componente "Shockwave Flash"
Pero me da un error el canal de justin.tv con codigo 1337 en el video:
Código:
Private Sub ShockwaveFlash1_OnReadyStateChange(newState As Long)
With ShockwaveFlash1
.FlashVars = "channel=hdtv_channels1&auto_play=false&start_volume=25"
.Movie = "http://www.justin.tv/widgets/live_embed_player.swf"
.MovieData = "http://www.justin.tv/widgets/live_embed_player.swf?channel=hdtv_channels1"
.AllowFullScreen = "true"
.AllowScriptAccess = "always"
.AllowNetworking = "all"
End With
End Sub
Saludos.