VBA Serial Port Communication

16/09/2011 - 16:29 von Christof Kluß | Report spam
Hallo,

ich möchte ohne zusàtzliche Komponenten, wie MSComm, die serielle
Schnittstelle auslesen.

Das geht grundsàtzlich, wie unter
http://dev.emcelettronica.com/seria...vba?page=1
beschrieben.

Nur leider gibt es dort kein "OnComm" Ereignis. Wie würdet ihr so etwas
nachbilden?

Gruß
Christof
 

Lesen sie die antworten

#1 Christof Kluß
16/09/2011 - 16:44 | Warnen spam
Hat sich erledigt, falls es nichts besseres gibt ;)


Private Sub PollCom()

lngStatus = CommRead(intPortID, InputData, 10)

If lngStatus = 0 Then
...
End If

Application.OnTime Now + TimeSerial(0, 0, 10), "PollCom"

End Sub


Am 16-09-2011 16:29, schrieb Christof Kluß:
Hallo,

ich möchte ohne zusàtzliche Komponenten, wie MSComm, die serielle
Schnittstelle auslesen.

Das geht grundsàtzlich, wie unter
http://dev.emcelettronica.com/seria...vba?page=1
beschrieben.

Nur leider gibt es dort kein "OnComm" Ereignis. Wie würdet ihr so etwas
nachbilden?

Gruß
Christof

Ähnliche fragen