[VB.NET] Facebook spammer [TUT]

[FearOfTheDark^]

OK first thing is first you may not copy this to any other forum with out asking me first and with out a link back to this page or my profile on here !!



Ok here is my Facebook spammer tut what you will need is

1 button
1 web browser
3 text box
2 timer

ok in button1 we want to put the code below this will open facebook

webBrowser1.Navigate("http://www.facebook.com")

timer1.start()

Now in timer1 we want you to ad this code to log you in

if webbrowser1.readystate = webbrowser1.readystate.complete then

WebBrowser1.Document.GetElementById("email").SetAttribute("Value", txtbox1.Text)
WebBrowser1.Document.GetElementById("pass").SetAttribute("Value", txtbox2.Text)

Dim Belement As HtmlElementCollection = WebBrowser1.Document.All

For Each webbutton As HtmlElement In Belement

If webbutton.GetAttribute("value") = "Log in" Then

webbutton.InvokeMember("click")

Timer2.start()

timer1.stop()

end if

Ok now it should be logging you in now to find out if the page is loaded and then start the spam post

in timer2 put the code bellow

if webbrowser1.readystate = webbrowser1.readystate.complete then

if  WebBrowser1.Document.GetElementById("pagelet_stream_header").inertext.contains("News Feed") then

Dim htmlElements As HtmlElementCollection = WebBrowser1.Document.GetElementsByTagName("textarea")
 
For Each el As HtmlElement In htmlElements

If el.GetAttribute("name").Equals("xhpc_message") Then

el.SetAttribute("Value", txtbox3.Text)

Sendkeys.Send("{ENTER}")

End If

End If

End If

i have not tested this and just made it as i made this post with out having vb.net open or having any other tools open so if there are errors or anything please just post or tell me and i will look at them and fix then

note that this is basic and only uses the one account so will only spam the one wall i do have a more advanced version i made my self that uses proxys and diff acounts to multi spam but that will be posted in the future

I hope it all works ok and you like it is so please remember to rep me

[just.punish]

nice work!

[VampAurora]

Thanks for sharing

[yinkh2121]

NICE ONE