使用SerialPort.ReadExisting()从串行端口接收无效数据

时间:2010-01-16 11:22:09

标签: vb.net windows-mobile

最近我们连接了一个从我们的串行设备接收数据的蓝牙设备。蓝牙设备进一步将此数据传输到支持蓝牙的Windows Mobile。整个系统的波特率为19200,有7个数据位和1个停止位。当我们通过蓝牙设备向串口设备发送命令时,它接受命令并做出相应的响应。但是字符串的一些数据字节是desplay作为问号(?)。

但是如果我们将串行设备直接连接到PC,则收到的字符串是正确的。

我在windows mobile中运行的vb.net程序代码如下:

Imports System
Imports System.IO.Ports
Imports System.Windows.Forms.TextBox

Public Class frmSelectComPort


Dim WithEvent port1 as serialport = _
New SerialPort(“Com2”,19200,Parity.Even, 7, StopBits.One)

 Private Sub MnuConnect_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MnuConnect.Click

    If port1.IsOpen Then
        port1.Close()
    End If
    port1.DtrEnable = True
    port1.RtsEnable = True
    port1.ReceivedBytesThreshold = 1
    port1.Open()

    Dim str1,strcmd,strReadSegment0 As String
    Str1="09RD000001"
    strchksum=23
    strcmd = New String(Chr(2) + str1 + Chr(3) + strchksum) + Chr(0)
    Delay(5000)
    port1.Write(strcmd, 0, strcmd.Length)
    System.Threading.Thread.Sleep(70)
    Delay(2000)
    strReadSegment0 = port1.ReadExisting
   ‘here I receive the following string "?09?D03?A D?

End Sub


Private Sub Delay(ByVal num As Double)
    Dim i As Double
    For i = 0 To num
    Next
End Sub

End Class

给串口的命令是“09RD000001 23

串口给出的响应是“?09?D03?A D?

但我期待串口的以下输入:“09RD033A DA

请尽快提供解决方案

1 个答案:

答案 0 :(得分:0)

您是否尝试过8个数据位,没有奇偶校验,1个停止位?只要两端都设置相同......

?可以指示需要设置编码。

Dim myEnc As Encoding = Encoding.GetEncoding("Windows-1252")
port1.encoding=myEnc
相关问题