>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