émettre et lire msg
marriouma
Messages postés
2
Date d'inscription
Statut
Membre
Dernière intervention
-
marriouma Messages postés 2 Date d'inscription Statut Membre Dernière intervention -
marriouma Messages postés 2 Date d'inscription Statut Membre Dernière intervention -
J'ai un code vb pour émettre un msg via un module gsm
Private Sub Command1_Click()
MSComm1.CommPort = 3 ' Com4 Port
MSComm1.Settings = "115200,n,8,1"
MSComm1.InputLen = 0
MSComm1.PortOpen = True
MSComm1.Output = "AT" & Chr$(13) & Chr(10)
MSComm1.Output = "AT+CMGF=1" & Chr$(13) & Chr(10)
MSComm1.Output = "AT+CMGS=" & Chr$(34) & "+50683999999" & Chr$(34) & Chr(13) & Chr(10)
MSComm1.Output = "My testing message" & Chr(26)
MSComm1.PortOpen = False
End Sub
ce que j'arrive pas à le résoudre comment je fais pour lire la réponse de MSComm1 de savoir si le message a été envoyé avec succès?
Merci d'avance :)
Private Sub Command1_Click()
MSComm1.CommPort = 3 ' Com4 Port
MSComm1.Settings = "115200,n,8,1"
MSComm1.InputLen = 0
MSComm1.PortOpen = True
MSComm1.Output = "AT" & Chr$(13) & Chr(10)
MSComm1.Output = "AT+CMGF=1" & Chr$(13) & Chr(10)
MSComm1.Output = "AT+CMGS=" & Chr$(34) & "+50683999999" & Chr$(34) & Chr(13) & Chr(10)
MSComm1.Output = "My testing message" & Chr(26)
MSComm1.PortOpen = False
End Sub
ce que j'arrive pas à le résoudre comment je fais pour lire la réponse de MSComm1 de savoir si le message a été envoyé avec succès?
Merci d'avance :)
A voir également:
- émettre et lire msg
- Lire le coran en français pdf - Télécharger - Histoire & Religion
- Lire epub - Guide
- Lire fichier bin - Guide
- Comment lire un message supprimé sur whatsapp - Guide
- Lire iso - Guide
j'utilise a virtual port com et il fonctionne correctement, est ce que je peux visualiser un acquisé sur l'hyperterminal? merci bien :)