Problem med ComPorten i VB 6.0 (comReadError 8020)

med SCOMM32.OCX

mener du ikke Mscomm32.OCX

et eksempel

If MSComm1.PortOpen = True Then MSComm1.PortOpen = False
    MSComm1.CommPort = 1
    MSComm1.Settings = "9600,N,8,1"
    If MSComm1.PortOpen = False Then
    MSComm1.PortOpen = True
    End If

Do
      Tstr = MSComm1.Input
      tt = tt & Tstr
    DoEvents
    Loop Until Right(tt, 2) =  Chr(13) & Chr(10)  ' vent på svar"

MSComm1.PortOpen = False

nu har du det der blev sendt i variablen Tstr

for at sende

  MSComm1.Output = Tjek & Chr(13) & Chr(10)

det er ikke sikkert at du skal bruge ( Chr(13) & Chr(10))
, det skal jeg i mit tilfælde

Jo, det er MSCOMM32.OCX, slå fejl !

jeg er klar over hvorledes den skal anvendes, men med Nokia D211 kommer der en ComReadError 8020, som runtime error, som jeg leder efter en løsning til.

Det er derfor jeg leder efter en anden OCX eller en løsning