<% dim termino,acao ,nome ,texto , estado ,cidade ,telefone, email, info, Host acao = request.form("acao") if acao = "enviar" then nome = request.form("realname") estado=request.form("estado") cidade= request.form("cidade") telefone = request.Form("telefone") email =request.Form("email") info = request.form("comentarios") Host ="mail.planodedeus.org" texto = "Nome: " & nome & "
" texto = texto & "Cidade: " & cidade & "
" texto = texto & "Estado: " & estado & "
" texto = texto & "Telefone: " & telefone & "
" texto = texto & "Email: " & email & "
" texto = texto & "Mensagem: " & info & "
" ErrStr = "" Set eObjMail = Server.CreateObject("Persits.MailSender") eObjMail.Host = "mail.planodedeus.org" eObjMail.From = "visita@planodedeus.org" eObjMail.FromName = "PlanodeDeus.Org" eObjMail.AddAddress "visita@planodedeus.org" 'eObjMail.AddAddress "@.br" eObjMail.Subject = "Aceitando a Cristo" eObjMail.isHTML = true eObjMail.Body = texto eObjMail.UserName = "visita@planodedeus.org" eObjMail.PassWord = "Vt01112015" On Error Resume Next if not eObjMail.Send Then ErrStr = Err.Description response.write(ErrStr) Else termino="OK" end if end if %> <% if termino <> "OK" then %>

Gostaríamos de saber o que Jesus fez em sua vida.

Por favor, preencha os dados abaixo e envie para nós e estaremos enviando GRATUITAMENTE uma BÍBLIA, a Palavra de Deus, para ser utilizada por você em seu computador. É importante que seus dados sejam corretos, principalmente seu e-mail, para que possamos enviar o endereço para download da mesma. E mais uma vez, ficamos felizes por você fazer parte da família de Deus.

Deus o(a) abençõe!

Nome:
Cidade:
Estado:
Telefone:
E-mail:
Escreva sua mensagem:

  
<%else%>


Obrigado por visitar nossa página!

Parabéns,

Estamos muito felizes por você ter dado o maior passo que um ser humano pode dar aqui nesta Terra.
Uma nova caminhada se inicia agora em sua vida e que com certeza poderá ser vista e sentida por você e por aqueles que estão próximos.
O Ministério Plano de Deus se encontra a sua disposição para esclarecer dúvidas e auxiliá-lo(a) da melhor forma possível nesta nova jornada.
Estaremos enviando seus dados para que nossos colaboradores possam auxiliá-lo(a) em oração e assim que desejar, pediremos aos nossos colaboradores mais próximos de sua residência que façam uma visita e lhe deêm toda a assistência necessária, que é extremamente importante, para aqueles que estão começando.
Sugerimos a você que procure uma igreja evangélica, cheia do Espírito Santo, mais próxima de sua casa e converse com o Pastor referente a sua conversão.
Isto é muito importante para seu crescimento espiritual.
Se desejar enviaremos alguns endereços de nossa base de dados das igrejas em sua cidade para que possa fazer a escolha.
Uma biblia via download é oferecida GRATUITAMENTE a todos que aceitam a Cristo através de nosso site.
O link para baixá-la é: http://www.planodedeus.org/biblia/biblia.zip
(3Mb aproximadamente).

Nossos parabéns!
Você faz parte da família de Deus!
Ev. Jeferson Keidann

<% end if %>