envoyer SMS à partir d'ACCESS

[cbleas]

Bonjour,

Une question que je me pose est de savoir si il est possible d'envoyer automatiquement des SMS à partir d'ACCESS.

Bonne soirée

[francishop]

Bonjour,

Quelques éléments de réponse :
http://www.developpez.net/forums/sho...&highlight=sms
http://www.developpez.net/forums/sho...&highlight=sms

Il est vrai qu'il semble difficile de trouver "du concret" sur le sujet

Cordialement.

[cbleas]

Merci Francishop,

j'ai essayé d'utilisé le code

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Dim MSComm1
Set MSComm1 = CreateObject("MSCOMMLib.MSComm")
Dim el As String
 
MSComm1.CommPort = 14
MSComm1.Settings = "460800,N,8,1"
MSComm1.InputLen = 0
 
MSComm1.PortOpen = True
 
MSComm1.Output = "AT+cmgf=1" & Chr(13)
 
MSComm1.Output = "AT+CMGS=" & Chr(34) & "+336xxxxxxx" & Chr(34) & Chr(13)
MSComm1.Output = Me.Texte & Chr(26)
 
MSComm1.PortOpen = False

le problème est qu'il m'envoi une erreur du au fait que le controle Active X n'est pas enregistré.

avez vous une idée merci.