Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Phone Dialer
Message
From
19/09/1999 01:21:41
 
 
General information
Forum:
Visual FoxPro
Category:
Classes - VCX
Title:
Miscellaneous
Thread ID:
00266295
Message ID:
00266443
Views:
34
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
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform