Compartir a través de

Cómo: Marcar a través de módems conectados a puertos serie en Visual Basic

En este tema se describe cómo usar My.Computer.Ports para marcar un módem en Visual Basic.

Normalmente, el módem está conectado a uno de los puertos serie del equipo. Para que la aplicación se comunique con el módem, debe enviar comandos al puerto serie adecuado.

Para llamar un módem

  1. Determine a qué puerto serie está conectado el módem. En este ejemplo se supone que el módem está en COM1.

  2. Use el My.Computer.Ports.OpenSerialPort método para obtener una referencia al puerto. Para obtener más información, consulte OpenSerialPort.

    El Using bloque permite que la aplicación cierre el puerto serie incluso si genera una excepción. Todo el código que manipula el puerto serie debe aparecer dentro de este bloque o dentro de un Try...Catch...Finally bloque.

    Using com1 As IO.Ports.SerialPort =
        My.Computer.Ports.OpenSerialPort("COM1", 9600)
End Using

  3. Establezca la DtrEnable propiedad para indicar que el equipo está listo para aceptar una transmisión entrante desde el módem.

    com1.DtrEnable = True

  4. Envíe el comando de marcado y el número de teléfono al módem a través del puerto serie mediante el Write método .

    com1.Write("ATDT 555-0100" & vbCrLf)

Ejemplo

Sub DialModem()
    ' Dial a number via an attached modem on COM1.
    Using com1 As IO.Ports.SerialPort =
            My.Computer.Ports.OpenSerialPort("COM1", 9600)
        com1.DtrEnable = True
        com1.Write("ATDT 555-0100" & vbCrLf)
        ' Insert code to transfer data to and from the modem.
    End Using
End Sub

Este ejemplo de código también está disponible como fragmento de código de IntelliSense. En el selector de fragmentos de código, se encuentra en Conectividad y redes. Para obtener más información, vea los fragmentos de código .

Compilar el código

En este ejemplo se requiere una referencia al System namespace.

Programación sólida

En este ejemplo se supone que el módem está conectado a COM1. Se recomienda que el código permita al usuario seleccionar el puerto serie deseado en una lista de puertos disponibles. Para obtener más información, vea Cómo: Mostrar puertos serie disponibles.

En este ejemplo se usa un Using bloque para asegurarse de que la aplicación cierra el puerto incluso si produce una excepción. Para obtener más información, vea Using Statement.

En este ejemplo, la aplicación desconecta el puerto serie después de marcar el módem. De forma realista, querrá transferir datos hacia y desde el módem. Para obtener más información, vea Cómo: Recibir cadenas de puertos serie.

Consulte también