>Ok, now that I have succeeded in dialing a phone number, I need to be able to have the modem to stay connected as long as the voice mail message is over so a message will be left. Here is the code I have so far. Anyone know how to achieve that?
>
>

>PUBLIC oPhone
>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='ATDT923-1406'+CHR(13)
>WAIT WINDOW 'Dialing' TIMEOUT 1
>

I'm not sure how to do what you want, but would this package suit your needs (I haven't tried it).

http://www.voicemailspecial.com/