Google Calendar API参会者与ConferenceData异常问题求助

问题描述 #

通过Google Calendar API创建Google Meet视频会议时遇到两个问题：

• 返回的ConferenceData为空，无法生成会议链接；
• 添加参会者时触发Forbidden错误，提示Service accounts cannot invite attendees without Domain-Wide Delegation of Authority，但已在Google Workspace中添加服务账号至域；不添加参会者时可正常创建日历事件。

相关VB.NET代码 #

Public Function createMeeting(meetInfo As Meetinfo) As IHttpActionResult
    Try
        ' 获取凭证并自动登录指定用户
        Dim credential As GoogleCredential = GetCredentials()

        ' 创建Google Calendar服务
        Dim calendarService As New CalendarService(New BaseClientService.Initializer() With {.HttpClientInitializer = credential, .ApplicationName = "xxxx"})

        ' 创建带Meet会议的日历事件
        Dim meetingEvent As New [Event] With {
            .Summary = meetInfo.meetingTitle,
            .Location = "Google Meet",
            .Description = meetInfo.meetingDescription,
            .ConferenceData = New ConferenceData() With {
                .CreateRequest = New CreateConferenceRequest() With {
                    .RequestId = Guid.NewGuid().ToString()
                }
            },
            .AnyoneCanAddSelf = True
        }

        Dim startTime As New EventDateTime()
        startTime.DateTime = meetInfo.meetingDate

        Dim endTime As New EventDateTime()
        endTime.DateTime = meetInfo.meetingDate.AddHours(1)

        meetingEvent.Start = startTime
        meetingEvent.End = endTime

        ' 添加参会者
        Dim attendeesList As New List(Of EventAttendee)()

        For Each attendee As String In meetInfo.attendees
            Dim attendeeObject As New EventAttendee()
            attendeeObject.Email = attendee

            attendeesList.Add(attendeeObject)
        Next

        meetingEvent.Attendees = attendeesList

        ' 插入日历事件
        Dim calendarId As String = ConfigurationManager.AppSettings("meetCalendarId")
        Dim request As EventsResource.InsertRequest = calendarService.Events.Insert(meetingEvent, calendarId)
        request.ConferenceDataVersion = 1
        'request.SendNotifications = True

        Dim result As [Event] = request.Execute()

        ' 获取Meet会议链接
        Dim meetLink As String = Nothing
        If result.ConferenceData IsNot Nothing Then
            For Each entryPoint In result.ConferenceData.EntryPoints
                If entryPoint.EntryPointType = "video" Then
                    meetLink = entryPoint.Uri
                    Exit For
                End If
            Next
        End If

        Return Ok(meetLink)

    Catch ex As Exception
        Return InternalServerError(ex)
    End Try
End Function

问题分析与解决方案 #

问题2：添加参会者触发Forbidden错误 #

错误提示明确说明服务账号需要**域范围委派（Domain-Wide Delegation of Authority）**才能邀请参会者，即使已将服务账号添加到域，还需完成以下步骤：

1. 在Google Workspace Admin控制台中，为服务账号启用域范围委派；
2. 授予服务账号Calendar API的相关权限（推荐使用https://www.googleapis.com/auth/calendar全权限，或按需选择更细粒度的权限）；
3. 关键：服务账号不能以自身身份操作，必须模拟域内的具体用户（比如某个Workspace邮箱）。修改GetCredentials方法，添加用户模拟逻辑：

Private Function GetCredentials() As GoogleCredential
    ' 替换为你的服务账号密钥文件路径
    Dim serviceAccountKeyPath = Server.MapPath("~/App_Data/service-account-key.json")
    ' 替换为域内需要模拟的用户邮箱
    Dim impersonatedUserEmail = "user@your-domain.com"

    Dim credential = GoogleCredential.FromFile(serviceAccountKeyPath)
        .CreateScoped(New String() {CalendarService.Scope.Calendar})
        .CreateWithUser(impersonatedUserEmail)
    
    Return credential
End Function

问题1：ConferenceData为空无会议链接 #

该问题大概率与服务账号未正确模拟用户有关：

• 服务账号自身没有创建Meet会议的权限，必须模拟域内用户才能生成Meet链接；
• 确保request.ConferenceDataVersion = 1已正确设置（代码中已设置，无需修改）；
• 检查calendarId是否为模拟用户的日历ID（比如用"primary"表示用户默认日历，或直接使用模拟用户的邮箱），避免使用服务账号自身的日历ID。

完成以上修改后，重新测试即可同时解决两个问题：正确生成Meet会议链接，且能正常添加参会者。

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