With AxShockwaveFlash1 .Stop() .Movie = "chemin de la video" .Play() End With
AxShockwaveFlash1.Dispose()
Private Sub WebBrowser1_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted With AxShockwaveFlash1 .Stop() .Movie = "http://freerider2.fr/game/freerider2.html" .Play() End With End Sub