mybb etiketine sahip kayıtlar gösteriliyor. Tüm kayıtları göster

3 Mart 2018 Cumartesi

VB.Net Mybb Konu Botu [Kaynak kod ve Proje!]


Merhaba arkadaşlar bugün sizlere Mybb'de nasıl konu botu yapılır ondan bahsedicem.

İlk olarak kendinize bir proje açın.
Projenize altta bulunanları ekleyin;
Textbox1.Text [Konu başlık burada olucak]
Textbox2.Text [Konu içerik burada olucak]
Textbox3.Text [Konu açılacak link Örnek : http://localhost/mybb/newthread.php?fid=2]
Button 1 [Konu içerik ve başlık rasgele sayı kasımı başlat]
Button 2 [Botu Başlat]
Button 3 [Konuya git]
Timer 1 [İçerik kasılacak yer]
Timer 2 [Konu kasılacak yer]
Timer 3 [Konu linkine tekrar gidicek yer]
WebBrowser1 [Konu kasımı için] ve WebBrowser1'de ScriptErrorsSuppressed = True yapalım.
Şimdi ise kodları yazın.
Button 1 ;
timer1.start()
Button 3;
WebBrowser1.Navigate(TextBox3.Text)
Button 2;
Timer2.Start()
Timer1 ;
Dim i As Integer
i = Int(Rnd(1) * (100000000))
Dim i2 As Integer
i2 = Int(Rnd(1) * (100000000))
TextBox1.Text = i
TextBox2.Text = i2
timer2 [Interval = 600];
Try
WebBrowser1.Document.GetElementById("subject").SetAttribute("value", TextBox2.Text)
WebBrowser1.Document.GetElementById("message").InnerText = TextBox1.Text
WebBrowser1.Document.GetElementById("submit").InvokeMember("click")
Timer3.Start()
Catch ex As Exception
End Try
Timer3 [Interval = 800];
WebBrowser1.Navigate(TextBox3.Text)
İşlemimiz bitmiştir. Şimdi konu kasmaya başlayabilirsiniz.
İstek video isterseniz YouTube veya bu konu altına yorum olarak belirtirseniz elimden geldiğince yardımcı olacağım. 
İyi günler...

Kaynak proje için Tıkla

21 Şubat 2018 Çarşamba

Mybb Yorum Botu Yapılışı [VB.NET]

Merhaba arkadaşlar bugün sizlere Visual basic ile Mybb'de yorum botu nasıl yapılır onu göstericem.

Mybb bir forum scriptidir. Üyeler konu açıp yararlı paylaşımlar veya tartışma konuları paylaşabiliyorlar. Bugün sizlere Mybb'de hızlı yorum nasıl kasılır onu göstericem.






- İlk olarak kendinize bir proje oluşturun.
- Sonra oluşturduğunuz Forma 2 Adet Label 2 Adet Textbox 3 Adet Button ve 1 Adet Webbrowser ekleyin.
- Ardından vereceğim kodları projenize ekleyin.



Button1 (Konuya Git);
Webbrowser1.navigate(textbox1.text)



Button2 (Rasgele sayı kasma);
timer2.start()



Button3 (Botu Başlatma);
timer1.start()



Button4 (Botu Durdurma);
timer1.stop()
timer2.stop()



Timer1;
 WebBrowser1.Document.GetElementById("message").SetAttribute("value", TextBox2.Text)

        WebBrowser1.Document.GetElementById("quick_reply_submit").InvokeMember("click")



Timer2;
dim i as integer
i = int(Rnd(1) * (100000000))

textbox2.text = i



Bunları yaptıktan sonra kendi forumunuza istediğiniz kadar yorum kastırabilirsiniz.



Ek olarakda projenize kendiniz 5-10 tane konuya yorum yaptıran bir sistem yapabilirsiniz. Aynı mantıkla kopyala yapıştır mantığı ile veya 5-10 tane programı açıp yaptırabilirsiniz.

Kaynak Dosya

Yedek Link


b2b yazılım vois media