• Vui lòng đọc nội qui diễn đàn để tránh bị xóa bài viết
  • Tìm kiếm trước khi đặt câu hỏi

[VB.NET] - Hướng dẫn viết chương trình xem TIVI Online

Các bài viết hướng dẫn về Visual Basic .NET và C#

Điều hành viên: tungcan5diop, QUANITGROBEST

Hình đại diện của người dùng
clarkkent
Mạnh Thường Quân
Mạnh Thường Quân
Bài viết: 1641
Ngày tham gia: T.Tư 16/04/2008 11:25 am
Đến từ: Chợ Lách - Bến Tre
Been thanked: 31 time
Liên hệ:

[VB.NET] - Hướng dẫn viết chương trình xem TIVI Online

Gửi bàigửi bởi clarkkent » T.Sáu 09/01/2009 1:47 pm

Tên bài viết: [VB.NET] - Hướng dẫn viết chương trình xem TIVI Online
Tác giả: Nguyễn Trung Tín
Cấp độ bài viết: xoàng thôi
Tóm tắt: [VB.NET] - Hướng dẫn viết chương trình xem TIVI Online


- Bài này hướng dẫn các bạn viết một chương trình xem TIVI online bằng control windows media, không có gì là ghê gớm cả, cực kỳ đơn giản
- Đầu tiên các bạn thêm 1 control Windows Media Player vào chương trình, đặt tên tùy ý, chẳng hạn wmp
- Thêm 1 ListBox vào và đặt tên là lsView
- Và code... :D

Mã: Chọn hết

  1.    Private Sub lsView_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lsView.SelectedIndexChanged
  2.         wmp.URL = lsView.Items.Item(lsView.SelectedIndex)
  3.     End Sub

Thế là xong... :))

- Hì chưa xong đâu...
bạn cần có các URL của các kênh TIVI online dạng mms:

Mã: Chọn hết

  1. Truyen Hinh Vinh Long
  2. mms://210.245.121.111/thvl
  3. VTV1
  4. mms://210.245.126.153/VTV1/
  5. VTV3
  6. mms://210.245.126.153/VTV3/
  7. VTV4
  8. mms://203.162.1.223:556/VTV4_09
  9. HTV7
  10. mms://210.245.126.153/HTV7
  11. HTV9
  12. mms://www.vtc.com.vn:557/HTV9_11
  13. VTC1
  14. mms://www.vtc.com.vn:556/VTC1_01
  15. VTC2
  16. mms://www.vtc.com.vn:556/VTC2_02
  17. VTC3
  18. http://vtc.com.vn/vod.asp?channel=vtc3&trailer=&channelkey=8053.663
  19. VTC4
  20. mms://www.vtc.com.vn:556/VTC4_04
  21. VTC5
  22. mms://www.vtc.com.vn:556/VTC5_05
  23. VTC10 (ITV)
  24. http://www.vtc.com.vn/playerstream.swf?id=16&tp=l
  25. VTC11
  26. http://www.vtc.com.vn/playerstream.swf?id=17&tp=l
  27. Vietnamnet Tivi--VNN
  28. mms://tv.vietnamnet.vn/live
  29. Ha Noi TV
  30. mms://203.162.1.181/HTV
  31. Info Tivi
  32. mms://222.255.31.252/InfoTVChannel
  33. Dong Nai 1
  34. mms://www.dongnai.gov.vn/dn1
  35. Dong Nai 2
  36. mms://www.dongnai.gov.vn/dn2
  37. HTVC Movie
  38. mms://210.245.126.153/HTVCMOVIE
  39. Ban tin Tuoi Tre
  40. http://www3.tuoitre.com.vn/media/PlayList.aspx?TVO=-1
  41. Ban tin Thanh Nien
  42. http://www3.tuoitre.com.vn/media/PlayList.aspx?THTN=-1
  43. Phim Bao Tuoi tre
  44. mms://media.tuoitre.com.vn/BroadCast
  45. Fashion Tivi
  46. mms://210.245.126.153/FTV
  47. Relentless TV
  48. mms://channel125.com/relentless
  49. CNC-Kenh tin tuc NN
  50. mms://210.245.126.153/CNC
  51. Tin tuc An Do
  52. mms://164.100.51.209/DDNews
  53. Sky News
  54. mms://live1.wm.skynews.servecast.net/skynews_wmlz_live300k
  55. IBN7
  56. mms://80.67.86.91/D/407/9546/v0001/reflector:52042
  57. CNBC AWAAZ
  58. mms://80.67.86.91/D/407/9546/v0001/reflector:54300
  59. CNBC TV18
  60. mms://80.67.86.91/D/407/9546/v0001/reflector:49579
  61. CNN IBN NEWS
  62. mms://80.67.86.91/D/407/9546/v0001/reflector:48272

Cái list này là của Diodez (die gần hết ;)) :)) )
- Lúc chạy thêm nó vào ListBox.

- Khuyến mãi thêm cái hàm kiểm tra xem có kết nối Internet hay chưa:

Mã: Chọn hết

  1.    Private Sub btCheck_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btCheck.Click
  2.         If My.Computer.Network.IsAvailable = True Then
  3.             MsgBox("kết nối")
  4.         Else
  5.             MsgBox("không kết nối")
  6.         End If
  7.     End Sub


• Hôm bây: www.tinsoftware.com ^ ^
Cố gắng lên...

AnhGaWe02
Bài viết: 5
Ngày tham gia: T.Tư 04/02/2009 10:32 am

Re: [VB.NET] - Hướng dẫn viết chương trình xem TIVI Online

Gửi bàigửi bởi AnhGaWe02 » T.Hai 23/02/2009 5:52 pm

Cái control Window medio lấy đâu ra vậy :D

Hình đại diện của người dùng
vo_minhdat2007
Quản trị
Quản trị
Bài viết: 2227
Ngày tham gia: CN 17/07/2005 1:40 am
Has thanked: 13 time
Been thanked: 87 time
Liên hệ:

Re: [VB.NET] - Hướng dẫn viết chương trình xem TIVI Online

Gửi bàigửi bởi vo_minhdat2007 » T.Hai 23/02/2009 6:46 pm

Bạn click phải thanh Toolbox, chọn Choose Items... . Trong cửa sổ hiện ra chọn tab Com Components, dò xuống cuối kiếm Windows Media Player, check nó và OK!

AnhGaWe02
Bài viết: 5
Ngày tham gia: T.Tư 04/02/2009 10:32 am

Re: [VB.NET] - Hướng dẫn viết chương trình xem TIVI Online

Gửi bàigửi bởi AnhGaWe02 » T.Tư 25/02/2009 2:05 pm

bạn cho mình hỏi, nếu là listBox thì làm sao add cả 2 "Ten_dai", "URL" vào đc( trừ trường hợp 2 dòng). Còn nếu là listView thì có thể cho nó hiển thị "Ten_dai", khi click vào ten_dai thì mới lấy giá trị URL đc. Có sai sót gì ko bạn :D. Cho code add vào listBox được ko bạn :>

AnhGaWe02
Bài viết: 5
Ngày tham gia: T.Tư 04/02/2009 10:32 am

Re: [VB.NET] - Hướng dẫn viết chương trình xem TIVI Online

Gửi bàigửi bởi AnhGaWe02 » T.Tư 25/02/2009 3:42 pm

Thank bạn nhiều, mình làm được rồi :D ;). Nhưng mình làm khác bạn 1 tí

Mã: Chọn hết

  1.  
  2. 'Mình xài class Xl_windowplayer
  3.  
  4.     Private bang_window As XL_Windowplayer
  5.     Private DS As BindingManagerBase
  6.  
  7.     Private Sub MH_Window_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
  8.         Ket_noi 'đã kết nối được với dữ liệu
  9.  
  10.         bang_window = New XL_Windowplayer
  11.         DS = Me.BindingContext(bang_window)
  12.         Xuat_ra_listBoxt()
  13.         Xuat_ra_windowplayer()
  14.  
  15.     End Sub
  16.  
  17.     Private Sub Xuat_ra_listBoxt()
  18.         LsBox.DisplayMember = "Ten_dai"
  19.         LsBox.ValueMember = "Ma_dai"
  20.         LsBox.DataSource = bang_window
  21.     End Sub
  22.  
  23.     Private Sub Xuat_ra_windowplayer()
  24.         wmp.URL = DS.Current("URL")
  25.     End Sub
  26.  
  27.     Private Sub LsBox_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles LsBox.SelectedIndexChanged
  28.         Xuat_ra_listBoxt()
  29.         Xuat_ra_windowplayer()
  30.     End Sub
  31.  
  32.  


Thanks bạn

hoangvanhop
Bài viết: 1
Ngày tham gia: T.Tư 04/03/2009 10:31 am

Re: [VB.NET] - Hướng dẫn viết chương trình xem TIVI Online

Gửi bàigửi bởi hoangvanhop » T.Tư 04/03/2009 12:22 pm

Các anh ơi nếu muốn viết bằng VB6 được không

Hình đại diện của người dùng
vo_minhdat2007
Quản trị
Quản trị
Bài viết: 2227
Ngày tham gia: CN 17/07/2005 1:40 am
Has thanked: 13 time
Been thanked: 87 time
Liên hệ:

Re: [VB.NET] - Hướng dẫn viết chương trình xem TIVI Online

Gửi bàigửi bởi vo_minhdat2007 » T.Tư 04/03/2009 8:31 pm

Được bạn à, làm bằng VB6 không sợ bị lỗi "trễ component COM" như VB.NET, làm hệt như trên là được! Chúc bạn thành công.

vu duc chinh
Bài viết: 1
Ngày tham gia: T.Ba 03/02/2009 7:45 am

Re: [VB.NET] - Hướng dẫn viết chương trình xem TIVI Online

Gửi bàigửi bởi vu duc chinh » T.Sáu 06/03/2009 4:23 pm

a có phần mềm viết một chương trình tùy ý bằng vb .net ko
a có thì gửi cho e nha.e cảm ơn a nhìu!

Hình đại diện của người dùng
clarkkent
Mạnh Thường Quân
Mạnh Thường Quân
Bài viết: 1641
Ngày tham gia: T.Tư 16/04/2008 11:25 am
Đến từ: Chợ Lách - Bến Tre
Been thanked: 31 time
Liên hệ:

Re: [VB.NET] - Hướng dẫn viết chương trình xem TIVI Online

Gửi bàigửi bởi clarkkent » T.Sáu 06/03/2009 4:48 pm

vu duc chinh đã viết:a có phần mềm viết một chương trình tùy ý bằng vb .net ko
a có thì gửi cho e nha.e cảm ơn a nhìu!

Ra tiệm kiếm đĩa Visual Studio 2005 về
• Hôm bây: www.tinsoftware.com ^ ^
Cố gắng lên...

kendy-leung
Bài viết: 1
Ngày tham gia: T.Ba 21/04/2009 9:33 am

Re: [VB.NET] - Hướng dẫn viết chương trình xem TIVI Online

Gửi bàigửi bởi kendy-leung » T.Ba 21/04/2009 10:08 am

ah. tớ mới vô học ah. cai window meida player mà mấy cậu nói ih. tớ có thêm cái menutrip vô, ở trong đó gồm có: open,exit.. nhưng cái chỗ open, mình code sao cho nó co thể chỉ đường dẫn tới bài nhạc đó và nghe đươc lun. ai bít chỉ giùm tớ ih. đang cần gấp. thanks mấy u trước

Hình đại diện của người dùng
minhhath
Thành viên năng nổ
Thành viên năng nổ
Bài viết: 78
Ngày tham gia: CN 17/01/2010 3:24 pm
Đến từ: p5,Tỉnh Cà Mau
Has thanked: 8 time
Liên hệ:

Re: [VB.NET] - Hướng dẫn viết chương trình xem TIVI Online

Gửi bàigửi bởi minhhath » T.Bảy 20/02/2010 8:03 am

bạn cũng Pro lắm chứ bạn chỉ mình làm sao đưa file âm thanh vào Form được không?
có nghĩa là khi loadForm lên là âm thanh phát liền ấy mà?????????????
giúp mình nhé :D :D :D :D :D :D :) :) =; =; =; =;
[color=#BF0080]Trên đời này không có con đường cùng,mà chỉ có những ranh giới,điều quan trọng là có đủ sức mạnh và nghị lực để vượt qua những ranh giới đó hay không[/color]

miucon20
Thành viên tích cực
Thành viên tích cực
Bài viết: 193
Ngày tham gia: T.Sáu 04/06/2010 12:35 pm
Has thanked: 27 time
Been thanked: 1 time

Re: [VB.NET] - Hướng dẫn viết chương trình xem TIVI Online

Gửi bàigửi bởi miucon20 » T.Tư 14/05/2014 1:30 pm

cũng hay


Quay về “[.NET] Bài viết hướng dẫn”

Đang trực tuyến

Đang xem chuyên mục này: Không có thành viên nào trực tuyến.3 khách