RE:Rescatar datos de un Puerto comm
Bueno, creo que e encontrado algo, a sido en este foro, tras un buen ratazo buscando, jeje, espero que esto sirva de ayuda a todos los que tratan de utilizar el com1 en vb.net y repito ESTO NO LO E PUESTO YO, LO E COPIADO DE OTRO POST.
declaras una instancia de esta clase en una forma
Private m_CommPort As New Rs232()
luego abrir el puerto que deseas, en este caso COM1
m_CommPort.Open(1, 9600, 8, Rs232.DataParity.Parity_None, _
Rs232.DataStopBit.StopBit_1, 4096)
luego puedes escribir en el:
m_CommPort.Write(" ")
y por ultimo lo cierras
m_CommPort.Close()
Public Class Rs232
Private mhRS As Integer = -1 ' Handle to Com Port
Private miPort As Integer = 1 ' Default is COM1
Private miTimeout As Integer = 70 ' Timeout in ms
Private miBaudRate As Integer = 9600
Private meParity As DataParity = 0
Private meStopBit As DataStopBit = 0
Private miDataBit As Integer = 8
Private miBufferSize As Integer = 512 ' Buffers size default to 512 bytes
Private mabtRxBuf As Byte() ' Receive buffer
Private meMode As Mode ' Class working mode
Private mbWaitOnRead As Boolean
Private mbWaitOnWrite As Boolean
Private mbWriteErr As Boolean
Private muOverlapped As OVERLAPPED
Private muOverlappedW As OVERLAPPED
Private muOverlappedE As OVERLAPPED
Private mabtTmpTxBuf As Byte() ' Temporary buffer used by Async Tx
Private moThreadTx As Thread
Private moThreadRx As Thread
Private miTmpBytes2Read As Integer
Private meMask As EventMasks