直到一个月前,我使用Rfacebook库没有任何问题。当我加载我生成的令牌时,我想使用一些函数,例如
getUsers("me",fb_oauth) #fb_oauth is my token
它给了我以下错误:
Error in callAPI(url = url, token = token) :
Error validating access token: Session has expired on Tuesday, 04-Apr-17 13:24:59 PDT. The current time is Tuesday, 02-May-17 06:33:21 PDT.
要尝试解决此问题,我会在应用中生成一个新密码并生成一个新令牌,然后我会正确获取新令牌:
fb_oauth <- fbOAuth(app_id="12345678", app_secret="xxxx")
Copy and paste into Site URL on Facebook App Settings: http://localhost:1410/
When done, press any key to continue...
Waiting for authentication in browser...
Press Esc/Ctrl + C to abort
Authentication complete.
但是当我想使用相同的功能时,它会给我错误
Error in callAPI(url = url, token = token) :
An access token is required to request this resource.
Also configure the login in the app but it does not work either 任何人都知道如何使用新的2.9更新生成新令牌?
此致
答案 0 :(得分:0)
正如CBroe所提到的,访问令牌返回格式已经改变,因此问题似乎是,在使用facebook授权时返回的凭证(包括访问令牌)被保存为字段名称/密钥而不是字段值。
所以解决这个问题的方法如下:
fb_oauth <- fbOAuth(app_id, app_secret, extended_permissions = FALSE,legacy_permissions = FALSE)
fb_oauth_credentials <- fromJSON(names(fb_oauth$credentials))
然后发出请求,例如获取页面;
fb_page <- getPage(page = "FBUserNameHere",
token = fb_oauth_credentials$access_token)