Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Phone Dialer
Message
De
19/09/1999 01:21:41
 
 
À
18/09/1999 08:00:06
Information générale
Forum:
Visual FoxPro
Catégorie:
Classes - VCX
Titre:
Divers
Thread ID:
00266295
Message ID:
00266443
Vues:
35
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
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform