Lecture de fichiers au format real audio ou real video

Description

Ce petit bout de code vous permet de lire un fichier au format real audio/video se trouvant sur votre machine ou sur un server distant(station de radio par exemple).

1) Placer sur votre Feuille (Form) une TextBox nomer la Text1, puis trois bouton Command1, Command2 et Command3

2)placer le control Active-X

3) Recopier le code ci-dessous

Inserer le control "RealPlayer control Active-X", les fichiers RMOC3260.oca et RMOC3260.dll contenu dans le zip sont a copier dans c:\windows\system\

Source / Exemple :


Private Sub Command1_Click()
    RealAudio1.Source = Text1.Text    'Recupere la source
    RealAudio1.DoPlay     'Lis le fichier source
End Sub

Private Sub Command2_Click()
    RealAudio1.DoPause     'Fait une pause
End Sub

Private Sub Command3_Click()
    RealAudio1.DoStop      'Arrete la lecture
End Sub

Conclusion :


(RealAudio1 correspond au non du composant Active-X)

Codes Sources

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.