Quantcast
Channel: AutoIt v3 - General Help and Support
Viewing all articles
Browse latest Browse all 12506

Twitter follower broke with API 1.1 getting 410 error

$
0
0
Hello all
Having some issues with v1.1 Twitter API.
I ported old UDF and after 3 successful follows I get 410 error.
It is always 3 successes and then 410

Need help figuring out why and how to fix it
Thanks
p.s. you need to authorize your account via www.supertweet.net


Global $twYourScreenName =""
Global $stwYourPassword =""
Global $oXMLRequest=0;

Func SuperTweet_Follow($twScreenName, ByRef $LimitExceeded)
$oXMLRequest = ObjCreate("WinHttp.WinHttpRequest.5.1")
	If $oXMLRequest = 0 Then  SetError(1, 1, 0)
	Local $SupTweetUrl = "http://api.supertweet.net/1.1/friendships/create.json";
Local $sLogin = _Base64Encode($twYourScreenName & ":" & $stwYourPassword)
$oXMLRequest.Open("POST", $SupTweetUrl, False)
$oXMLRequest.setRequestHeader("Content-Type", "application/x-www-form-urlencoded")
$oXMLRequest.setRequestHeader("Authorization", "Basic " & $sLogin)
$sData=StringFormat("screen_name=%s&follow=true",$twScreenName) ;
$oXMLRequest.send($sData)
	$Status=$oXMLRequest.status;
ConsoleWrite($oXMLRequest.ResponseText);
$oXMLRequest=0;
If $Status <> 200 Then SetError(2, 2, 0)
if $Status =401 then MsgBox(0,"Username/password","Check your Username or Password for user:"&$twYourScreenName,5);
if $Status =403 then $LimitExceeded=True;

 
Return $Status;
EndFunc


Viewing all articles
Browse latest Browse all 12506

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>