Question

我已经使用USB宽带套件的工作代码将VB中的消息发送到手机。现在，我正在采取另一种方式，即从宽带SIM获取消息，这是代码：

Imports System
Imports System.IO.Ports

Public Class ReadSMS

Dim SerialPort As New System.IO.Ports.SerialPort()

Private Sub ReadNow_Click(sender As Object, e As EventArgs) Handles ReadNow.Click

    If SerialPort.IsOpen Then
        SerialPort.Close()
    End If

    SerialPort.PortName = "COM4"
    SerialPort.BaudRate = 9600
    SerialPort.Parity = Parity.None
    SerialPort.StopBits = StopBits.One
    SerialPort.DataBits = 8
    SerialPort.Handshake = Handshake.None
    SerialPort.DtrEnable = True
    SerialPort.RtsEnable = True
    SerialPort.NewLine = vbCrLf
    SerialPort.ReadTimeout = 10000
    SerialPort.Open()

    If SerialPort.IsOpen() Then
        Try
            Debug.Print("START")
            Debug.Print(SerialPort.ReadExisting)
            Debug.Print("END")
        Catch ex As Exception
            MsgBox("read " & ex.Message)
        End Try
    Else
        MsgBox("Port not available")
    End If
End Sub
End Class

上面的代码不起作用。即使SIM卡有未读消息，此行也始终返回空值Debug.Print(SerialPort.ReadExisting)。如果你建议我做最好的事情，那会没关系吗？谢谢，谢谢！

Answer 1

您可以阅读GSM的方式是初始化或发送命令，要求GSM向您发送一些消息，消息无法自行传输。我认为你缺少启动消息流的命令。你可能会看到这个http://arduino.cc/en/Tutorial/GSMExamplesReceiveSMS - 这些是在C中，但是校长保持不变。

希望这个帮助

如何从VB.NET中的串口获取消息

1 个答案: