• Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 132
  • Last Modified:

Only 49 characters please..

Hello there...

I had a great time reading data from a serial port and then placing it into an Access table.  However the data that comes across from the MSComm1.Input is sometimes to long.  Is there anyway to allow only 49 characters in at a time? AND THEN CLEAR THE BUFFER?
Here is what my code looks like:

Private Sub Receive_Click()

Dim Db As Database
Dim rs As Variant

   
Text1.Text = MSComm1.Input
    'Open Database
Set Db = Workspaces(0).OpenDatabase("C:\Program Files\Microsoft Visual Basic\serial")
    'Open table
Set rs = Db.OpenRecordset("tbl_main", dbOpenDynaset)
   
rs.AddNew
rs("fld_String") = Text1.Text
rs.Update                             ' Save changes.
rs.Move 0, rs.LastModified            ' Go to new record
rs.Close                              ' Close Table.
Db.Close                              ' Close Database

End Sub
0
Nelmarcas
Asked:
Nelmarcas
1 Solution
 
mcixCommented:
Insert the line:

MSComm1.InputLen = 49

Before the Line:

Text1.Text = MSComm1.Input
0
 
NelmarcasAuthor Commented:
Thank you very much, I figured it out too late.  Thanks for the help..


0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

Join & Write a Comment

Featured Post

Free Tool: Subnet Calculator

The subnet calculator helps you design networks by taking an IP address and network mask and returning information such as network, broadcast address, and host range.

One of a set of tools we're offering as a way of saying thank you for being a part of the community.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now