vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
SEPA-Dateien erstellen inkl. IBAN-, BLZ-/Kontonummernprüfung  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2024
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Fortgeschrittene Programmierung
MSComm Bluetooth serial: _OnComm-Event wird nicht ausgelöst 
Autor: Protolus
Datum: 09.11.21 12:18

Ich möchte serial Daten zwischen VB/Windows10 und einem Bluetooth-Gerät austauschen.
Das Bluetooth-Gerät ist ein ESP32 Mikrokontroller.

Windows10 und der Mikrokontroller sind gekoppelt.
Der Geräte-Manager zeigt mir für Bluetotth-Serial zwei COM-Ports:

COM3 für ausgehende Daten.
und
COM5 für ankommende Daten.

Die Datenübertragung von VB zum Mikrokontroller klappt einwandfrei.
Umgekehrt klappts leider nicht.
Ich habe zwei MSComm, MCO1 zum senden, MCO2 zum empfangen.

Die settings beider MSComm-Objekte: "115200,n,8,1"

InBufferSize: 1024
InputLen: 0
InputMode: Text
NullDiscard: False
OutBufferSize: 512
ParityReplace: ?
RThreshold: 1
RTSEnable: False
SThreshold: 1

Der VB Code zum Senden:

Private Sub Senden_Click()
 
  MCO1.PortOpen = True
  MCO1.Output = "Juhui, es funzt"
  MCO1.PortOpen = False
 
End Sub
Der Code für den OnComm-Event:
Private Sub MCO2_OnComm()
 
  Text1 = MCO2.Input
 
End Sub
Der Code im Mikrokontroller:
//This example code is in the Public Domain (or CC0 licensed, at your option.)
//By Evandro Copercini - 2018
//
//This example creates a bridge between Serial and Classical Bluetooth (SPP)
//and also demonstrate that SerialBT have the same functionalities of a normal _
  Serial
 
#include "BluetoothSerial.h"
 
#if !defined(CONFIG_BT_ENABLED) || !defined(CONFIG_BLUEDROID_ENABLED)
#error Bluetooth is not enabled! Please run `make menuconfig` to and enable it
#endif
 
 
byte txx[] ="ABCDEFGHIJ";
 
BluetoothSerial SerialBT;
 
void setup() {
  Serial.begin(115200);
  SerialBT.begin("ESP32test"); //Bluetooth device name
  Serial.println("The device started, now you can pair it with bluetooth!");
}
 
void loop() {
  if (Serial.available()) {
    SerialBT.write(Serial.read());
 
    Serial.println("Gesendet");
    Serial.println(Serial.read());
  }
  if (SerialBT.available()) {
    Serial.write(SerialBT.read());
  }
  delay(20);
}
Wer kann helfen?
Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Re: MSComm Bluetooth serial: _OnComm-Event wird nicht ausgelöst 
Autor: visualfx
Datum: 10.11.21 10:41

Hallo Protolus,

ich habe einen Barcode-Scanner über einen COM-Port angeschlossen und lese mittels Mscomm32.ocx die Daten ein

deshalb 2 Hinweise:


1) setzt Du auch gleich zu Begin MCO2.PortOpen = True ???


2) nach einem PortOpen = True setze ich gleich danach noch:

InBufferCount = 0
OutBufferCount = 0


vielleicht hilft Dir das weiter


PS: übrigens ist die neuste Version vom Mscomm32.ocx 6.01.9839 !!!

download aller neusten Microsoft-Controls vom 23.03.2021:

https://www.microsoft.com/de-de/download/details.aspx?id=50722


Gruß, Stefan
Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Re: MSComm Bluetooth serial: _OnComm-Event wird nicht ausgelöst 
Autor: W. Wolf
Datum: 17.11.21 09:34

Hi,
gibt schon was neueres v. 26.04.2021 auf:
https://www.microsoft.com/de-DE/download/details.aspx?id=10019

Gruß
W. Wolf
Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Re: MSComm Bluetooth serial: _OnComm-Event wird nicht ausgelöst 
Autor: visualfx
Datum: 17.11.21 09:54

Hallo,

die Versionen in dem Download vom 26.04.2021 sind veraltet:

- comctl32.ocx Version 6.00.8106
- mscomctl.ocx Version 6.01.9786


nimm lieber den Download vom 23.03.2021:

https://www.microsoft.com/de-de/download/details.aspx?id=50722

- comctl32.ocx Version 6.00.9839
- mscomctl.ocx Version 6.01.9846


Gruß, Stefan
Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Re: MSComm Bluetooth serial: _OnComm-Event wird nicht ausgelöst 
Autor: W. Wolf
Datum: 17.11.21 10:04

Hi,

Hä? Die Versionen v. 23.03 sind neuer als die v. 26.04? Sind die deppert?

Gruß W. Wolf
Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2024 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel