向 google 日历添加活动时出错 - 权限不足

Question

我正在尝试使用 .Net 控制台应用程序作为客户端将事件添加到 google 日历。我收到以下错误。

Google.Apis.Requests.RequestError Insufficient Permission [403] Errors [ Message[Insufficient Permission] Location[ - ] Reason[insufficientPermissions] Domain[global] ]

在线

    service.Events.Insert(newEvent, "primary").Execute()

这是我的代码

    Dim Scopes As String() = {CalendarService.Scope.CalendarReadonly}
    Dim ApplicationName As String = "Google Calendar API .NET Quickstart"
    Dim credential As UserCredential
    Using stream = New FileStream("client_secret.json", FileMode.Open, FileAccess.Read)
        Dim clientSecrets = GoogleClientSecrets.Load(stream).Secrets
        Dim credPath As String = System.Environment.GetFolderPath(System.Environment.SpecialFolder.Personal)
        credPath = Path.Combine(credPath, "D:/calendar-dotnet-quickstart.json")
        Dim dataStore = New FileDataStore(credPath, True)
        credential = GoogleWebAuthorizationBroker.AuthorizeAsync(clientSecrets, Scopes, "admin", CancellationToken.None, dataStore).Result
        Console.WriteLine("Credential file saved to: " & credPath)
    End Using

    Dim service = New CalendarService(New BaseClientService.Initializer() With {.HttpClientInitializer = credential, .ApplicationName = ApplicationName})

    Dim newEvent As New Google.Apis.Calendar.v3.Data.Event()
    Dim startDate As New EventDateTime
    Dim endtDate As New EventDateTime
    Dim scope =
    startDate.DateTime = DateTime.Now.AddHours(2)
    endtDate.DateTime = DateTime.Now.AddHours(5)

    newEvent.Summary = "XYZ reminder"
    newEvent.Description = "Please contact dcsdc@cdscs.ss"
    newEvent.Start = startDate
    newEvent.End = endtDate
    newEvent.Id = "1122"


    Try
        service.Events.Insert(newEvent, "primary").Execute() 'Error here
    Catch ex As Exception
        Console.WriteLine(ex.Message & Environment.NewLine & ex.StackTrace)
    End Try

但是我能够读取使用

手动创建的事件

Dim request As EventsResource.ListRequest = service.Events.List("primary")

也试过

在 AuthorizeAsync 中设置 "user"。
在 service.Events.Insert
设置范围为Dim Scopes As String() = {CalendarService.Scope.Calendar}

Answer 1

问题是你的范围。

Dim Scopes As String() = {CalendarService.Scope.CalendarReadonly}

您可以阅读，因为您的范围是 CalendarReadonly。

但是，要执行插入事件等写入操作，您需要使用 read/write:

Authorization

此请求需要以下范围的授权（阅读有关身份验证和授权的更多信息）。

范围

https://www.googleapis.com/auth/calendar

如果在您更改范围时它不起作用，请记住 .NET Quickstart 评论所说的内容：

// If modifying these scopes, delete your previously saved credentials // at ~/.credentials/calendar-dotnet-quickstart.json

您修改了范围，您需要删除之前保存的凭据以使新范围生效。

向 google 日历添加活动时出错 - 权限不足

Error while adding event to google calendar - Insufficient Permission

.net

asp.net

google-calendar-api