Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Telephone Dialing
Message
From
31/05/1996 19:01:10
Craig Schramm
Troxell Communications, Inc.
Phoenix, Arizona, United States
 
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00001689
Message ID:
00001848
Views:
36
>Can anyone give me a hint on how to creat a way to
>dial a phone thruough the comm port by way of a
>command button, using numbers stored in a table?


Hello Marvin:

Sorry you didn't get this a few days ago, I sent this same response to the wrong person a few days back

Here's one way,

SET LIBRARY TO foxtools.fll

OPENCOMM = REGFN("OpenComm", "CII", "I")
WRITECOMM = REGFN("WriteComm", "ICI", "I")
CLOSECOMM = REGFN("CloseComm", "I", "I")
ATCommand = "ATDT" + NUMTODIAL + CHR(13)

COM1 = CALLFN(OPENCOMM, "COM1:", 100, 100)

=CALLFN(WRITECOMM, COM1, ATCommand, LEN(S))

=MSGBOX("Dialing "+NUMTODIAL+" Press OK when connected","DIALER",0)

ATCommand = "ATH0" + CHR(13)

=CALLFN(WRITECOMM, COM1, ATCommand, LEN(S))

=CALLFN(CLOSECOMM, COM1)


Craig
craig@trox.com
Previous
Reply
Map
View

Click here to load this message in the networking platform