Automating Unfriending on Facebook
About a year ago I got pretty interested in selling products on Amazon. I attended a convention and found a lot of other “sellers” which i ended up automating connecting to on Facebook.
Unfortunately Facebook really restricts a lot of what you can do with your “friends” so I decided to go through and “unfriend” them. Here is a quick review of how I did this with AutoHotkey.
Here is the script I wrote to Automating Unfriending on Facebook
#SingleInstance,Force
Browser_Forward::Reload
Browser_Back::
;**************************************
Count:=0
Start:
Loop, {
If (Count>=3){
Notify("No more friends") ;http://www.autohotkey.net/~gwarble/Notify/
Break
}
Text:="|<Friends>*164$71.00000000000000000000000000000000000000000000000000000000000000000000000000000000000000T0k00600000Uk0000A00003VVvDDXts000C3v6nNgqM00Es66BynNj001nUAAP1an7U01y0MMqPBan001s0klbaNww001U00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000001"
if ok:=FindText(0,0,15000,15000,0,0,Text)
findText_Left_Click(Ok,X_Adj:=0,Y_Adj:=0,MoveBack:=0)
If !(OK){
Count++
SendPlay, {PgDn}
Sleep, 2000
Goto, Start
}
Sleep, 2000
Text:="|<Unfriend>*136$47.240U000E4/nebD6U8IGNFFH0EcYWyWW0VF9515412WG+++M1t4YHYHF"
if ok:=FindText(0,0,15000,15000,0,0,Text)
findText_Left_Click(Ok,X_Adj:=0,Y_Adj:=0,MoveBack:=0)
Sleep,2000
}
return
