2017-10-10 134 views
-1

我正在嘗試從「idealista」(link)的API發出請求。無法從GET請求R到idealista API

它需要認證,所以我所做的就是下一個:

if(!require("jsonlite")){install.packages("jsonlite")} 
if(!require("httr")){install.packages("httr")} 

consumer_key <- "my_key" 
consumer_secret <- "my_secret" 

#Use basic auth 
secret <- jsonlite::base64_enc(paste(consumer_key, consumer_secret, sep = ":")) 
req <- httr::POST("https://api.idealista.com/oauth/token", 
        httr::add_headers(
        "Authorization" = paste("Basic", gsub("\n", "", secret)), 
        "Content-Type" = "application/x-www-form-urlencoded;charset=UTF-8" 
       ), 
        body = "grant_type=client_credentials" 
) 


#Extract the access token 
token <- paste("Bearer", jsonlite::base64_enc(httr::content(req)$access_token)) 

因此,首先:我不知道,如果令牌必須是base64編碼(我認爲是)。而我下面提個要求:

url<-"https://api.idealista.com/3.5/es/search?locale=es&maxItems=20&numPage=1&operation=sale&order=publicationDate&propertyType=garages&apikey=my_key&t=1&language=es&bankOffer=true" #an example of url (needs apikey) 
req <- httr::GET(url, httr::add_headers("Authorization" = token)) 

和響應是:

Response [https://api.idealista.com/3.5/es/search?locale=es&maxItems=20&numPage=1&operation=sale&order=publicationDate&propertyType=garages&apikey=80gzxznozajnl3tf30ite86k1p24e4yb&t=1&language=es&bankOffer=true] 
    Date: 2017-10-10 15:25 
    Status: 400 
    Content-Type: text/html 
    Size: 4.4 kB 
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/T... 
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="es_ES" lang="es_ES"> 
<head> 

       <title>idealista.com : pisos madrid, pisos barcelona, pisos v... 
       <meta http-equiv="content-Type" content="text/html; charset=I... 
       <meta http-equiv="Expires" content="0"/> 
       <meta name="Pragma" content="no-cache"/> 
       <meta http-equiv="pragma" content="no-cache"/> 
       <meta http-equiv="cache-control" content="no-cache, mustreval... 
... 

它沒有意義。你能告訴我我做得不好嗎? 我收到的狀態碼是「400」,我不知道我必須做什麼。

在此先感謝。

+0

這似乎完全特定於idealista.com API。你應該聯繫他們尋求支持。或者至少在他們的API文檔的相關部分提供一個鏈接。你真的想添加兩個授權標題嗎? – MrFlick

回答

2

我發現蟒蛇類似的問題,這是在這個link

第一部分(認證)解決是確定的,但第二個是錯誤的。另外,我也嘗試了其他網址,並且令牌不需要base64編碼。

token <- paste("Bearer", httr::content(req)$access_token) 

url<-"http://api.idealista.com/3.5/es/search?center=40.42938099999995,-3.7097526269835726&country=es&maxItems=50&numPage=1&distance=452&propertyType=homes&operation=sale" 
req <- httr::POST(url, httr::add_headers("Authorization" = token)) 

正如你所看到的,我用的是功能「GET」,但看着上面提到的Python代碼,我用「POST」和它的工作!

我不知道爲什麼在我做請求時使用POST函數,但API的工作原理是這樣的。