FoxPro/Visual FoxPro - Alarma

   
Vista:
Imágen de perfil de Analia

Alarma

Publicado por Analia (186 intervenciones) el 26/08/2010 05:57:39
Hola !!, como hago para que utilizando el MSCalender 6.0 ha determinada hora de determinado dia suene una alarma.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Alarma

Publicado por Juan Fernando (533 intervenciones) el 26/08/2010 22:08:53
Agrega el Set bell ON en el Init del Formulario
y luego agrega el resto de código en el evento del Olecontrol,también vas a necesitar insertar un Timer1 para controlar los segundos ,en su evento Interval

Esto de abajo lo modificas queda casi listo lo que necesitas desarrollar

wfechain=STR(YEAR(DATE()),4)+PADL(ALLTRIM(STR(MONTH(DATE()),2)),2,'0')+PADL(ALLTRIM(STR(DAY(DATE()),2)),2,'0')

SELECT auxrec
SCAN FOR SUBSTR(auxrec.date,1,8)= wfechain
IF ch < 0.0
INSERT INTO tmpGrid (Estación, Fecha, Parámetro, CH) VALUES ("ARA", auxrec.date,auxrec.name,auxrec.ch)
SET BELL TO 'C:\Archivos de programa\Windows NT\Pinball\SOUND4.wav'
?? CHR(7)
parametro = auxrec.name
fech = auxrec.date
mensaje = 'ARA' + parametro + fech
condicion = 0 + 48
titulo = 'ALARMA'
MESSAGEBOX(mensaje, condicion,titulo)
ENDIF
ENDSCAN
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Analia

RE:Alarma

Publicado por Analia (186 intervenciones) el 26/08/2010 23:42:39
Hola !!, la fecha y la hora serian ingresadas por e usuario.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar