无法通过Outlook VBA向Google发送OAuth 2.0令牌，请求排查

核心错误点 #

你在API请求URL中直接将OAuth 2.0客户端ID填入了access_token参数位置——客户端ID≠访问令牌，Google Calendar API要求的access_token必须通过完整的OAuth2授权流程获取，不能直接用客户端ID替代。

修正步骤 #

• 完成OAuth2授权流程获取有效令牌
  使用你的客户端ID和客户端密钥，通过Authorization Code Flow完成授权：

  1. 引导用户在浏览器中授权你的应用访问Google日历，获取授权码；
  2. 用授权码调用Google的token端点，兑换得到access_token（有效期约1小时）和refresh_token（用于刷新过期的access_token）。

• 修正API请求URL
  将URL中的<my OAuth 2.0 client id>替换为实际获取到的access_token值，而非客户端ID。

• 验证请求JSON格式
  确保Json变量符合Google Calendar API的事件结构要求，必填字段至少包含summary（事件标题）、start和end（时间区间），示例结构：

  {
    "summary": "团队会议",
    "start": {
      "dateTime": "2024-05-20T09:00:00+08:00"
    },
    "end": {
      "dateTime": "2024-05-20T10:00:00+08:00"
    }
  }
  

• 增加错误处理逻辑
  在VBA代码中添加HTTP状态码校验，便于快速定位问题：

  Dim sReturn As String
  sReturn = httpCall.responseText
  If httpCall.Status <> 200 Then
      MsgBox "请求失败：" & vbCrLf & "状态码：" & httpCall.Status & vbCrLf & "返回信息：" & sReturn
  End If
  

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