Skype4Com自动拒绝拨打vb.net

Question

嘿，我想知道是否有人知道如何在vb.net上使用skype4com自动拒绝skype上的呼叫，如果有人能帮助我将非常感激

Answer 1

如果你还在想，那就是这样做的：

注册oSkype时，请将其设为“WithEvents”：

Public WithEvents oSkype As New SKYPE4COMLib.Skype

然后，一旦有事件，您需要处理CallStatus事件：

Private Sub oSkype_CallStatus(pCall As SKYPE4COMLib.Call, Status As SKYPE4COMLib.TCallStatus) Handles oSkype.CallStatus

End Sub

然后，在此处理程序中，您需要检查状态是否为振铃：

If Status = SKYPE4COMLib.TCallStatus.clsRinging Then

End If

然后，最后，如果是，则需要结束通话：

pCall.Finish()

所以，总的来说，你的代码应该是：

Public Class Form1
Public WithEvents oSkype As New SKYPE4COMLib.Skype
Private Sub oSkype_CallStatus(pCall As SKYPE4COMLib.Call, Status As SKYPE4COMLib.TCallStatus) Handles oSkype.CallStatus
    If Status = SKYPE4COMLib.TCallStatus.clsRinging Then
        pCall.Finish()
    End If
End Sub
End Class

通过此操作，您可以修改此项以拒绝某个用户的来电，允许某些用户等。但您可以自己解决这个问题。