Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Sending a phone call for a voice mail
Message
De
13/07/2001 13:03:28
 
 
À
13/07/2001 13:00:33
Information générale
Forum:
Visual FoxPro
Catégorie:
Contrôles ActiveX en VFP
Divers
Thread ID:
00530268
Message ID:
00530381
Vues:
32
>Ok, it works.
>
>Here's what I do:
>
>
oPhone=CREATEOBJECT('Form')
>oPhone.AddObject('Phone','Olecontrol','MSCOMMLib.MSComm')
>oPhone.Phone.Settings='9600,N,8,1'
>WAIT WINDOW 'Setting up modem' TIMEOUT 1
>oPhone.Phone.CommPort=1
>WAIT WINDOW 'Setting up comm port' TIMEOUT 1
>oPhone.Phone.PortOpen=.T.
>WAIT WINDOW 'Opening port' TIMEOUT 1
>oPhone.Phone.Output='ATDT123-4567;'+CHR(13)
>FOR lnCompteur=1 TO 35
>   WAIT WINDOW 'Dialing '+ALLTRIM(STR(lnCompteur)) TIMEOUT 1
>NEXT
>oPhone.Phone.Output='ATH'+CHR(13)
>WAIT WINDOW 'Closing the connection' TIMEOUT 1
>oPhone.Phone.PortOpen=.F.
>
>
>This records a voice mail. What was needed is to close the call as soon as the voice mail kicks in.
>
>Now, I have a recorded voice mail. It works all the time. All I need which would be cool is just to send something that will be recorded as sound on the voice mail. That would be useful to differentiate it from any other empty calls we may receive.

Great. You've got to drop that modem back to command and tell it to dial again, like "ATDT 12345678" or whatever to give you a distinct cue. You are getting closer...
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform