Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
Olá pessoal,
Vi alguns topicos, copiei alguns códigos e nada, não consegui acessar o facebook da minha aplicação.
Bem, o que pretendo fazer:
Alguém pode me ajudar? só encontrei exemplos nas novas api's em php, e realmente não é a minha praia... vi algo sobre stream graph, mas nada de concreto, até mesmo os endereços que encontrei para gerar o token não consegui acessar, nem tão pouco o wiki de desenvolvedores (se é que ainda existe, pois vi em um post mais antigo)...
Desde já obrigado aos que puderem ajudar...
sds
Olá xanburzum, obrigado pela resposta, mas este conteúdo eu já havia salvo de um post seu anterior, mas me parece (pelo que li) que a api deles agora é outra... mas como sou leigo em chamada de classes, tem algum exemplo da chamada desta classe?
sds
Estou a precisar do mesmo...
entra no site no facebook m API em baixa a nova então
bom, só quis informar o que já havia tentando... tudo bem... vou tentar fazer isso...
sds
Encontrei uma aplicação que faz isso, http://www.rssgraffiti.com/ , você informa uma rss com o conteúdo que quer e ele publica no mural, só ainda não consegui foi pôr a funcionar, mas tente você...
Eu fiz um mês passado, vou organizar e colocar no fórum para a galera acessar
Olá a todos, obrigado pela ajuda, assim que fizer os testes posto aqui, infelizmente surgiu um imprevisto e não poderei realizá-los antes do dia 20/09... obrigado mais uma vez...
sds
Ted ficou simples e muito funcional seu code.
Olá. To fazendo a conexão com base no seu exemplo, so to usando o FB.init com um reload, ele faz a autorização certinho, mais no retorno, não consigo pegar o user.id para gravar na minha base. Não tem nada no token.
Na minha página para o usuário logar, está assim.
<div align="center"><fb:login-button perms="email,offline_access,publish_stream"></fb:login-button></div>
<div id="fb-root"></div>
<script src="http://connect.facebook.net/pt_BR/all.js"></script>
<script> cookie: true, xfbml: true});
FB.Event.subscribe('auth.login', function(response) {
window.location.reload();
});
</script>A função para pegar o token está assim, mas não vem nada no token.
<%
main
Function main
Dim strJSON
Dim URL
Dim sToken
Dim user
Dim loc
set cookie = get_facebook_cookie( FACEBOOK_APP_ID, FACEBOOK_SECRET )
Response.Write cookie.count
if cookie.count > 0 then
response.write "Logado... Ok! <br/>"
sToken = cookie("access_token")
url = "https://graph.facebook.com/me?access_token=" & sToken
strJSON = get_page_contents(URL)
set user = JSON.parse(strJSON)
response.write cookie("access_token")
end if
End Function
%>
ele esta gerando algum erro ?
Na verdade o cookie.count vem como 0. Ai não entra no IF. Tudo parece estar certinho, faço toda a autorização, ele da refresh na página, mais o cookie vem 0.
cookie("access_token") tb não vem nada.
To ficando louco, vesgo, tudo que tem direito, e isso nao sai.
os parametros na função esta vindo normal?
FACEBOOK_APP_ID, FACEBOOK_SECRET
Sim esses 2 parametros estao OK. Eles sao passados na funcao. Cara, deve ser alguma besteira como sempre..rss
você tem como testar esse codigo?
vou testá-lo, vamos ver
Conseguiu?
olha este exemplo
<%
CONST REST_URI = "http://api.facebook.com/restserver.php"
CONST FB_PARAM_PREFIX = "fb_sig"
CONST FB_API_VERSION = "1.0"
Class FaceBook
Public SecretKey
Public ApiKey
Public SessionKey
Public Property Get InCanvas
InCanvas = (Request(FB_PARAM_PREFIX & "_in_canvas") = "1")
End Property
Public Property Get ApplicationInstalled
ApplicationInstalled = (Request(FB_PARAM_PREFIX & "_added") = "1")
End Property
Public Property Get UserID
UserID = Request(FB_PARAM_PREFIX & "_user")
End Property
Public Function CallApiMethod(strMethod, oParams)
oParams("method") = strMethod
Dim oXMLHTTP
Set oXMLHTTP = Server.CreateObject("MSXML2.ServerXMLHTTP")
oXMLHTTP.Open "GET", GenerateRequestURI(oParams), False
oXMLHTTP.Send()
Set CallApiMethod = oXMLHTTP.ResponseXml
End Function
Public Sub Redirect(strURI)
%>
<fb:redirect url="<%= strURI %>" />
<%
End Sub
Public Function ErrorMessage(strMsg)
ErrorMessage = "<fb:error message=""" & strMsg & """ />"
End Function
Public Function SuccessMessage(strMsg)
SuccessMessage = "<fb:success message=""" & strMsg & """ />"
End Function
Public Function RequireInstall()
If (Request.Form("fb_sig_added") = "0") Then
%>
<fb:redirect url="http://www.facebook.com/apps/application.php?api_key=<%= ApiKey %>" />
<%
End If
End Function
Public Function SetRefHandle(handle, fbml)
Dim oParams
Set oParams = Server.CreateObject("Scripting.Dictionary")
oParams.Add "handle", handle
oParams.Add "fbml", fbml
Set SetRefHandle = CallApiMethod("facebook.fbml.setRefHandle", oParams)
End Function
Public Function SetProfileFBML(uid, fbml)
Dim oParams
Set oParams = Server.CreateObject("Scripting.Dictionary")
oParams.Add "markup", fbml
If (Not IsNull(uid)) Then oParams.Add "uid", uid
Set SetProfileFBML = CallApiMethod("facebook.profile.setFBML", oParams)
End Function
Function FQLQuery(query)
Dim oParams
Set oParams = Server.CreateObject("Scripting.Dictionary")
oParams.Add "query", query
Set FQLQuery = CallApiMethod("facebook.fql.query", oParams)
End Function
Public Sub IncludeCSS(strPath)
Dim oFSO
Set oFSO = Server.CreateObject("Scripting.FileSystemObject")
If (oFSO.FileExists(Server.MapPath(strPath))) Then
Dim oFile
Set oFile = oFSO.OpenTextFile(Server.MapPath(strPath))
%>
%>