如何：在 Visual Basic 中撥接與序列埠連接的數據機

本主題描述如何在 Visual Basic 中使用 My.Computer.Ports 撥接數據機。

一般而言，數據機會連接至電腦上的其中一個序列埠。 您的應用程式必須將命令傳送至適當的序列埠，才能與數據機通訊。

撥接數據機

1. 判斷要將數據機連接至哪一個序列埠。 此範例假設數據機是在 COM1。

2. 請使用 My.Computer.Ports.OpenSerialPort 方法取得連接埠的參考。 如需詳細資訊，請參閱OpenSerialPort。

   Using 區塊允許應用程式即使產生例外狀況，也可關閉序列埠。 所有管理序列埠的程式碼都應該出現在此區塊或 Try...Catch...Finally 區塊內。

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

3. 設定 DtrEnable 屬性，指出電腦已準備好接受從數據機傳入的傳輸。

   com1.DtrEnable = True
   

4. 利用 Write 方法，透過序列埠將撥接命令與電話號碼傳送至數據機。

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

範例

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

這個程式碼範例也可用為 IntelliSense 程式碼片段。 在程式碼片段選擇器中，該程式碼片段會位於 [連接和網路] 中。 如需詳細資訊，請參閱 Code Snippets。

編譯程式碼

此範例需要 System 命名空間的參考。

穩固程式設計

此範例假設數據機已連接至 COM1。 建議您的程式碼允許使用者從可用序列埠清單中選取想要的序列埠。 如需詳細資訊，請參閱如何：顯示可用的序列埠。

此範例使用 Using 區塊以確保應用程式即使擲回例外狀況，也可關閉序列埠。 如需詳細資訊，請參閱 Using 陳述式。

在此範例中，應用程式會在撥接數據機之後中斷與序列埠的連接。 實際上，您會想要將資料傳輸至數據機，或從中傳輸出。 如需詳細資訊，請參閱如何：接收來自序列埠的字串。

另請參閱

• Ports
• System.IO.Ports.SerialPort
• 如何：將字串傳送至序列埠
• 如何：接收來自序列埠的字串
• 如何：顯示可用的序列埠