Cómo hacer llamadas telefónicas con Visual Basic

Tener el conocimiento de cómo hacer llamadas telefónicas desde un Microsoft Visual Basic.NET (VB.NET) aplicación puede ahorrar tiempo si necesita realizar llamadas de forma continua. VB.NET es un lenguaje de programación utilizado para crear aplicaciones de escritorio móvil, ni Web. Realizar llamadas telefónicas de VB.NET se pueden realizar mediante la telefonía Application Programming Interface (TAPI). TAPI da a los programadores de las capas necesarias para acceder a la telefonía de Microsoft DLL (bibliotecas de vínculos dinámicos). Telefonía integra ordenadores con dispositivos tales como cámaras y redes de Internet.

Instrucciones

1 Iniciar Microsoft Visual Basic Express, haga clic en "Nuevo proyecto ..." en el panel izquierdo de la pantalla y seleccionar "Aplicación de Windows Forms". Haga clic en Aceptar."

2 Haga doble clic en "botón" en la "caja de herramientas" para añadir un nuevo botón. Haga doble clic en "Label" para añadir una etiqueta. Añadir una segunda etiqueta utilizando el mismo proceso. Haga doble clic en "Cuadro de texto" para añadir un cuadro de texto.

3 Haga doble clic en "Button1" para abrir el módulo "Form1.vb". Copiar y pegar el siguiente en la primera línea del módulo:

Imports System.Windows.Forms

4 Copiar y pegar el siguiente código para declarar la TAPI32 DLL en "Public Class Form1" pero sobre el procedimiento "Button1_Click":

Declare Auto Function tapiRequestMakeCall Lib "TAPI32.dll" _

(ByVal DestAddress como secuencia, de ByVal como secuencia AppName, _

ByVal CalledParty como secuencia, de ByVal como secuencia comentario) As Integer

Const TAPIERR_NOREQUESTRECIPIENT lo más corto = -2

Const TAPIERR_REQUESTQUEUEFULL lo más corto = -3

Const TAPIERR_INVALDESTADDRESS lo más corto = -4

El procedimiento "Button1_Click" se ha creado cuando se hace doble clic en "Button1" en su formulario.

5 Copiar y pegar el siguiente código dentro del procedimiento "Button1_Click" para crear las variables:

Dim phoneNum As String

Dim TResult lo más corto

Dim como secuencia tmpStr

El procedimiento "Button1_Click" se ha creado cuando se hace doble clic en "Button1" en su formulario.

6 Copia y pega el siguiente para obtener el número de teléfono introducido en el cuadro de texto y lo llaman:

phoneNum = Trim (TextBox1.Text)

Try

TResult = tapiRequestMakeCall (phoneNum, "Dial", phoneNum, "")

Catch ex As Exception

Label2.Text = "error"

Try End

7 Copia y pega el siguiente para comprobar si hay errores:

If tResult <> 0 Then

tmpStr = "error"

Seleccione la caja TResult

TAPIERR_NOREQUESTRECIPIENT caso

tmpStr = tmpStr & amp; "No uso de las ventanas de marcado de telefonía se está ejecutando y no se pudo iniciar."

caso TAPIERR_REQUESTQUEUEFULL

tmpStr = tmpStr & amp; "La cola de espera de solicitudes de marcado de telefonía de Windows está lleno."

TAPIERR_INVALDESTADDRESS caso

tmpStr = tmpStr & amp; "El número de teléfono no es válido."

Case Else

tmpStr = tmpStr & amp; "Error de Unkown".

End Select

Más

tmpStr = "rápida"

Terminara si

Label2.Text = tmpStr

End Sub

End Class

8 Pulse la tecla "F5" para ejecutar el programa, a continuación, introduzca un número de teléfono en el cuadro de texto y haga clic en "Button1".