Forum: VB.NET |
Thema:
RS 232 Kommunikation /Hannes Preishuber |
Von:
G. Guest (
16.02.2005 10:23) |
Hallo, leider komme ich mit einem Teil (meine VB Kenntnisse sind nur so gut) des RS232 Programmierbeispiels von Hannes Preishuber nicht klar.
Public Sub Write(ByVal Buffer As String)
Dim iBytesWritten, iResult As Integer
Dim ascBuffer As New System.Text.ASCIIEncoding()
Try
PurgeComm(hCOMM, PURGE_RXCLEAR Or PURGE_TXCLEAR) 'löschen der Puffer
Dim btStream() As BytStream = ascBuffer.GetBytes(Buffer)
iResult = WriteFile(hCOMM, BytStream, BytStream.Length, iBytesWritten, 0)
If iResult = 0 Then
Throw New ApplicationException("Schreib Fehler - Bytes geschrieben. " & iBytesWritten.ToString & " .. " & Buffer.Length.ToString)
End If
Catch Ex As Exception
Throw
End Try
End Sub
Fehlt hier die definition von BytSream oder btStream! Ich verstehe nicht was hier gemacht wird.
Das Vollständige Programme findet man wenn man nach RS232 sucht (sind 3 Artikel) pleas Help!!! Gruß Dieter
Antworten
Vorsicht bei der Eingabe: Die Zeichen ' oder -- sind nicht erlaubt!