邮政局Facebook自动

Question

我正在学习Autoit并且已经搜索了如下的UDF，期待人们帮助

＆＃13;

＆＃13;

Func FB_Post($Handle, $Content, $Pri = 0, $UID = False)
	Local $Post_pri[3] = ["300645083384735", "291667064279714", "286958161406148"], $data, $UserID = ($UID ? $UID : $Handle[1]), $Post_body, $Get_id
	If not IsArray($Handle) then Return SetError(1, 0, False)
	If $Pri < 0 Or $Pri > 2 or (not IsNumber($Pri)) Then $Pri = 0
	$data = "privacyx=" & ($UID ? "" : $Post_pri[$Pri]) & "&xhpc_targetid=" & $UserID &"&xhpc_message=" & _URIEncode($Content) & "&fb_dtsg=" & $Handle[2]
	$Post_body = _HttpRequest(2, "https://www.facebook.com/ajax/updatestatus.php",$data, $Handle[0], "https://www.facebook.com/profile.php?id=" & ($UID ? $UID :$Handle[1]))
	$Get_id = StringRegExp($Post_body, "top_level_post_id&quot;:&quot;(.*?)&quot;",3)
	If @error then Return SetError(2, 0, True)
	Return $Get_id[0]
EndFunc

＆＃13;

＆＃13;

＆＃13; Click Full Source