Hallo,
ich versuche anhand von Befehlen verschiedene Informationen eines Handys abzurufen.
Ich kann alles Senden (auch nummern wählen) aber keine Informationen vom Handy empfangen.
kann mir jemand sagen wo ich als VB noob, meinen Fehler habe?
Ich will einfach nur den Empfangswert ausgeben lassen.
Meine Letzter versuch sieht so aus:
Private Sub Form_Load()
MSComm1.CommPort = 11
MSComm1.Settings = „9600,N,8,1“
MSComm1.PortOpen = True
MSComm1.RThreshold = 1
MSComm1.SThreshold = 1
MSComm1.InputLen = 0
MSComm1.Output = "AT+csq " & vbCr
End Sub
Private Sub MSComm1_OnComm()
Select Case MSComm1.CommEvent
Case comOverrun
MsgBox „Datenverlust!“
Case comRxOver
MsgBox „Datenverlust!“
Case comEvReceive
Text1.Text = MSComm1.Input
End Select
End Sub
Private Sub Text1_Change()
End Sub