Reklam Tıklama Zorunluluğu - φǶ
Merhabalar Arkadaşlar Bugün Sizlere Bir Projeye Nasıl Zorunlu Olarak Reklam Eklersiniz Şimdi Size Onu Göstereceğim.
Öncelikle Üç Adet Form Oluşturalım Ve Bu Formlardan İlk'ine :
Button2'nin Enabled Değerini False Olarak Ayarlamalıyız.
1 Adet Label
1 Adet Timer
2 Adet Button
1 Adet Picture Box
1. Form İşlev = Anaform Yani Kullanıcının Uygulamayı Açtığı Anda Karşılaşacağı Form
2.Form İşlev = Reklam Aktifleştirme Form'u(İçinde WebBrowser Bulunan Form)
3.Form İşlev = Reklam Aktifleştirdikten Sonra Uygulamanın Yapacağı Asıl İşlev Olan Form
Daha Sonra Reklam Aktif Formuna Gelelim Yani İkinci Form'a Ve WebBrowser'a Sadece Bir Kez Tıklayıp Properties Kısmındaki Url Yerine Reklam Linkimizi Yapıştıralım.
İkinci Form'a Sadece WebBrowser Ekliyiceksiniz Ve Properties Kısmından Size Kısmını = 1366;768
ControlBox Kısmını = False Yapacaksınız.
Daha Sonrasında WebBrowser'ımıza İki Kere Tıklayıp Kod Bölümüne Gelelim Ve Şu Kodu Yazalım.
WebBrowser1_********Completed
Olan Yer Kod Bölümümüz.
Öncelikle Üç Adet Form Oluşturalım Ve Bu Formlardan İlk'ine :
Button2'nin Enabled Değerini False Olarak Ayarlamalıyız.
1 Adet Label
1 Adet Timer
2 Adet Button
1 Adet Picture Box
1. Form İşlev = Anaform Yani Kullanıcının Uygulamayı Açtığı Anda Karşılaşacağı Form
2.Form İşlev = Reklam Aktifleştirme Form'u(İçinde WebBrowser Bulunan Form)
3.Form İşlev = Reklam Aktifleştirdikten Sonra Uygulamanın Yapacağı Asıl İşlev Olan Form
Daha Sonra Reklam Aktif Formuna Gelelim Yani İkinci Form'a Ve WebBrowser'a Sadece Bir Kez Tıklayıp Properties Kısmındaki Url Yerine Reklam Linkimizi Yapıştıralım.
İkinci Form'a Sadece WebBrowser Ekliyiceksiniz Ve Properties Kısmından Size Kısmını = 1366;768
ControlBox Kısmını = False Yapacaksınız.
Daha Sonrasında WebBrowser'ımıza İki Kere Tıklayıp Kod Bölümüne Gelelim Ve Şu Kodu Yazalım.
WebBrowser1_********Completed
Olan Yer Kod Bölümümüz.
Kod:
If WebBrowser1.Url.ToString = "https://www.youtube.com/" Then Form1.PictureBox.BackColor = Color.Lime Me.Close() End If
Buraya Yazdığım https://youtube.com Olan Yer Reklamı Geç Dedikten Sonra Gidilecek Yerdir.
AnaFormumuza Giriş Yapıp Timer1'in Enabled Değerini True Yapalım Başka Bir Şeye Dokunmamıza Gerek Yok (Interval 100 Olarak Kalabilir)
Timer1.Tick Kodları :
Kod:
İf PictureBox.Backcolor = Color.Lime Then Button2.Enabled = True End İf
Kod:
Form3.Show()