Slt ,
J'essaie de créer un programme pour recevoir les SMS via un modem WaveCom RS232 et j'utilise la MSComm et les commade AT.
j'ai commencé mes tests en faisant un appel vocal à partir du VB via la commande "ATD<2145524455>"
et c okCode:
1
2
3
4 MsComm1.CommPort=1 MSComm1.Settings = "9600,N,8,1" MSComm1.PortOpen=True MSComm1.OutPut="ATD<0123255645>" & Chr$(13)
ensuite j'ai commencé à faire les essai pour la lesture des SMS en utilisant ce code :
le problème c'est que le "MSComm1.InBufferCount " est toujours à zéros ,c 'est à dire aucune réponse et de même il n'y a aucun évènement avec la "comEvReceive "Code:
1
2
3
4
5
6 If MSComm1.InBufferCount > 0 then MSComm1.OutPut="AT+CMGR=1" & Chr$(13) Dim Buffer Buffer = Buffer & MSComm1.Input End if
Que faire ? :cry: