Excel VBA TAPI 到盲转扩展

Excel VBA TAPI to blind transfer extension

我使用 Excel VBA.

使用 tapirequestmakecall 函数拨打了一个号码

https://msdn.microsoft.com/en-us/library/ms737210(v=vs.85).aspx

Declare Function tapiRequestMakeCall Lib "tapi32.dll" _
(ByVal stNumber As String, ByVal stDummy1 As String, _
ByVal stDummy2 As String, ByVal stDummy3 As String) As Long

Sub DialNumber(Number As String)
Dim lngStatus As Long

 lngStatus = tapiRequestMakeCall(Number, "", "", "")

 If lngStatus < 0 Then
  MsgBox "Failed to dial number " & Number, vbExclamation
 End If

End Sub

电话接通后,我必须将呼叫转移到100之类的分机。

如何做到这一点?我正在使用 TAPI 2.2。任何帮助将不胜感激..

据我所知,这是不可能的。 built-in office TAPI 集成仅用于使用“第一方”-TAPI 驱动程序(驱动程序的子集用于单个分机使用)进行拨出呼叫。 Office 还限制了对 API 的访问(供 "easy" 使用),因此您无权访问拨号操作的正常输出(= 创建的调用的句柄,以执行进一步的操作) .

我建议您不要使用 built-in 办公方法,而是直接在 TAPI (tapi32.dll) 本身上构建。不幸的是,这是一项相当困难的工作。