Hola por primera vez en este foro y felicidades por este medio de ayuda y que a su vez da la oportunidad de aprender de todos.
Estoy haciendo una base de datos en access para el departamento de bomberos, la cual he realizado un formulario de captura en el cual el bombero captura de forma inmediata lso datos del incendio.
Ok. Aqui enpieza lo que tengo en mente hacer y estoy a la mitad del camino.
Dentro del formulario de captura le he creado al bombero un boton donde mande un mensaje instantaneo por medio del net send.
y esto lo hago con el siguiente codigo:
Private Sub Comando72_Click()
On Error GoTo Err_Comando72_Click
Dim stAppName As String
If [Nivel de Emergecia] = "Mayor" And Fecha = Date Then
stAppName = "net send 142.116.20.85 Se presento un emergencia de nivel grave. ¡Para ver detalles abrir Sistema de Emergencias SIPAC"
Call Shell(stAppName, 1)
Else
MsgBox "No se enviara el Mansaje instantaneo debido a que no es una emergencia Grave o el regristro esta vacio"
Exit_Comando72_Click:
Exit Sub
Err_Comando72_Click:
MsgBox Err.Description
Resume Exit_Comando72_Click
End If
End Sub
Bueno hasta aqui ya envia a los equipos que elija un mensaje de texto, pero ahora necesito que tambien mande un sonido de alarma y estoy en eso....tengo la idea de que programando una API...podria ser la solucion....o probablemente exista un software que haga esa funcion.....ojala me puedan orinetar.
Un Saludo Alfredo Aoyama
