vb 2005 error The semaphore timeout period has expired.

hi.

i'm currently developing an application, that uses a usb bluetooth adapter to connect to three codebar readers, so far so good, they are connected, and should be working properly.

but after one hour, one hour and half, sometimes even less, they no longer can't work with the application, i can't get them to read anything.


and sometimes, as the application is starting up i get the following error:

Quote:

---

Timestamp: 19-03-2009 21:02:34
Message: There is no explicit mapping for the categories 'Geral'. The log entry was:
Timestamp: 19-03-2009 21:02:34
Message: ERRO EVENTO LOAD FRMMAIN: The semaphore time-out period has expired.
# at System.IO.Ports.InternalResources.WinIOError(Int32 errorCode, String str)
at System.IO.Ports.SerialStream..ctor(String portName, Int32 baudRate, Parity parity, Int32 dataBits, StopBits stopBits, Int32 readTimeout, Int32 writeTimeout, Handshake handshake, Boolean dtrEnable, Boolean rtsEnable, Boolean discardNull, Byte parityReplace)
at System.IO.Ports.SerialPort.Open()
at Supervisor.FrmMain.FrmMain_Load(Object sender, EventArgs e)

Category: Geral
Priority: 3
EventId: 0
Severity: Error
Title:
Machine: PCEV1198
App Domain: Supervisor.exe
ProcessId: 1864
Process Name: C:\Program Files\KEMET\SupervisorGlobal\Supervisor.exe
Thread Name:
Win32 ThreadId:1756
Extended Properties:
Category:
Priority: -1
EventId: 6352
Severity: Error
Title:
Machine: PCEV1198
Application Domain: Supervisor.exe
Process Id: 1864
Process Name: C:\Program Files\KEMET\SupervisorGlobal\Supervisor.exe
Win32 Thread Id: 1756
Thread Name:
Extended Properties:

---

could they be related, both of the situations?
i've been searching for a solution for this situation an came up with nothing specific.


i'm using 3 serial port objects to connect to the codebar readers.
and using the following code to connect to the codebar readers.

Code:

---

SerialPort1.PortName = "COM3" 
 
 
 
SerialPort1.BaudRate = 9600 
 
SerialPort1.DataBits = 8 
 
SerialPort1.StopBits = Ports.StopBits.One 
 
SerialPort1.Parity = Ports.Parity.None 
 
SerialPort1.Open() 
 
System.Threading.Thread.Sleep(2000) 
 
'#Dim Porta2 As String = DevolvePOrtaComumicacoes(2, Area.IDArea) 
 
 
 
SerialPort2.PortName = "COM5" 
 
 
 
SerialPort2.BaudRate = 9600 
 
SerialPort2.DataBits = 8 
 
SerialPort2.Parity = Ports.Parity.None 
 
SerialPort2.StopBits = Ports.StopBits.One 
 
SerialPort2.Open() 
 
System.Threading.Thread.Sleep(2000) 
 
 
 
 
 
'#Dim Porta3 As String = DevolvePOrtaComumicacoes(3, Area.IDArea) 
 
 
 
SerialPort3.PortName = "COM7" 
 
 
 
SerialPort3.BaudRate = 9600 
 
SerialPort3.Parity = Ports.Parity.None 
 
SerialPort3.DataBits = 8 
 
SerialPort3.StopBits = Ports.StopBits.One 
 
SerialPort3.Open() 
 
System.Threading.Thread.Sleep(2000)

---

and the datarecieved event to handle the data recieved from the bar code readers

like the example bellow:

Code:

---

Private Sub SerialPort1_DataRecieved(ByVal sender As System.Object, ByVal e As System.IO.Ports.SerialDataReceivedEventArgs) Handles SerialPort1.DataReceived 
 
        Try 
            Dim leitor As Integer = 1 
 
            Leitura.Leitura = SerialPort1.ReadExisting 
            InterpretaComando(Me, leitor, Leitura, Generica.Colaborador) 
            Leitura.Leitura = "" 
           
        Catch ex As Exception 
            Log("SerialPort1 error: " + ex.Message + " # " + ex.StackTrace) 
        Finally 
            SerialPort1.DiscardInBuffer() 
            SerialPort1.DiscardOutBuffer() 
        End Try 
    End Sub

---

i've searching and could not find any answer for this issue.
any ideas?


help would be appreciated.

thanks in advance