Liebe Leute,

dank dieses Forums bin ich mit meinem Programm zum Auslesen von Messdaten aus einem Messgerät inzwischen schon ziemlich weit. Ein Problem hab' ich aber noch:
die Übertragung klappt nur dann fehlerfrei, wenn ich die Daten vorher schonmal mit der *gleichen* Übertragugsrate über das Windows-Hyper-Terminal eingelesen habe; andernfalls wird zwar auch was übertragen, aber leider nicht die korrekten Daten.

Zum Einlesen verwende ich folgenden Code:

baud = InputBox("Bitte geben Sie die Übertragungsrate ein:")
MsgBox ("Klicken Sie auf OK," + Chr(13) + Chr(13) + "und starten Sie dann den Datentransfer" + Chr(13) + Chr(13) + "am FAT")

OPENCOM "COM1:baud,N,8,2"

For kurven_zaehler = 1 To kurven_endwert
For byte_zaehler = 1 To byte_endwert
zeile = byte_zaehler + 9
spalte = 4 + (kurven_zaehler - 1) * 9
Cells(zeile, spalte).Value = READBYTE
Application.StatusBar = "Lese: Byte " + CStr(byte_zaehler) + " von Kurve " + CStr(kurven_zaehler)
Next byte_zaehler
Next kurven_zaehler
CLOSECOM
Application.StatusBar = "Fertig"


Lasst Euch durch die Zeilen- und Spalten-Arithmetik nicht verwirren, die erklärt sich durch das Layout meins Arbeitsblattes.
Die Angaben keine Parität, 8 Datenbits, 2 Stopbits entsprechen den Angaben des Messgerät-Hersttellers über das Übertragungsformat, hier kann der Fehler also nicht liegen.

Hat jemand eine Idee?

Schönen Gruß
Andi