Skip to main content
cancel
Showing results for 
Search instead for 
Did you mean: 

Grow your Fabric skills and prepare for the DP-600 certification exam by completing the latest Microsoft Fabric challenge.

Reply
TomMartens
Super User
Super User

connect to Power BI Service using R

Hey for quite some time I'm trying to connect to the Power BI Servvice using the R package httr. Until now without any success.

 

I'm trying to get an access token for further use ...

 

Currently my R code looks like this

library("httr");
library("httpuv")


powerbi.urls <- oauth_endpoint(
NULL,  
"authorize",  
"token",
base_url = "https://login.windows.net/common/oauth2")

powerbi.app <- oauth_app(
"myAppName",
key="myClientID", 
secret="myClientSecret"
)

powerbi.token <- oauth2.0_token(powerbi.urls, powerbi.app)
powerbi.token

The package httpuv is just used to provide a local web server using port 1410.

 

I used this page

https://dev.powerbi.com/apps?type=web

to create a client-id and a client-secret for a web-app "myAppname".

 

I'm aware of the documentation how to connect to the Power BI Service and also aware of this site

https://www.codeproject.com/tips/1042542/connecting-to-power-bi-rest-api-from-a-service-i-e

 

But I'm not able to translate the C# examples to the proper parameter for the httr functions.

 

I'm able to connect to linkedin and git using httr, but not to the Power BI Service

 

For this reason, any help is much appreciated, even direct comments like

  • This will never work, due to ...
  • Stupid you, just do this ...


Did I answer your question? Mark my post as a solution, this will help others!

Proud to be a Super User!
I accept Kudos 😉
Hamburg, Germany
1 ACCEPTED SOLUTION
TomMartens
Super User
Super User

Ha, if you think a little longer and then you change your code a little and it works Smiley Very Happy

 

library("httr");
library("httpuv")

# 
#oauth_endpoints("azure")
powerbi.urls <- oauth_endpoint(  
"authorize",  
"token",
base_url = "https://login.windows.net/common/oauth2")

powerbi.app <- oauth_app(
"myAppName",
key="myClientID", 
secret="myClientSecret"
)

powerbi.token <- oauth2.0_token(powerbi.urls, powerbi.app,
                          user_params = list(resource = "https://analysis.windows.net/powerbi/api"),
                          use_oob = FALSE)


Did I answer your question? Mark my post as a solution, this will help others!

Proud to be a Super User!
I accept Kudos 😉
Hamburg, Germany

View solution in original post

2 REPLIES 2
TomMartens
Super User
Super User

Ha, if you think a little longer and then you change your code a little and it works Smiley Very Happy

 

library("httr");
library("httpuv")

# 
#oauth_endpoints("azure")
powerbi.urls <- oauth_endpoint(  
"authorize",  
"token",
base_url = "https://login.windows.net/common/oauth2")

powerbi.app <- oauth_app(
"myAppName",
key="myClientID", 
secret="myClientSecret"
)

powerbi.token <- oauth2.0_token(powerbi.urls, powerbi.app,
                          user_params = list(resource = "https://analysis.windows.net/powerbi/api"),
                          use_oob = FALSE)


Did I answer your question? Mark my post as a solution, this will help others!

Proud to be a Super User!
I accept Kudos 😉
Hamburg, Germany

Hi @TomMartens,

 

I've tried this approach with the same R code, but I'm receiving a below error in a browser:

Sign in
Sorry, but we’re having trouble signing you in.

AADSTS50011: The reply url specified in the request does not match the reply urls 
configured for the application: 'value for clientID'.

Is it working today from your side?

 

Regards,

Ruslan

Helpful resources

Announcements
RTI Forums Carousel3

New forum boards available in Real-Time Intelligence.

Ask questions in Eventhouse and KQL, Eventstream, and Reflex.

MayPowerBICarousel1

Power BI Monthly Update - May 2024

Check out the May 2024 Power BI update to learn about new features.

Top Solution Authors