ENVIOS DE EMAILS POR FOX

153 views
Skip to first unread message

Marcelo Moreno

unread,
Feb 15, 2020, 5:29:24 AM2/15/20
to publice...@googlegroups.com
hola amigos ten go un programa para enviar facturas por email , envia en el
email a un conjunto de personal en forma automotatica y continua si 
tengo 100 personas les envia a las 100 personas en forma continua su factura, el problema que tengo es cuando el email esta mal o por alguna razon no puede enviar una factura a email determinado me genera un error que me detiene el programa de envies y tengo que en forma manual ignorar el error para que el programa continue enviando los email a los restantes, hay alguna forma de manejar ese error para que no tenga que poner ignore  y el programa continue con los demas

Zarlu

unread,
Feb 15, 2020, 7:02:32 AM2/15/20
to Comunidad de Visual Foxpro en Español
Buenos días Marcelo Moreno!

Quizá pueda servirte el manejo de errores...

Al iniciar tu sistema:
On Error Do hayerror With ERROR( ), MESSAGE( ), MESSAGE(1), PROGRAM(), LINENO( )

y en "hayerror.prg" algo como esto:

Parameter merror, mess, mess1, mprog, mlineno
Do CAse
    CASE mError=??
    *aquí pones la acción a realiza o "Retry" o "Return To Master" según sea el caso
    CASE mError=??
    *aquí pones la acción a realiza o "Retry" o "Return To Master" según sea el caso
    OtherWise
        MESSAGEBOX('Número de error: ' + LTRIM(STR(merror))+CHR(13)+;
            'Mensaje del error: ' + mess+CHR(13)+;
            'Línea que causo el error: ' + mess1+CHR(13)+;
            'Número de línea del error: ' + LTRIM(STR(mlineno))+CHR(13)+;
            'Programa en el que se originó el error: '+ mprog,48,"Error del programa")
EndCase   

Debes determinar  bien el número de error y las causas para aplicar la acción correcta.
Hablamos de errores por factores/situaciones externas.
Con un mail incorrecto el mensaje debe salir aunque después sea  rechazado.
Una cadena mal formada de correo puede validarse antes de enviar el correo y no sería objeto del manejo de errores sino de un código que lo "salte" y el proceso continúe.

Suerte
Zarlu
Chetumal, Quintana Roo, México



Marcelo Moreno

unread,
Feb 16, 2020, 4:01:34 PM2/16/20
to publice...@googlegroups.com
te agradezco mucho ya lo solucione con try
saludos 

--
Visita el Blog de la Comunidad Visual FoxPro en Español: http://comunidadvfp.blogspot.com
---
Has recibido este mensaje porque estás suscrito al grupo "Comunidad de Visual Foxpro en Español" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a publicesvfoxp...@googlegroups.com.
Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/82f48651-bce0-429e-99a0-1d64232692f1%40googlegroups.com.
Reply all
Reply to author
Forward
0 new messages