Habs mir angeschaut.
Die beste Lösung ist:
Nach der Initialisierung der AsyncStreamsText Instanz, im Main Code, füge diese Zeile ein:
AsyncStream1.Initialize(Me, .....
AsyncStream1.charsett= "Windows-1252"
Du musst AsyncStream1 ersetzen durch den Namen den Du benutzt.
Dann kannst Du das Modul lasses wie es war, ohne den Änderungen die ich vorgesclagen hatte!
Die beste Lösung ist:
Nach der Initialisierung der AsyncStreamsText Instanz, im Main Code, füge diese Zeile ein:
AsyncStream1.Initialize(Me, .....
AsyncStream1.charsett= "Windows-1252"
Du musst AsyncStream1 ersetzen durch den Namen den Du benutzt.
Dann kannst Du das Modul lasses wie es war, ohne den Änderungen die ich vorgesclagen hatte!