Capture message from calipers

  • Thread starter Thread starter GraemeR
  • Start date Start date
G

GraemeR

Hi, I have an iPAQ and some sylvac calipers. I've attached the calipers to
port on the bottom of the iPAQ.
How do I capture a signal sent from the calipers to the port? (How do I
capture the port?)

Thanks, Graeme
 
Thanks Sergey, I feel I'm making progress. Am I correct to think that the
port at the bottom of the iPAQ is COM3?
Using port names "COM1" and "COM2" in the following code fail with error 55
(other names fail with error 2)

Dim bps As New OpenNETCF.IO.Serial.BasicPortSettings
bps.BaudRate = 4800
bps.Parity = OpenNETCF.IO.Serial.Parity.even
bps.ByteSize = 7 'DataBits
bps.StopBits = OpenNETCF.IO.Serial.StopBits.two
Dim prtCOM As New OpenNETCF.IO.Serial.Port("COM3", bps)
prtCOM.Open

Thanks, Graeme.

Sergey Bogdanov said:
I suppose it can be read using OpenNETCF.IO.Serial.Port [1]. To enumerate
available COM ports see HKEY_LOCAL_MACHINE\Drivers\Active\* for Name with
"COMn:" signature.

[1]
http://www.opennetcf.org/SourceBrow...ub/wwwroot/Source/OpenNETCF/IO/Serial/Port.cs

Best regards,
Sergey Bogdanov
http://www.sergeybogdanov.com

Hi, I have an iPAQ and some sylvac calipers. I've attached the calipers
to port on the bottom of the iPAQ.
How do I capture a signal sent from the calipers to the port? (How do I
capture the port?)

Thanks, Graeme
Click to expand...
Click to expand...
 
I'm not sure but COM3 could be IRDA (is it IRCOMM.DLL?). Have you tried
all available COM ports and only this one opens without a error?

Best regards,
Sergey Bogdanov
http://www.sergeybogdanov.com

Thanks Sergey, I feel I'm making progress. Am I correct to think that the
port at the bottom of the iPAQ is COM3?
Using port names "COM1" and "COM2" in the following code fail with error 55
(other names fail with error 2)

Dim bps As New OpenNETCF.IO.Serial.BasicPortSettings
bps.BaudRate = 4800
bps.Parity = OpenNETCF.IO.Serial.Parity.even
bps.ByteSize = 7 'DataBits
bps.StopBits = OpenNETCF.IO.Serial.StopBits.two
Dim prtCOM As New OpenNETCF.IO.Serial.Port("COM3", bps)
prtCOM.Open

Thanks, Graeme.

I suppose it can be read using OpenNETCF.IO.Serial.Port [1]. To enumerate
available COM ports see HKEY_LOCAL_MACHINE\Drivers\Active\* for Name with
"COMn:" signature.

[1]
http://www.opennetcf.org/SourceBrow...ub/wwwroot/Source/OpenNETCF/IO/Serial/Port.cs

Best regards,
Sergey Bogdanov
http://www.sergeybogdanov.com

Hi, I have an iPAQ and some sylvac calipers. I've attached the calipers
to port on the bottom of the iPAQ.
How do I capture a signal sent from the calipers to the port? (How do I
capture the port?)

Thanks, Graeme
Click to expand...
Click to expand...
Click to expand...
 
Hi, port names COM3 and COM4 do not produce an error (ports COM1,2,5,6 cause
error 55; port name (e.g.) "Bogus" causes error 2.

How would I find out if ports are IRDA?
I tried looking for the path HKEY_LOCAL_MACHINE\Drivers\Active\* on my
machine but it doesn't exist. I don't know how to view the registry on the
iPAQ.

Graeme.
 
From the iPAQ owner I have that the port is definitely COM1.

I've reset the iPAQ and code doesn't fail when opening.
The cable I'm using has been certified as working. It should show a light if
the por t is configured correctly and it shows no light.

I trust that I'm heading in the right direction?

Code is:

Private mbps As OpenNETCF.IO.Serial.BasicPortSettings
Private WithEvents mprtCOM As OpenNETCF.IO.Serial.Port

Private Sub openPort()

mbps = New OpenNETCF.IO.Serial.BasicPortSettings
mbps.BaudRate = 4800
mbps.Parity = OpenNETCF.IO.Serial.Parity.even
mbps.ByteSize = 7
mbps.StopBits = OpenNETCF.IO.Serial.StopBits.two
mprtCOM = New OpenNETCF.IO.Serial.Port("COM1", mbps)

mprtCOM.Open()

End Sub

Thanks, Graeme.


Sergey Bogdanov said:
I'm not sure but COM3 could be IRDA (is it IRCOMM.DLL?). Have you tried
all available COM ports and only this one opens without a error?

Best regards,
Sergey Bogdanov
http://www.sergeybogdanov.com

Thanks Sergey, I feel I'm making progress. Am I correct to think that the
port at the bottom of the iPAQ is COM3?
Using port names "COM1" and "COM2" in the following code fail with error
55 (other names fail with error 2)

Dim bps As New OpenNETCF.IO.Serial.BasicPortSettings
bps.BaudRate = 4800
bps.Parity = OpenNETCF.IO.Serial.Parity.even
bps.ByteSize = 7 'DataBits
bps.StopBits = OpenNETCF.IO.Serial.StopBits.two
Dim prtCOM As New OpenNETCF.IO.Serial.Port("COM3", bps)
prtCOM.Open

Thanks, Graeme.

I suppose it can be read using OpenNETCF.IO.Serial.Port [1]. To enumerate
available COM ports see HKEY_LOCAL_MACHINE\Drivers\Active\* for Name with
"COMn:" signature.

[1]
http://www.opennetcf.org/SourceBrow...ub/wwwroot/Source/OpenNETCF/IO/Serial/Port.cs

Best regards,
Sergey Bogdanov
http://www.sergeybogdanov.com


GraemeR wrote:

Hi, I have an iPAQ and some sylvac calipers. I've attached the calipers
to port on the bottom of the iPAQ.
How do I capture a signal sent from the calipers to the port? (How do I
capture the port?)

Thanks, Graeme
Click to expand...
Click to expand...
Click to expand...
 
Back
Top