Fethi Polat 1
Fethi Polat
noisiv 1
noisiv
Manwe Work 1
Manwe Work
Scarlet 1
Scarlet
xranzei 1
xranzei
Hikaye Ekle

Web TV ! Yapabilecek

  • Konuyu başlatan Konuyu başlatan ForReaL
  • Başlangıç tarihi Başlangıç tarihi
  • Cevaplar Cevaplar 4
  • Görüntüleme Görüntüleme 395
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
Tarihe Göre Sırala Reaksiyona göre sırala

HERAKLES Otomatik Avlı kalıcı sunucu. 19 Haziran'da açılıyor. Atius & Wizard güvencesiyle hemen kayıt ol, ön kayıt ödülleri aktif. HEMEN TIKLA!

[TABLE="class: ncode_imageresizer_warning, width: 736"]
[TR]
[TD="class: td1, width: 20"][/TD]
[TD="class: td2"]Video:
Linkleri görebilmek için Turkmmo Forumuna ÜYE olmanız gerekmektedir.
Arkadaşlar hepsi var ama visual basic bilgim yok ücretsiz yardım edebilcekler yazsın veya benm anladıgım bi konuda yardım isteyebilir.. forreal@turkmmo.com konuşalım.. acil

[/TD]
[/TR]
[/TABLE]
i6290996_3.png




Kod: 
Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        WebBrowser1.Navigate("http://forumtrwebtv.ucoz.com/forumtrwebtv/anasayfa.html")
        WebBrowser2.Navigate("http://forumtrwebtv.ucoz.com/forumtrwebtv/chat.html")
        WebBrowser3.Navigate("http://forumtrwebtv.ucoz.com/forumtrwebtv/duyuru.html")


    End Sub

    Private Sub TvKanallarıToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        WebBrowser1.Navigate("http://forumtrwebtv.ucoz.com/forumtrwebtv/tv.html")

    End Sub

    Private Sub RadyoKanallarıToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        WebBrowser1.Navigate("http://forumtrwebtv.ucoz.com/forumtrwebtv/radyo.html")
    End Sub
    Private Sub KapatToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        End

    End Sub

    Private Sub AnasayfaToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        WebBrowser1.Navigate("http://forumtrwebtv.ucoz.com/forumtrwebtv/anasayfa.html")
    End Sub

    Private Sub YenileToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        WebBrowser1.Refresh()

    End Sub

    Private Sub ChatiAçToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        WebBrowser2.Show()
    End Sub

    Private Sub YenileToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        WebBrowser2.Refresh()
    End Sub

    Private Sub KapatToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        WebBrowser2.Hide()

    End Sub

    Private Sub VIPTVToolStripMenuItem_Click(ByVal sender As  System.Object, ByVal e As System.EventArgs) Handles  VIPTVToolStripMenuItem.Click
        WebBrowser1.Navigate("http://forumtrwebtv.ucoz.com/forumtrwebtv/internetyayin/vip.html")
    End Sub

    Private Sub LocaToolStripMenuItem_Click(ByVal sender As  System.Object, ByVal e As System.EventArgs) Handles  LocaToolStripMenuItem.Click
        WebBrowser1.Navigate("http://forumtrwebtv.ucoz.com/forumtrwebtv/internetyayin/loca.html")
    End Sub

    Private Sub SinemaxToolStripMenuItem_Click(ByVal sender As  System.Object, ByVal e As System.EventArgs) Handles  SinemaxToolStripMenuItem.Click
        WebBrowser1.Navigate("http://forumtrwebtv.ucoz.com/forumtrwebtv/internetyayin/sine.html")
    End Sub

    Private Sub Salon1ToolStripMenuItem_Click(ByVal sender As  System.Object, ByVal e As System.EventArgs) Handles  Salon1ToolStripMenuItem.Click
        WebBrowser1.Navigate("http://forumtrwebtv.ucoz.com/forumtrwebtv/internetyayin/1.html")
    End Sub

    Private Sub Salon2ToolStripMenuItem_Click(ByVal sender As  System.Object, ByVal e As System.EventArgs) Handles  Salon2ToolStripMenuItem.Click
        WebBrowser1.Navigate("http://forumtrwebtv.ucoz.com/forumtrwebtv/internetyayin/2.html")
    End Sub

    Private Sub Salon3ToolStripMenuItem_Click(ByVal sender As  System.Object, ByVal e As System.EventArgs) Handles  Salon3ToolStripMenuItem.Click
        WebBrowser1.Navigate("http://forumtrwebtv.ucoz.com/forumtrwebtv/internetyayin/3.html")
    End Sub

    Private Sub Salon4ToolStripMenuItem_Click(ByVal sender As  System.Object, ByVal e As System.EventArgs) Handles  Salon4ToolStripMenuItem.Click
        WebBrowser1.Navigate("http://forumtrwebtv.ucoz.com/forumtrwebtv/internetyayin/4.html")
    End Sub

    Private Sub Salon5ToolStripMenuItem_Click(ByVal sender As  System.Object, ByVal e As System.EventArgs) Handles  Salon5ToolStripMenuItem.Click
        WebBrowser1.Navigate("http://forumtrwebtv.ucoz.com/forumtrwebtv/internetyayin/5.html")
    End Sub

    Private Sub Salon6ToolStripMenuItem_Click(ByVal sender As  System.Object, ByVal e As System.EventArgs) Handles  Salon6ToolStripMenuItem.Click
        WebBrowser1.Navigate("http://forumtrwebtv.ucoz.com/forumtrwebtv/internetyayin/6.html")
    End Sub

    Private Sub Salon7ToolStripMenuItem_Click(ByVal sender As  System.Object, ByVal e As System.EventArgs) Handles  Salon7ToolStripMenuItem.Click
        WebBrowser1.Navigate("http://forumtrwebtv.ucoz.com/forumtrwebtv/internetyayin/7.html")
    End Sub

    Private Sub DizimaxToolStripMenuItem_Click(ByVal sender As  System.Object, ByVal e As System.EventArgs) Handles  DizimaxToolStripMenuItem.Click
        WebBrowser1.Navigate("http://forumtrwebtv.ucoz.com/forumtrwebtv/internetyayin/dizi.html")
    End Sub

    Private Sub MaçLinkleriToolStripMenuItem_Click(ByVal sender As  System.Object, ByVal e As System.EventArgs) Handles  MaçLinkleriToolStripMenuItem.Click
        WebBrowser1.Navigate("http://forumtrwebtv.ucoz.com/forumtrwebtv/internetyayin/link.html")
    End Sub

    Private Sub MaçÖzetleriToolStripMenuItem_Click(ByVal sender As  System.Object, ByVal e As System.EventArgs) Handles  MaçÖzetleriToolStripMenuItem.Click
        WebBrowser1.Navigate("http://forumtrwebtv.ucoz.com/forumtrwebtv/interaktif/ozet.html")

    End Sub

    Private Sub BedavaSMSToolStripMenuItem_Click(ByVal sender As  System.Object, ByVal e As System.EventArgs) Handles  BedavaSMSToolStripMenuItem.Click
        WebBrowser1.Navigate("http://forumtrwebtv.ucoz.com/forumtrwebtv/interaktif/sms.html")
    End Sub

    Private Sub GoogleMapsToolStripMenuItem_Click(ByVal sender As  System.Object, ByVal e As System.EventArgs) Handles  GoogleMapsToolStripMenuItem.Click
        WebBrowser1.Navigate("http://forumtrwebtv.ucoz.com/forumtrwebtv/interaktif/maps.html")
    End Sub

    Private Sub OnlinePhotoshopToolStripMenuItem_Click(ByVal sender As  System.Object, ByVal e As System.EventArgs) Handles  OnlinePhotoshopToolStripMenuItem.Click
        WebBrowser1.Navigate("http://forumtrwebtv.ucoz.com/forumtrwebtv/interaktif/foto.html")
    End Sub

    Private Sub HızTestiToolStripMenuItem_Click(ByVal sender As  System.Object, ByVal e As System.EventArgs) Handles  HızTestiToolStripMenuItem.Click
        WebBrowser1.Navigate("http://forumtrwebtv.ucoz.com/forumtrwebtv/interaktif/hiz.html")
    End Sub

    Private Sub ÇeviriToolStripMenuItem_Click(ByVal sender As  System.Object, ByVal e As System.EventArgs) Handles  ÇeviriToolStripMenuItem.Click
        WebBrowser1.Navigate("http://forumtrwebtv.ucoz.com/forumtrwebtv/interaktif/ceviri.html")
    End Sub

    Private Sub TeletextToolStripMenuItem_Click(ByVal sender As  System.Object, ByVal e As System.EventArgs) Handles  TeletextToolStripMenuItem.Click
        WebBrowser1.Navigate("http://forumtrwebtv.ucoz.com/forumtrwebtv/interaktif/teletext.html")
    End Sub

    Private Sub TurkWebTVToolStripMenuItem_Click(ByVal sender As  System.Object, ByVal e As System.EventArgs) Handles  TurkWebTVToolStripMenuItem.Click
        WebBrowser1.Navigate("http://forumtrwebtv.ucoz.com/forumtrwebtv/interaktif/trwebtv.html")
    End Sub

    Private Sub ForumTRToolStripMenuItem_Click(ByVal sender As  System.Object, ByVal e As System.EventArgs) Handles  ForumTRToolStripMenuItem.Click
        WebBrowser1.Navigate("http://forumtrwebtv.ucoz.com/forumtrwebtv/interaktif/frmtr.html")
    End Sub

    Private Sub CanlıKameralarToolStripMenuItem_Click(ByVal sender As  System.Object, ByVal e As System.EventArgs) Handles  CanlıKameralarToolStripMenuItem.Click
        WebBrowser1.Navigate("http://forumtrwebtv.ucoz.com/forumtrwebtv/extra/cam.html")
    End Sub

    Private Sub GazetelerToolStripMenuItem_Click(ByVal sender As  System.Object, ByVal e As System.EventArgs) Handles  GazetelerToolStripMenuItem.Click
        WebBrowser1.Navigate("http://forumtrwebtv.ucoz.com/forumtrwebtv/extra/gaste.html")
    End Sub

    Private Sub PuanDurumuToolStripMenuItem_Click(ByVal sender As  System.Object, ByVal e As System.EventArgs) Handles  PuanDurumuToolStripMenuItem.Click
        WebBrowser1.Navigate("http://forumtrwebtv.ucoz.com/forumtrwebtv/extra/puan.html")
    End Sub

    Private Sub İddiaProgramıToolStripMenuItem_Click(ByVal sender As  System.Object, ByVal e As System.EventArgs) Handles  İddiaProgramıToolStripMenuItem.Click
        WebBrowser1.Navigate("http://forumtrwebtv.ucoz.com/forumtrwebtv/extra/idda.html")
    End Sub

    Private Sub CanlıSonuçlarToolStripMenuItem_Click(ByVal sender As  System.Object, ByVal e As System.EventArgs) Handles  CanlıSonuçlarToolStripMenuItem.Click
        WebBrowser1.Navigate("http://forumtrwebtv.ucoz.com/forumtrwebtv/extra/canli.html")
    End Sub

    Private Sub DnsAyarıToolStripMenuItem_Click(ByVal sender As  System.Object, ByVal e As System.EventArgs) Handles  DnsAyarıToolStripMenuItem.Click
        WebBrowser1.Navigate("http://forumtrwebtv.ucoz.com/forumtrwebtv/yardim/dns.html")

    End Sub

    Private Sub ChatKullanımıToolStripMenuItem_Click(ByVal sender As  System.Object, ByVal e As System.EventArgs) Handles  ChatKullanımıToolStripMenuItem.Click
        WebBrowser1.Navigate("http://forumtrwebtv.ucoz.com/forumtrwebtv/yardim/chat.html")
    End Sub

    Private Sub SıkSorulanSorularToolStripMenuItem_Click(ByVal sender As  System.Object, ByVal e As System.EventArgs) Handles  SıkSorulanSorularToolStripMenuItem.Click
        WebBrowser1.Navigate("http://forumtrwebtv.ucoz.com/forumtrwebtv/yardim/soru.html")
    End Sub

    Private Sub ProgramıKapatToolStripMenuItem_Click(ByVal sender As  System.Object, ByVal e As System.EventArgs) Handles  ProgramıKapatToolStripMenuItem.Click
        End
    End Sub

    Private Sub AnaSayfaToolStripMenuItem_Click_1(ByVal sender As  System.Object, ByVal e As System.EventArgs) Handles  AnaSayfaToolStripMenuItem.Click
        WebBrowser1.Navigate("http://forumtrwebtv.ucoz.com/forumtrwebtv/anasayfa.html")

    End Sub

    Private Sub YayınAkışıToolStripMenuItem_Click(ByVal sender As  System.Object, ByVal e As System.EventArgs) Handles  YayınAkışıToolStripMenuItem.Click
        WebBrowser1.Navigate("http://forumtrwebtv.ucoz.com/forumtrwebtv/akis.html")
    End Sub

    Private Sub YasalUyarıToolStripMenuItem_Click(ByVal sender As  System.Object, ByVal e As System.EventArgs) Handles  YasalUyarıToolStripMenuItem.Click
        WebBrowser1.Navigate("http://forumtrwebtv.ucoz.com/forumtrwebtv/uyari.html")
    End Sub

    Private Sub YayınıYenileToolStripMenuItem_Click(ByVal sender As  System.Object, ByVal e As System.EventArgs) Handles  YayınıYenileToolStripMenuItem.Click
        WebBrowser1.Refresh()
    End Sub

    Private Sub AçToolStripMenuItem_Click(ByVal sender As System.Object,  ByVal e As System.EventArgs) Handles AçToolStripMenuItem.Click
        WebBrowser2.Show()
    End Sub

    Private Sub KapatToolStripMenuItem_Click_1(ByVal sender As  System.Object, ByVal e As System.EventArgs) Handles  KapatToolStripMenuItem.Click
        WebBrowser2.Hide()
    End Sub

    Private Sub YenileToolStripMenuItem_Click_1(ByVal sender As  System.Object, ByVal e As System.EventArgs) Handles  YenileToolStripMenuItem.Click
        WebBrowser2.Refresh()
    End Sub

    Private Sub TvKanallarıToolStripMenuItem_Click_1(ByVal sender As  System.Object, ByVal e As System.EventArgs) Handles  TvKanallarıToolStripMenuItem.Click
        WebBrowser1.Navigate("http://forumtrwebtv.ucoz.com/forumtrwebtv/tv.html")

    End Sub

    Private Sub RadyoKanallarıToolStripMenuItem_Click_1(ByVal sender As  System.Object, ByVal e As System.EventArgs) Handles  RadyoKanallarıToolStripMenuItem.Click
        WebBrowser1.Navigate("http://forumtrwebtv.ucoz.com/forumtrwebtv/radyo.html")
    End Sub

    Private Sub TivibuKanallarıToolStripMenuItem_Click(ByVal sender As  System.Object, ByVal e As System.EventArgs) Handles  TivibuKanallarıToolStripMenuItem.Click
        WebBrowser1.Navigate("http://forumtrwebtv.ucoz.com/forumtrwebtv/tivibu.html")
    End Sub
End Class
'Kodlar Çalınmaya Müsaittir. By AKIN BUYUR
 
WebTv Yapmak Kolay Zaten Gerekli Herşeyi Yapmış Olsan Bile Tvler Çalışmaz Çünkü Kanalların Olduğu Site Kapanmış Ve WebBrowser Yerine Windows Media Player Kullanıp MMS Adresiyle İşi Çözebilirsin Ama Programındaki Tvlerin Uzun Ömürlü Olmasını İstiyorsan Kendi Websiteni Açıp WebBrowser Kullanmalısın Ama Orası Biraz Uğraştırır.
 
usta bana özelden ulaşırmısın lütfen.. sitem var saten adam hazır yapmış kodları vermiş düzenlenmesi lazım ama vb bilgim yok işte
 
Bak kaptan Bu adam Tv programı yapmamıs sadece web broswer yapmıs ve butonlara site adresi ekleyerek kendi formunun reklamını yapmıs kodlarıda buyuzden vermis siz bu kodlarla islem yapptıkca kendisinin sitesini rankı artıcak soylüm bana mesaj at sana yardımcı olurum
 
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...

Şu an konuyu görüntüleyenler (Toplam : 0, Üye: 0, Misafir: 0)

Benzer konular

PatroeN
Kontrol Ediliyor Vb.net VS-2022 mobile2 global hile kodlama yardım
2
Cevaplar
9
Görüntüleme
4K
teambox
Replicant
  • Sabit
Altın Konu Visual Basic - Temel Kavram ve Tüm Detaylar
2
Cevaplar
5
Görüntüleme
2K
mum
esen4271
VB Projenize Güncelleme Sistemi Ekleme
Cevaplar
1
Görüntüleme
630
|herkul01|
L
  • Kilitli
Visual Basic Web Browser Yapimi
Cevaplar
1
Görüntüleme
1K
TRDuyqusaL
ßyMesMes
Visual Basic TrackBar ile Formu Saydamlaştırma
Cevaplar
0
Görüntüleme
583
ßyMesMes
Geri
Üst