Serial Port Using VB.net

See more:

VB

Hi! everyone,

I'm making an app that connect to a serial port device, The Newbridge 36110 MainStreet, I am able to login type in a command like "CFG" then the terminal would prompt me with CFG>
but when I send a command like "FEP 01,X25" it gives me an error syntax error and it displays only "FEP[][]" then when I send that command again it would display "FEP,X[][]" then again would display "FEP 0[][]" it like can only process the 1st syntax not after the space or byte by byte not sure. By the way the [] is an ascii box code. Please help me on this guys. actual code below.

       Dim WithEvents SP As New IO.Ports.SerialPort

       Private Sub frmMain_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        SP.PortName = "COM1"
        SP.BaudRate = 9600
        SP.Parity = IO.Ports.Parity.None
        SP.StopBits = IO.Ports.StopBits.One
        SP.DataBits = 8
        SP.DtrEnable = True
        SP.RtsEnable = True
        SP.Encoding = System.Text.Encoding.ASCII
        SP.Handshake = IO.Ports.Handshake.None
    End Sub

Private Sub btnSend_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSend.Click
        Try
            SP.Write(txtCommand.Text & Chr(13))
            txtCommand.Text = String.Empty
        Catch ex As Exception
            MsgBox(ex.ToString)
        End Try
    End Sub


Private Sub btnFEP_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnFEP.Click
        'Send A FEP 01,X25 Command
        Dim str As String = "FEP 01,X25"
        SP.Write(str & Chr(13))
    End Sub

I created the btnFEP to send the command automatically, the command can also be sent from btnSEND where the txtCommand is where typed in the syntax.