Ayuda por favor...!!!!!
Publicado por Francisco (19 intervenciones) el 14/06/2005 19:13:32
Hola a todos y de antemano gracias.
Tengo un Formulario al que le he agregado el Control MScomm para poder acceder a cualquier puerto COMn.. El Asunto es que en el Evento OnComm del control he puesto el siguiente código :
evento = thisform.olecontrol1.commevent
do case
case evento=2
thisform.mensaje.value='recibir datos'
case evento=7
thisform.mensaje.value='recibiendo caracteres EOF'
case evento=6
thisform.mensaje.value='alguien está llamando....'
secuencia='ATA'
secuencia=secuencia+chr(13)
thisform.olecontrol1.output=secuencia
endcase
La idea de esto es que he puesto un textbox llamado Mensaje cuando alguén me esté llamando a mi teléfono (la línea la tengo conectada al modem) que me aparezca en el textbox el mensaje correspondiente a la opción. Pero no lo hace y no sé porqué.
Espero la ayuda. Gracias y Saludos.
Tengo un Formulario al que le he agregado el Control MScomm para poder acceder a cualquier puerto COMn.. El Asunto es que en el Evento OnComm del control he puesto el siguiente código :
evento = thisform.olecontrol1.commevent
do case
case evento=2
thisform.mensaje.value='recibir datos'
case evento=7
thisform.mensaje.value='recibiendo caracteres EOF'
case evento=6
thisform.mensaje.value='alguien está llamando....'
secuencia='ATA'
secuencia=secuencia+chr(13)
thisform.olecontrol1.output=secuencia
endcase
La idea de esto es que he puesto un textbox llamado Mensaje cuando alguén me esté llamando a mi teléfono (la línea la tengo conectada al modem) que me aparezca en el textbox el mensaje correspondiente a la opción. Pero no lo hace y no sé porqué.
Espero la ayuda. Gracias y Saludos.
Valora esta pregunta
0