Comunicazione Modem - com vb modem nokia via IR

[pcontini]

Sto tentando di fare un softwarino per comunicare con un modem (tel) nokia via porta IR

Con hyperterminal tutto ok. Quando provo con visual basic trasmetto la mia stringa "ATZ", mi viene generato l'evento OnComm, ma quando utilizzo la proprietà Input mi da un errore di runtime 8020 e precisamente "errore di lettura della periferica di comunicazione"

I caratteri li ricevo (con serial monitor lo vedo) ma con il .Input ricevo solo errori.

Quacuno di voi ha un'idea?

[jumpier]

Facci vedere un po' di codice per capire se c'è qualcosa che non va .....

[pcontini]

Le routine incriminate sono le seguenti:

-----------------------------------------------------

Private Sub mnuModemConnetti_Click()

Dim sToTx As String

On Error GoTo LocalError

If Seriale.PortOpen = False Then

Seriale.CommPort = bComPortNumber

Seriale.Settings = "9600,N,8,1"

Seriale.PortOpen = True

End If

Seriale.RThreshold = 5

sToTx = "ATE0" + Chr$(13)

Seriale.Output = sToTx

Exit Sub

LocalError:

MsgBox "Errore #" & CStr(Err.Number) & " " & Err.Description

Err.Clear

-----------------------------------------------------------------

Private Sub Seriale_OnComm()

Dim stRx As String

Debug.Print Time() & " caratteri " & CStr(Seriale.InBufferCount)

stRx = Seriale.Input

End Sub

-------------------------------------------------------------------

ciao