Hi Marcia,
That looks great. I ran the code after setting library to foxtools.fll
I got an error because lccomport was not defined. I thought that it was the comport that my modem is sitting on so I set lccomport = '2'. lnport was then returned as -1. What do you think?
Neil
>Hi Neil.
>
>>> Does anyone know of a Phonedialer that will make your modem, and sound card work in conjunction to simulate a regulat telephone call <<
>
>If you are talking about code that will merely dial a phone number programmatically, this should do it. It assumes that you have FoxTools loaded.
>
>
>lcdstring = "ATDT " + lcNum2Dial + CHR(13)
>
>opencomm = RegFn("OpenComm", "CII", "I", 'User.exe')
>writecomm = RegFn("WriteComm", "ICI", "I", 'User.exe')
>closecomm = RegFn("CloseComm", "I", "I", 'User.exe')
>
>lnport = CallFn(OpenComm, lccomport, 100, 100)
>
>=CallFn(WriteComm, lnport, lcdstring, len(lcdstring))
>
>=MESSAGEBOX('Dialing '+ALLTRIM(lcNum2Dial)+CHR(13)+CHR(13)+;
> "Pick up the phone and press any key",64)
>
>lcdstring=CHR(10)+CHR(13)+CHR(10)+CHR(13)
>
>=CallFn(WriteComm, lnport, lcdstring, len(lcdstring))
>=CallFn(CloseComm, lnport)
>
>
>Marcia