[reseau] jouer un wav

Question

bonjour a tous, désoler pour mon titre peu ordinaire.

Voila je suis entrain de concevoir un logiciel de chat utilisant la Tcplibrary et j'aimerai pour voir faire en sorte de pouvoir jouer un même morceau de musique a tous les utilisateurs (chaque client dispose du morceau de musique) pour cela j'utilise la fonction :

       My.Computer.Audio.Play("monwave.wav, AudioPlayMode.Background)

Quand j'utilise ce code hors chat il fonctionne mais une fois dans le chat ca me fonctionne plus, pas de sont pourtant il passe par le code.

voici le code que j'utilise :

Private Sub Client_DataArrival(ByVal Available As Long) Handles Client2.DataArrival
       
        Dim Tampon As String = Client2.GetLine()
        Do While Tampon <> ""
            commande = Tampon
            setr = CInt(InStr(commande, ":"))
            setr2 = CInt(InStr(commande, ">"))
            commande2 = commande.Remove(0, setr2 + 1)
            setr3 = CInt(InStr(commande2, ":"))
            commande3 = commande2.Remove(setr3, commande2.Length - setr3)
            Label1.Text = "!" + commande3 + "!"
            If String.Compare("setplay:", commande3) = 0 Then
                My.Computer.Audio.Play(commande.Remove(0, setr), AudioPlayMode.Background) ' la ca ne passe pas 
                Label2.Text = "play"
                Label3.Text = commande.Remove(0, setr)
            ElseIf String.Compare("setstop:", commande3) = 0 Then
                My.Computer.Audio.Stop()
                Label4.Text = "stop"
            Else
                Label1.Text = "none"
                TextBox1.AppendText(Tampon)
                My.Computer.Audio.Play("flash.wav", AudioPlayMode.Background) 'ici le son est jouer
                Tampon = Client2.GetLine()
            End If
         Loop

    End Sub

Merci d'avance

gollum57320 · Answer

Enfaite c'est bon j'ai juste oublier de mettre la commande : 
   Tampon = Client2.GetLine()
a la fin de la condition if  pour eviter de mettre le chat dans une boucle "bug"

[reseau] jouer un wav

1 réponse

Votre réponse

Discussions similaires