Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Hacer una llamada a un numero telefonico que esta en un
Message
De
26/01/1999 17:00:22
 
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Divers
Thread ID:
00179670
Message ID:
00180500
Vues:
24
>HOLA, QUIERO HACER UNA LLAMADA A UN NUMERO TELEFONICO QUE ESTA EN CAMPO A UNA HORA ESPECIFICADA, COMO LO PUEDO HACER, CON UN CONTROL O ??????
>
>
>DE ANTEMANO MUCHAS GRACIAS,
>
>
>
>OSCAR LEONARDO COTAMO SILVA
>TECHNOIN@B-MANGA.MULTI.NET.CO

Hey Oscar,

Con respecto a la otra respuesta que obtuviste, espero que te hayas sonreido lo mismo que yo. Esta claro que Evan tuvo buenas intenciones, pero seguramente busco en el diccionario la traduccion de "thread". Lo que quiso decir fue la discusion #, y no la "cuerda de rosca".

Para hacerlo mas facil, estoy copiando y traduciendo una respuesta de Marcia Akins a la misma pregunta que tu haces:

"Si quieres lograr que VFP marque un numero especifico, lo puedes hacer con codigo, sin necesidad de utilizar un control externo. Solamente tienes que cargar la utileria FOXTOOLS.FLL con el comando SET LIBRARY TO FOXTOOLS.FLL ADDITIVE y el codigo es como sigue:

lcNum2Dial = "222-3333" && Tu numero telefonico

lccomport="COM3" && Tu puerto serial (modem)
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('Marcando '+ALLTRIM(lcNum2Dial)+CHR(13)+CHR(13)+;
"Levante el telefono y marque cualquier numero ",64, APPNAME_LOC)
* N. del T. Aqui no se cual es el rollo
lcdstring=CHR(10)+CHR(13)+CHR(10)+CHR(13)

=CallFn(WriteComm, lnport, lcdstring, len(lcdstring))
=CallFn(CloseComm, lnport)

Marcia"

En otras respuestas alguien menciono el uso del control MSCOMM32.OCX.
Espero sea de ayuda.
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform