تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
ممكن طريقة عمل راديو اذاعات القرآن الكريم عن طريق
#1
ممكن طريقة عمل راديو اذاعات القرآن الكريم عن طريق List Box
ولو ماينفعش ماهى الطريقة الصحيحة لعمل راديو اذاعات القرآن الكريم
يوجد لدى روابط المحطات
الرد }}}
تم الشكر بواسطة:
#2
على ما اعتقد سوف تضع ادة متصفح الويب داخ الفورم و عند التشغيل اجعلها تفتح الربط للاذاعة مباشرة فى حدث التحميل للفورم
بس انا لم اجرب
بالتوفيق
الرد }}}
تم الشكر بواسطة:
#3
ضع الروابط لكي نعرف ما يناسبه من كود مناسب فقد تحتاج إلى WebBrowser أو MediaPlayer فلأمر يختلف
الرد }}}
تم الشكر بواسطة:
#4
Lightbulb 
هذه هي بعض الروابط التي اريد اضافتها
كود :
عبد الباسط مرتل
mms://radio.mp3quran.net/basit
عبد الباسط مجود
mms://radio.mp3quran.net/basit_mjwd
محمد صديق المنشاوى
mms://radio.mp3quran.net/minsh
محمود الحصرى
mms://radio.mp3quran.net/husr
الشيخ على الحذيفي
http://live.mp3quran.net:9844/;
فارس عبادى
mms://radio.mp3quran.net/frs_a
رابط اخر
http://live.mp3quran.net:9972/;
مشارى راشد العفاسى
mms://radio.mp3quran.net/afs
ماهر المعيقلى
mms://radio.mp3quran.net/maher
احمد بن على العجمى
mms://radio.mp3quran.net/ajm
الشيخ سعد الغامدى
mms://radio.mp3quran.net/s_gmd
وهذا مثال لما اريد


الرد }}}
تم الشكر بواسطة:
#5
في انتظار حد محترف يعرف لنا الموضوع دة يارجالة
الرد }}}
تم الشكر بواسطة:
#6
ضع أداة AxWindowsMediaPlayer1
وListBox1 لأسماء قنوات القرآن الكريم (ولا اسامح من يستغل الكود لقنوات محرمة)
وButton1 للتشغيل
وButton2 للإيقاف

وادع لي بالغيب

كود :
Public Class Form1

    Private arr As New Dictionary(Of String, String)

    Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
        arr.Add("عبد الباسط مرتل", "mms://radio.mp3quran.net/basit")
        arr.Add("عبد الباسط مجود", "mms://radio.mp3quran.net/basit_mjwd")
        arr.Add("محمد صديق المنشاوى", "mms://radio.mp3quran.net/minsh")
        arr.Add("محمود الحصرى", "mms://radio.mp3quran.net/husr")
        arr.Add("مشارى راشد العفاسى", "mms://radio.mp3quran.net/afs")
        arr.Add("ماهر المعيقلى", "mms://radio.mp3quran.net/maher")
        arr.Add("احمد بن على العجمى", "mms://radio.mp3quran.net/ajm")
        arr.Add("الشيخ سعد الغامدى", "mms://radio.mp3quran.net/s_gmd")

        ListBox1.Items.AddRange(arr.Select(Function(x) x.Key).ToArray)

    End Sub

    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        If AxWindowsMediaPlayer1.currentMedia IsNot Nothing Then AxWindowsMediaPlayer1.Ctlcontrols.stop()
        Dim index As Integer = ListBox1.SelectedIndex
        If index <> -1 Then
            If AxWindowsMediaPlayer1.playState <> WMPLib.WMPPlayState.wmppsPlaying Then
                AxWindowsMediaPlayer1.URL = arr(ListBox1.Text)
                AxWindowsMediaPlayer1.Ctlcontrols.play()
            End If
        End If
    End Sub

    Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
        If AxWindowsMediaPlayer1.currentMedia IsNot Nothing Then AxWindowsMediaPlayer1.Ctlcontrols.stop()
    End Sub

End Class
الرد }}}
تم الشكر بواسطة: aassa


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  محتاج طريقة لتنسيق نص الرسالة المرسلة إلى الواتس اب new_programer 2 151 04-03-24, 07:15 AM
آخر رد: new_programer
  ممكن حل المشكلة فى الكود التالي - من مشاركة استاذنا القدير / عبدالله الدوسري new_programer 4 150 02-03-24, 07:36 PM
آخر رد: new_programer
  محتاج تشفير فيديو وتشغلية عن طريق البرنامج فقط new_programer 1 103 22-02-24, 12:09 PM
آخر رد: AHMED213
  طريقة اجراء نسخة احتياطية و استرجاعها ؟ Osama NY 2 458 07-02-24, 08:59 PM
آخر رد: Kamil
Sad ممكن حل لهذا المشكل melad2002 0 237 30-01-24, 08:01 PM
آخر رد: melad2002
  التحقق من خلال محتوى خلية عن طريق textbox صالح عبدالله 2 218 24-01-24, 12:54 PM
آخر رد: صالح عبدالله
  ممكن استفسار عن m3u8 malekmohamed155 0 219 20-01-24, 07:47 PM
آخر رد: malekmohamed155
  ماهي طريقة نقل محتويات checkedlistbox الى داتاقريدفيو صالح عبدالله 3 248 06-01-24, 03:20 PM
آخر رد: Kamil
  ممكن تعديل في كود التفقيط للارقام melad2002 2 323 01-01-24, 08:47 PM
آخر رد: melad2002
  [VB.NET] السلام عليكم ممكن مساعدة اخوان احتاج يكون تسجيل الدخول textbox1 + textbox2 Coder_iraqii 4 398 18-12-23, 06:46 PM
آخر رد: Kamil

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم