使用Microsoft365R访问共享邮箱遇HTTP 403权限不足问题求助

问题场景 #

尝试通过企业Outlook账户，使用Microsoft365R的get_business_outlook函数访问已拥有读写权限的共享邮箱，初始代码如下：

library(Microsoft365R)

tenant_id <- "example_tenant_id"
email <- "example@example.co.uk"

outl <- get_business_outlook(tenant_id, shared_mbox_email = email)

报错详情 #

• 首次运行输出：

Using authorization_code flow
Creating Microsoft Graph login for tenant 'example_tenant_id'
Using authorization_code flow
Waiting for authentication in browser...
Press Esc/Ctrl + C to abort
Authentication complete.
Error in process_response(res, match.arg(http_status_handler), simplify) :
Forbidden (HTTP 403). Failed to complete operation. Message:
Insufficient privileges to complete the operation.

• 后续直接报错：

Error in process_response(res, match.arg(http_status_handler), simplify) :
Forbidden (HTTP 403). Failed to complete operation. Message:
Insufficient privileges to complete the operation.

• 添加app参数后依旧报错：

app_id <- "example_app_id"

outl <- get_business_outlook(tenant_id, shared_mbox_email = email, app = app_id)

Loading Microsoft Graph login for tenant 'example_tenant_id'
Error in process_response(res, match.arg(http_status_handler), simplify) :
Forbidden (HTTP 403). Failed to complete operation. Message:
Insufficient privileges to complete the operation.

其他尝试及问题 #

尝试手动获取token时遇到两种问题：

1. 不含resource参数的token调用报错：

library(AzureAuth)
tok <- get_azure_token("", tenant=tenant_id, app=app_id)

Using authorization_code flow
Loading cached token

outl <- get_business_outlook(tenant_id, shared_mbox_email = email, app = app_id, token = tok)

Error: Could not find Graph host URL

2. 指定错误resource导致登录后显示“Not found”：

resource <- "https://graph.microsoft.com/Mail.ReadWrite.Shared"
tok <- get_azure_token(resource, tenant=tenant_id, app=app_id)

解决方案 #

1. 配置Azure AD应用的正确权限 #

登录Azure门户，找到目标应用注册：

• 进入API权限 > 添加权限 > 选择Microsoft Graph > 委托权限
• 添加以下必要权限（按需选择，至少覆盖共享邮箱读写需求）：
  • Mail.ReadWrite.Shared
  • Mail.ReadWrite
  • MailboxSettings.ReadWrite
• 点击授予管理员同意（需租户管理员操作，否则权限无法生效）

2. 正确获取Graph Token #

get_azure_token的resource参数需指定Graph API根地址，而非具体权限路径：

library(AzureAuth)
# 正确的resource为Graph API根URL
tok <- get_azure_token("https://graph.microsoft.com", tenant=tenant_id, app=app_id)

3. 调用get_business_outlook的正确方式 #

使用有效token或确保权限配置完成后直接调用：

library(Microsoft365R)

tenant_id <- "example_tenant_id"
email <- "example@example.co.uk"
app_id <- "example_app_id"

# 方式1：使用预先获取的token
outl <- get_business_outlook(tenant_id, shared_mbox_email = email, app = app_id, token = tok)

# 方式2：直接调用自动完成认证（需权限已配置完成）
outl <- get_business_outlook(tenant_id, shared_mbox_email = email, app = app_id)

关键说明 #

• 403错误核心原因是应用缺少足够的Graph API权限，必须确保管理员已同意所需权限
• get_azure_token的resource参数必须是Graph根URL，权限是在应用注册阶段配置，而非通过resource指定
• 若仍报错，检查当前登录用户是否确实拥有共享邮箱读写权限，以及应用权限是否正确添加并完成同意

内容的提问来源于stack exchange，提问作者joewozza