Реализовать плейлист радиостанций для AxWindowsMediaPlayer - Visual Basic .NET
Формулировка задачи:
Всем доброе время суток.
Есть программа радио онлайн делал давно и давно не слушал вот решил недавно послушать. Но некоторые (URL) станций уже не работают. Вытаскивал их с помощью инструментов разработчика в браузере.
А постоянно за лазить в программу нет желания.
Так вот вопрос как сделать playlist (информацию не нашол в интернете)?
Вот кусок кода:
Листинг программы
- Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox1.SelectedIndexChanged
- If ComboBox1.Text = "Дорожное радио" Then Me.Label1.Text = "http://dor64no.streamr.ru/"
- If ComboBox1.Text = "Русское радио" Then Me.Label1.Text = "http://rr.fmtuner.ru/"
- If ComboBox1.Text = "Наше радио" Then Me.Label1.Text = "http://nashe1.hostingradio.ru:80/nashe-128.mp3"
- 'И так далее---->78 URL
- End Sub
- Private Sub Play1_MouseDown(sender As Object, e As MouseEventArgs) Handles Play1.MouseDown
- AxWindowsMediaPlayer1.URL = Label1.Text
- End Sub
Решение задачи: «Реализовать плейлист радиостанций для AxWindowsMediaPlayer»
textual
Листинг программы
- Dim source As String = IO.File.ReadAllText("D:\radio.m3u") 'считфываем файл со списком
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д