Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Sending a phone call for a voice mail
Message
De
14/07/2001 07:30:00
 
 
À
13/07/2001 14:27:11
Information générale
Forum:
Visual FoxPro
Catégorie:
Contrôles ActiveX en VFP
Divers
Thread ID:
00530268
Message ID:
00530634
Vues:
34
>
>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='AT#CLS=8'+CHR(13)
>WAIT WINDOW 'Initialization string 1' TIMEOUT 1
>oPhone.Phone.Output='AT#VRN=0'+CHR(13)
>WAIT WINDOW 'Initialization string 2' TIMEOUT 1
>oPhone.Phone.Output='AT#VLS=6'+CHR(13)
>WAIT WINDOW 'Initialization string 3' TIMEOUT 1
>
>oPhone.Phone.Output='ATDT123-4567;'+CHR(13)
>FOR lnCompteur=1 TO 37
>   WAIT WINDOW 'Dialing '+ALLTRIM(STR(lnCompteur)) TIMEOUT 1
>NEXT

 * COMMENT OUT THIS LINE oPhone.Phone.Output='ATH'+CHR(13)

>WAIT WINDOW 'Closing the connection' TIMEOUT 1
>oPhone.Phone.PortOpen=.F.
>
>
>That works. Just by hanging up the voice mail gets recorded.
>
>Does that mean, I should be able to send some digits to be recorded?

The above was what I really meant, but I have my answer IAC. THE AT#V stuff is not doing anything for us at this point I don't think. It might even be invalid for your modem. If you do so error checking by looking at the modem responses from each of your above commands, you also might be able to dump all the WAiT WINDOW stuff also.
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform