Как автоматически принимать запросы друзей Skype в VB.NET с помощью Skype4COMLib?

Привет всем, поэтому я пытаюсь автоматически принимать запросы на добавление в друзья в моем Skype, используя VB.NET и Skype4COMLib, но я получаю эту ошибку:

Private Sub oskype_userauthorizationrequestreceived(pUser As SKYPE4COMLib.User)» не может обработать событие «Public Event UserAuthorizationRequestReceived(sender As Object, e As AxSKYPE4COMLib._ISkypeEvents_UserAuthorizationRequestReceivedEvent)», поскольку у них нет совместимой подписи.

Код:

 Private Sub oskype_userauthorizationrequestreceived(pUser As User) Handles oSkype.UserAuthorizationRequestReceive 
    If MaterialCheckBox7.Checked = True And pUser.IsAuthorized = False Then
        pUser.IsAuthorized = True
    End If
End Sub

Я не могу решить эту проблему, я хочу, чтобы он принимал запросы на добавление в друзья всякий раз, когда я устанавливаю флажок, и отключал автоматический прием запросов всякий раз, когда я снимаю флажок.

Любая помощь приветствуется, спасибо.


person Daniel André    schedule 04.07.2016    source источник


Ответы (1)


Извините за поздний ответ, но сообщение об ошибке на самом деле очень ясное.

Ваша подписка на мероприятие в настоящее время выглядит следующим образом:

Private Sub oskype_userauthorizationrequestreceived(pUser As SKYPE4COMLib.User) Handles oSkype.UserAuthorizationRequestReceive

Но событие библиотеки Skype4Com объявляется так:

Public Event UserAuthorizationRequestReceived(sender As Object, e As AxSKYPE4COMLib._ISkypeEvents_UserAuthorizationRequestReceivedEvent)

Как видите, у вас отсутствует один аргумент, а второй аргумент имеет неправильный тип.

Исправление просто меняет аргументы, чтобы они соответствовали событию:

Private Sub oskype_userauthorizationrequestreceived(sender As Object, e As AxSKYPE4COMLib._ISkypeEvents_UserAuthorizationRequestReceivedEvent) Handles oSkype.UserAuthorizationRequestReceive

Я предполагаю, что вы можете извлечь конкретного пользователя, если просмотрите свойства аргумента e.

person Visual Vincent    schedule 18.09.2016