>>No, I don't need to send voice. Well, if sending a string is considered sending a voice, then I won't be able to do it. Basically, I just need to send something so it'll activate the voice mail. The cell phone doesn't work as the home phone. The voice mail on it needs to receive a sound. At home, as soon as you reach the voice mail, it'll be recorded even if you hang up.
>
>Now there may be some hope. As Len said, you need specific data for your modem. Once you drop back into command mode, you might be able to tell it to send a string of DTMF digits to activate your voice mail. Got a manual for the modem?
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.