Se requieren credenciales para conectarse a la fuente web. Deberá actualizar y proporcionar credenciales para continuar. (Fuente en https://login.microsoftonline.com/**************************/oauth2/v2.0/token.)
Estaba siguiendo la guía para usar Graph API con Power BI y todo funcionaba bien hasta este paso en el que obtengo un token y lo paso a través de M en PowerBI Desktop https://docs.microsoft.com/en-us/ power-query / samples / mygraph / readme # implementando-la-interfaz-oauth
No estoy seguro de cómo superar este problema, ya que no puedo resolver el error.
Voy a iniciar sesión con Anónimo como se indica, pero simplemente arroja el error después de eso:
Aquí está la consulta M que estoy usando, ¿tal vez estoy cometiendo un error allí?
————-
dejar
client_id = «** myclientID ***»,
redirect_uri = «https://login.microsoftonline.com/common/oauth2/nativeclient»,
token_uri = «https://login.microsoftonline.com/*****tenant*****/oauth2/v2.0/token»,
authorize_uri = «https://login.microsoftonline.com/****tenant*****/oauth2/v2.0/authorize»,
logout_uri = «https://login.microsoftonline.com/logout.srf»,
scope_prefix = «https://graph.microsoft.com/»,
alcances = {
«User.Read.All»,
«Directory.Read.All»,
«Organización. Leer.todos»
},
Value.IfNull = (a, b) => si a <> null entonces a else b,
GetScopeString = (ámbitos como lista, scopePrefix opcional como texto) como texto =>
dejar
prefijo = Value.IfNull (scopePrefix, «»),
addPrefix = List.Transform (ámbitos, cada prefijo & _),
asText = Text.Combine (addPrefix, «»)
en
asText,
authorizeUrl = authorize_uri & «?» & Uri.BuildQueryString ([
client_id = client_id,
redirect_uri = redirect_uri,
scope = GetScopeString(scopes, scope_prefix),
response_type = «code»,
response_mode = «query»,
login = «login»
]),
tokenResponse = Web.Contents (token_uri, [
Content = Text.ToBinary(Uri.BuildQueryString([
client_id = client_id,
code = «****token I get back manually****»,
scope = GetScopeString(scopes, scope_prefix),
grant_type = «authorization_code»,
redirect_uri = redirect_uri])),
Encabezados = [
#»Content-type» = «application/x-www-form-urlencoded»,
#»Accept» = «application/json»
],
ManualStatusHandling = {400}
]),
cuerpo = Json.Document (tokenResponse),
resultado = si (Record.HasFields (body, {«error», «error_description»})) entonces
error Error.Record (cuerpo[error], cuerpo[error_description], cuerpo)
demás
cuerpo
en
resultado
******************
Creo que estoy fallando aquí en rojo:
