Missão Eu Estou Vivo - Bem vindo

Missão Eu Estou Vivo   


 


Estejamos em peregrinação de amor e esperança :  Nas igrejas, nos hospitais,
nas escolas, nas famílias, nas comunidades religiosas.  Bem vindo !

<% Dim AcceptYN Dim tEmail If Request.Form ("accepter") = "non" Then AcceptYN= "Je refuse de partager mon témoignage ci-haut." Else AcceptYN= "J'accept de partager mon témoignage ci-haut." End If If len(Request.Form ("Courriel")) > 0 Then tEmail = Request.Form ("Courriel") Else tEmail = "info@mjsv.org" End If Dim CDONTSObj, MessageBody Set CDONTSObj = Server.CreateObject("CDONTS.NewMail") CDONTSObj.To = "info@mjsv.org" CDONTSObj.From = tEmail CDONTSObj.BodyFormat=0 CDONTSObj.MailFormat=0 MessageBody = "Cher Mission,
" _ & "
Voici mon témoignage: " & Request.Form ("temoignagetexte") _ & "
De: " & Request.Form ("Nom") _ & "
Pays: " & Request.Form ("Pays") _ & "

" & AcceptYN & "

" _ & "" CDONTSObj.Subject = "Mon témoignage, message ou information en Portugais" CDONTSObj.Body = MessageBody CDONTSObj.Send Set CDONTSObj = nothing %>

Partilha O vosso testemunho foi-nos enviado
através do correio electónico.

Os nossos agradecimento.