Power Builder - Correo Automatico

Tengo que crear una aplicacion que envie un correo a ciertas horas pero lo que necesito es que ella sola envie el correo. Algo asi como una tarea programada de windows que se ejecuta sola a una hora especifica. Alguien me puede decir donde la puedo conseguir o donde puedo conseguir algo que haga algo como asi.

Gracias.

Hola Pepe:

Porque no hechas un vistao a los ejemplos de PB, ahi tiene un ejemplo de como leer y enviar un e-mail a traves de PB, a este ejemplo solo debes hacer el proceso de automatización.

Se que requieres un ejemplo práctico, pero es muy extenso y dificil de ponerlo en el foro.

Si deseas que te envie un ejemplo práctico, escribeme y con gusto te lo envio amigo.

antonio

Un saludo especial desde COLOMBIA

Bueno, solo si usas ORACLE te pueda servir, ya que este poderoso manejador de DBs trae ya un paquete o utilidad que envía un correo automáticamente.

solo es:

- Definir el paquete en PB
- llamarlo y mandarle algunos parametros como la dirección, el mensaje, el asunto entre otros.
- si necesitas enviarlo a varias personas solo basta que lo metas en un ciclo.

el paquete se llama UTL_SMTP y tiene varios metodos o subprogramas como OPEN_CONECTION(...) abre la conexion con el servidor de correo
HELO = es el saludo o asunto
MAIL = correo de quien envia
RCTP = correo a quien va dirigido

entre otro varios que definen el contenido, las copias etc.

en la dirección de oracle encontrarás documentación al respecto..

espero que soluciones el problema

Lo que puedes hacer en PB, es utilizar el evento Timer y a una determinada hora disparar un evento cualquiera con Trigger.

Mediante este ejemplo (hipersimple, es sólo una idea) podrás enviar diferentes mensajes a diferentes destinatarios, en la hora que programes.

1. Primero creas una aplicación normal para enviar correo (puedes ver el ejemplo que trae PB), o te bajas una aplicación que envía correo de:

http://www.iespana.es/powerbuilder/
En el enlace Ejemplos PBL, existe uno llamado Correo.zip (de 10 KB)

2. Creas un DW, con los campos: destinatario, asunto y cuerpo (si quieres ocultas el DW en la ventana).

3. En la misma ventana existen tres botones principales:
* cb_siguiente (va al siguiente registro del DW).
* cb_trasvasar (trasvasa o copia los datos del registro actual del DW a los SingleLineEdit del correo).
* cb_enviar (envia el mensaje actual).

4. Script de los botones:
* Botón siguiente:
Dw_1.ScrollNextRow()
* Botón Trasvasar
Int li_reg
//Obtenemos el numero de registro actual del DW
li_reg=dw_1.GetRow()
//Mostramos los datos de ese registro en los SingleLineEdit del correo
sle_destinatario.Text=String(dw_1.GetItemString(li_reg,"destinatario"))
sle_asunto.Text=String(dw_1.GetItemString(li_reg,"asunto"))
sle_cuerpo.Text=String(dw_1.GetItemString(li_reg,"cuerpo"))
* Botón enviar
//Eso mismo
//CONTINUA...

(continuación...)
5. Ahora controlas el evento Timer (puedes dar una mirada al post: Temporizador). La adaptación sería:
- Evento Open de la ventana:
dw_1.settransobject(sqlca)
dw_1.retrieve()
st_hora.text=string(Now(),"hh:mm:ss")
Timer(1)

- Evento Timer de la ventana:
string ls_hora
st_hora.Text=string(Now(),"hh:mm:ss")
ls_hora=string(st_hora.Text)

choose case ls_hora
//Envía el primer mensaje
Case "08:32:00"
cb_trasvasar.TriggerEvent(Clicked!)
cb_enviar.TriggerEvent(Clicked!)

//Envía el segundo mensaje
Case "19:20:30"
cb_siguiente.TriggerEvent(Clicked!)
cb_trasvasar.TriggerEvent(Clicked!)
cb_enviar.TriggerEvent(Clicked!)
End choose

Notas:
* En realidad lo que haces con TriggerEvent, es utilizarla como una "mano invisible" que da un clic a una determinada hora, en los botones que le indiques.
* Ya va de ti, si quieres ocultar tu ventana cuando se inicie tu aplicación, etc. etc.