Gewusst wie: Wählen mit Modems an seriellen Anschlüssen in Visual Basic

Artikel
08/20/2008

Aktualisiert: November 2007

In diesem Thema wird beschrieben, wie Sie in Visual Basic mit My.Computer.Ports einen Wählvorgang mit einem Modem ausführen können.

In der Regel ist das Modem an einen der seriellen Anschlüsse am Computer angeschlossen. Für die Kommunikation mit dem Modem muss die Anwendung Befehle an den entsprechenden seriellen Anschluss senden.

So wählen Sie mit einem Modem

Stellen Sie fest, mit welchem seriellen Anschluss das Modem verbunden ist. In diesem Beispiel wird davon ausgegangen, dass das Modem mit COM1 verbunden ist.
Verwenden Sie die My.Computer.Ports.OpenSerialPort-Methode, um einen Verweis auf den Anschluss abzurufen. Weitere Informationen finden Sie unter My.Computer.Ports.OpenSerialPort-Methode.

Der Using-Block ermöglicht der Anwendung, den seriellen Anschluss auch dann zu schließen, wenn er eine Ausnahme generiert. Code, der den seriellen Anschluss konfiguriert, sollte vollständig innerhalb dieses Blocks oder eines Try...Catch...Finally-Blocks stehen.
```
Using com1 As IO.Ports.SerialPort = _
        My.Computer.Ports.OpenSerialPort("COM1", 9600)
End Using
```
Geben Sie mit der DtrEnable-Eigenschaft an, dass der Computer bereit für eingehende Übertragungen vom Modem ist.
```
com1.DtrEnable = True
```
Senden Sie den Wählbefehl und die Telefonnummer mithilfe der Write-Methode über den seriellen Anschluss an das Modem.
```
com1.Write("ATDT 555-0100" & vbCrLf)
```

Beispiel

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

Dieses Codebeispiel ist auch als IntelliSense-Codeausschnitt verfügbar. Sie finden das Element in der Codeausschnittauswahl unter Connectivity and Networking. Weitere Informationen finden Sie unter Gewusst wie: Einfügen von Ausschnitten in den Code (Visual Basic).

Kompilieren des Codes

Für das Beispiel wird ein Verweis auf den System-Namespace benötigt.

Robuste Programmierung

In diesem Beispiel wird davon ausgegangen, dass das Modem mit COM1 verbunden ist. Es empfiehlt sich, dem Benutzer die Möglichkeit zur Auswahl des gewünschten Anschlusses aus einer Liste freier Anschlüsse zu geben. Weitere Informationen finden Sie unter Gewusst wie: Anzeigen von verfügbaren seriellen Anschlüssen in Visual Basic.

In diesem Beispiel wird mithilfe eines Using-Blocks sichergestellt, dass die Anwendung den seriellen Anschluss auch dann schließt, wenn eine Ausnahme ausgelöst wird. Weitere Informationen finden Sie unter Using-Anweisung (Visual Basic).

In diesem Beispiel trennt die Anwendung nach dem Anwählen des Modems die Verbindung zum seriellen Anschluss. In einer echten Anwendung würden zusätzlich Daten zum und vom Modem übertragen werden. Weitere Informationen finden Sie unter Gewusst wie: Empfangen von Zeichenfolgen von seriellen Anschlüssen in Visual Basic.