رفتن به مطلب
  • 0

پخش زنده تلویزیون


kamran_ba

سوال

سلام من میخوام یه برنامه تلویزیون فارسی بسازم و کانالهای تلویزیونی رو به صورت آنلاین نمایش بدم. کد زیر رو پیدا کردم


[color=#0000FF]Sub [/color][color=#000000]Globals
[/color][color=#0000FF]Dim[/color][color=#000000] Video [/color][color=#0000FF]As[/color][color=#008B8B]VideoView[/color][color=#000000]
[/color][color=#0000FF]Dim[/color][color=#000000] Panel1 [/color][color=#0000FF]As[/color][color=#008B8B]Panel[/color][color=#000000]
[/color][color=#0000FF]Dim[/color][color=#000000] ServiceLink [/color][color=#0000FF]As[/color][color=#008B8B]String[/color][color=#000000]=[/color][color=#800000]"[/color][color=#800000]http://media.newspring.cc/video/2013/021013_DontWasteYourLife_01_iPod.mp4[/color][color=#800000]"[/color][color=#000000]
[/color][color=#0000FF]Dim[/color][color=#000000] ServiceFile [/color][color=#0000FF]As[/color][color=#008B8B]String[/color][color=#000000]=[/color][color=#800000]"[/color][color=#800000]021013_DontWasteYourLife_01_iPod.mp4[/color][color=#800000]"[/color][color=#000000]
[/color][color=#0000FF]Dim[/color][color=#000000] StreamVideo [/color][color=#0000FF]As[/color][color=#008B8B]Boolean[/color][color=#000000]
[/color][color=#0000FF]End Sub[/color][color=#000000]

[/color][color=#0000FF]Sub [/color][color=#000000]Activity_Create(FirstTime [/color][color=#0000FF]As[/color][color=#008B8B]Boolean[/color][color=#000000])
Activity.LoadLayout([/color][color=#800000]"[/color][color=#800000]Sermon[/color][color=#800000]"[/color][color=#000000]) [/color][color=#008000]'[/color][color=#008000] Change this to your Activity Layout[/color][color=#008000]
[/color][color=#000000]Panel1.Color=[/color][color=#0000FF]Colors[/color][color=#000000].black

Video.Initialize([/color][color=#800000]"[/color][color=#800000]Video1[/color][color=#800000]"[/color][color=#000000])

Panel1.Addview(Video,[/color][color=#800080]0[/color][color=#000000],[/color][color=#800080]0[/color][color=#000000],[/color][color=#800080]100%x[/color][color=#000000], [/color][color=#800080]100%y[/color][color=#000000])
StreamVideo=[/color][color=#0000FF]True[/color][color=#008000]'[/color][color=#008000]to play video file, change to false[/color][color=#008000]
[/color][color=#000000]

[/color][color=#0000FF]If[/color][color=#000000] StreamVideo=[/color][color=#0000FF]True[/color][color=#0000FF]Then[/color][color=#000000]
Video.LoadVideo([/color][color=#800000]"[/color][color=#800000]http[/color][color=#800000]"[/color][color=#000000],ServiceLink)[/color][color=#008000]'[/color][color=#008000]Setup for Streaming[/color][color=#008000]
[/color][color=#0000FF]Else[/color][color=#000000]
Video.LoadVideo([/color][color=#0000FF]File[/color][color=#000000].DirDefaultExternal,ServiceFile)[/color][color=#008000]'[/color][color=#008000]Setup for Loading Video[/color][color=#008000]
[/color][color=#0000FF]End[/color][color=#0000FF]If[/color][color=#000000]

Video.Play

[/color][color=#0000FF]End Sub[/color][color=#000000]

[/color][color=#0000FF]Sub [/color][color=#000000]video1_Complete
[/color][color=#008000]'[/color][color=#008000]Video finished, so We end App[/color][color=#008000]
[/color][color=#000000]Activity.Finish

[/color][color=#0000FF]End Sub[/color]

آدرس سرور مثلا شبکه 3 رو هم پیدا کردم:

http://www1.live.irib.ir/web/live/tv/channel3?file=irib3-1&streamer=rtmp://cdn.live.irib.ir:1935/irib3

حالا فقط نمیدونم چطور آدرس شبکه سه رو تو این سورس قرار بدم. لطفا اگه میدونید کمک کنید ممنون

لینک ارسال
به اشتراک گذاری در سایت های دیگر

15 پاسخ به این سوال تاکنون داده شده است

ارسال‌های توصیه شده

نیازی به استفاده از VideoView نیست

با استفاده از کتابخونه ای که آفای امید آقاخانی نوشتن میتونید به راحتی فیلم به صورت آنلاین مشاهده کنید.

نمونه کد:

Sub Globals    
Dim st As StudentLibrary

End Sub

و جهت اجرا شدن این کد :

Sub Play_btn_Click    
StartActivity(st.PlayStreamVideo("http://hn13.asset.aparat.com/aparat-video/0b5728df84743e73a949ccdaee3c9c611946909__73313.mp4",""))

End Sub

کتابخونشو واست پیوست میکنم.

دوست عزیز ممنون که جواب دادی. ولی مشکل اصلی من پا برجاست. من میخوام ببینم لینک پخش زنده کانالهای تلویزیونی رو با چه کدی بذارم که تلویزیون پخش بشه. ممنون

لینک ارسال
به اشتراک گذاری در سایت های دیگر

سلام

ابتدا این پرمیشن رو به مانیفست اضافه کنید.

[color=#000000][font=Courier New]AddPermission([/font][/color][color=#800000][font=Courier New]"[/font][/color][color=#800000][font=Courier New]android.permission.INTERNET[/font][/color][color=#800000][font=Courier New]"[/font][/color][color=#000000][font=Courier New])[/font][/color]

خب ببینید شما موقع دانلود فایل لینک دانلود فایلتون مربوط میشه به پرتکل HTTP و خب اصلش همینه

اما هنگام گرقتن لینک دانلود فیلم های پخش زنده این فایل ها توسط پرتکل RTSP و یا RTMP دانلود میشن

خب پس قطعا با بقیه موارد فرق داره.خب اینکار با Video View و Intent انجام داده میشه

Video View :

[color=#008B8B][font=Courier New]VideoView[/font][/color][color=#000000][font=Courier New].LoadVideo([/font][/color][color=#800000][font=Courier New]"[/font][/color][color=#800000][font=Courier New]http[/font][/color][color=#800000][font=Courier New]"[/font][/color][color=#000000][font=Courier New], [/font][/color][color=#800000][font=Courier New]"[/font][/color]rtmp://edge4.livetv.irib.ir/tv3/irib3-1[color=#800000][font=Courier New]"[/font][/color][color=#000000][font=Courier New])[/font][/color]

Intent :

Dim i As Intent
i.Initialize(i.ACTION_VIEW, "rtmp://edge4.livetv.irib.ir/tv3/irib3-1")

StartActivity(i)

ببینید این کدها به هیچ وجه تست نشده و برنامه بیسیک در دسرس ندارم تست کنم

روش های دیگه ای هم قطعا باید باشه،خودتم پیگیر باش و منتظر جواب ما نباش

لینک ارسال
به اشتراک گذاری در سایت های دیگر

با سلام

دوستان و اساتید گرامی

آدرس شبکه های تلویزیونی و پخش زنده رو چطور میتونم پیدا کنم

مانند کد زیر

http://edge1.livetv.irib.ir:1935/tv3/smil:irib3/player.m3u8

لینک ارسال
به اشتراک گذاری در سایت های دیگر

با سلام

دوستان و اساتید گرامی

آدرس شبکه های تلویزیونی و پخش زنده رو چطور میتونم پیدا کنم

مانند کد زیر

http://edge1.livetv.irib.ir:1935/tv3/smil:irib3/player.m3u8

داخل اون یکی پست توضیح دادم

لینک ارسال
به اشتراک گذاری در سایت های دیگر

نیازی به استفاده از VideoView نیست

با استفاده از کتابخونه ای که آفای امید آقاخانی نوشتن میتونید به راحتی فیلم به صورت آنلاین مشاهده کنید.

نمونه کد:

Sub Globals    
Dim st As StudentLibrary

End Sub

و جهت اجرا شدن این کد :

Sub Play_btn_Click    
StartActivity(st.PlayStreamVideo("http://hn13.asset.aparat.com/aparat-video/0b5728df84743e73a949ccdaee3c9c611946909__73313.mp4",""))

End Sub

کتابخونشو واست پیوست میکنم.

Libraries.rar

لینک ارسال
به اشتراک گذاری در سایت های دیگر

سلام من این کد رو استفاده کردم هنگام اجرا میزنه که باید با یک پلیر انتحاب بشه فیلم پخش بشه من هر پلیری تو گوشیم میزنم میگه نمیتونه پخش کنه ... ایا میشه این مشکل رو حل کرد !؟ ممنون میشم

لینک ارسال
به اشتراک گذاری در سایت های دیگر

درود

جهت اطلاعتون بگم که این کتابخونه student library دسترسی هایی مثل gps رو به منیفست اضافه میکنه که خیلی از دوستان گفتن برنامه شون به خاطر داشتن دسترسی های اضافی توسط بازار رد شده

لینک ارسال
به اشتراک گذاری در سایت های دیگر

بایگانی شده

این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.

  • کاربران آنلاین در این صفحه   0 کاربر

    • هیچ کاربر عضوی،در حال مشاهده این صفحه نیست.
×
×
  • اضافه کردن...