Merhaba arkadaşlar benim 4 hafta yapıpda paylaşmadığım ask.fm soru botu yapımı .
Buda video tıkla
Sor
Private Sub Command1_Click()
WebBrowser1.********.All.Item("profile-input").Value = Text2.Text '
WebBrowser1.********.All.Item("question_submit").Click
WebBrowser2.********.All.Item("profile-input").Value = Text3.Text
WebBrowser2.********.All.Item("question_submit").Click
MsgBox "Soru gönderildi ", vbCritical + vbOKOnly, ("Başarılı")
End Sub
***** ' lar D o c u m e n t oluyor
Bağlan
Private Sub Command2_Click()
WebBrowser1.Navigate ("http://www.ask.fm/") + Text1.Text
WebBrowser2.Navigate ("http://www.ask.fm/") + Text1.Text
MsgBox ("Url bağlanıldı"), vbCritical + vbOKOnly, ("Başarılı")
Buda video tıkla
Sor
Private Sub Command1_Click()
WebBrowser1.********.All.Item("profile-input").Value = Text2.Text '
WebBrowser1.********.All.Item("question_submit").Click
WebBrowser2.********.All.Item("profile-input").Value = Text3.Text
WebBrowser2.********.All.Item("question_submit").Click
MsgBox "Soru gönderildi ", vbCritical + vbOKOnly, ("Başarılı")
End Sub
***** ' lar D o c u m e n t oluyor
Bağlan
Private Sub Command2_Click()
WebBrowser1.Navigate ("http://www.ask.fm/") + Text1.Text
WebBrowser2.Navigate ("http://www.ask.fm/") + Text1.Text
MsgBox ("Url bağlanıldı"), vbCritical + vbOKOnly, ("Başarılı")

