[es] - Visual Basic 2010 - Pustanje TV-a preko WMP-a

anonunder
Nikola R.
Grocka

Član broj: 319750
Poruke: 1
*.dynamic.isp.telekom.rs.

Profil

Visual Basic 2010 - Pustanje TV-a preko WMP-a

^{11.12.2013. u 23:52 - pre 126 meseci}

Ubacio sam komponentu WMP u formu i sada neke kanale pusti a neke ne,

RTS 1 hoce, ali mms://beotelmedia.beotel.net/rtvpink/ ne zeli bez nekog plugina, takodje, da li postoji neki codec pack da isntaliram pa da mogu da stavim i extenziju za ucitavanje u plejeru .m3u ili druge neke..

Code:
Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        AxWindowsMediaPlayer1.URL = ("mms://rts.videostreaming.rs/rts")
    End Sub

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        AxWindowsMediaPlayer1.URL = ("http://b92s.net/tv/tv-b92.ogg.m3u")
    End Sub

    Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
        AxWindowsMediaPlayer1.URL = ("http://static.rtv.rs/video/uzivo/rtv1.asx")
    End Sub

    Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
        AxWindowsMediaPlayer1.URL = ("http://www.rtv.rs/video/uzivo/rtv2.asx")
    End Sub

    Private Sub Button7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button7.Click
        AxWindowsMediaPlayer1.URL = ("mms://beotelmedia.beotel.net/rtvpink/")
    End Sub

    Private Sub Button12_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button12.Click
        AxWindowsMediaPlayer1.URL = ("http://streaming.tdiradio.com:9000")
    End Sub

    Private Sub Button11_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button11.Click
        AxWindowsMediaPlayer1.URL = ("http://stream.b92.net:8001/radio-b92.aac.m3u")

    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        AxWindowsMediaPlayer1.URL = ("http://streaming.tdiradio.com:9000")
    End Sub
End Class

I da li imate neke domace kanale koje mogu da stavim? Hvala.

Odgovor na temu