<SCRIPT language=JavaScript>
function verifica()
{
  if (document.form1.seuemail.value == "")
  {
    alert("O campo 'Seu e-mail' deve ser preenchido!");
    document.form1.seuemail.setFocus;
    return false;
  }
  if (document.form1.email.value == "")
  {
    alert("O campo 'e-mail' deve ser preenchido!");
    document.form1.email.setFocus;
    return false;
  }
  if (document.form1.seuemail.value == "")
  {
    alert("O campo 'Seu nome' deve ser preenchido!");
    document.form1.seunome.setFocus;
    return false;
  }
  else
  if (document.form1.nome.value == "")
  {
    alert("O campo 'Nome' deve ser preenchido!");
    document.form1.nome.setFocus;
    return false;
  }

  var email = document.form1.seuemail.value;
  if (email.indexOf(" ") > -1)
  {
    alert("O campo 'Seu e-mail' não pode contêr espaços em branco!");
    document.form1.seuemail.setFocus;
    return false;
  }

  if (!(email.indexOf("@") > 0 && email.indexOf("@") < email.length - 1 && email.charAt(email.indexOf("@") - 1) != " " && email.charAt(email.indexOf("@") + 1) != " "))
  {
    alert("O e-mail informado para o campo 'Seu e-mail' é inválido!");
    document.form1.seuemail.setFocus;
    return false;
  }
  
  email = document.form1.email.value;
  if (email.indexOf(" ") > -1)
  {
    alert("O campo 'E-mail' não pode contêr espaços em branco!");
    document.form1.email.setFocus;
    return false;
  }

  if (!(email.indexOf("@") > 0 && email.indexOf("@") < email.length - 1 && email.charAt(email.indexOf("@") - 1) != " " && email.charAt(email.indexOf("@") + 1) != " "))
  {
    alert("O e-mail informado para o campo 'e-mail' é inválido!");
    document.form1.email.setFocus;
    return false;
  }

  if (document.form1.seuemail.value==document.form1.email.value)
  {
    if (confirm(document.form1.seunome.value+", você digitou o mesmo email nos 2 campos. Enviar indicação assim mesmo?"))
    {
      return true;
    }
    {
      return false;
    }
  }
  else
  {
    return true;
  }
}
</SCRIPT>

<%
if(Request("nome") <> "" and Request("seunome") <> "" and Request("email") <> "" and Request("seuemail") <> "") then
BodyText = "<html><body>"
BodyText = BodyText & "<table width=""100%"" border=""0"" cellpadding=""2"" cellspacing=""0"" bgcolor=""whitesmoke"" style=""border-bottom: 1px solid gainsboro""><tr><td><font size=""2"" face=""Arial, Helvetica, sans-serif""><strong><font color=""black"">Engebuilder - Software de Desenvolvimento</font></strong></font> </td></tr></table><p align=""justify""><font size=""2"" face=""Arial, Helvetica, sans-serif"">Olá <b>" & Request("nome") & "</b>! Seu amigo <b><u>" & Request("seunome") & " <A  href=""mailto:" & Request("seuemail") & """>(" & Request("seuemail") & ")</A></u></b> convidou-lhe para conhecer o site do Engebuilder®.</font></p><p align=""justify""><font size=""2"" face=""Arial, Helvetica, sans-serif"">O software Engebuilder  é uma ferramenta para desenvolvimento de aplicações. Possui um conjunto de funcionalidades integradas em um único ambiente, permitindo o desenvolvimento de um trabalho de alto nível.</font></p><p align=""justify""><font size=""2"" face=""Arial, Helvetica, sans-serif"">Mais detalhes: <a href=""http://www.engebuilder.com.br"">CLIQUE AQUI</a> ou acesse diretamente no seu browser: www.engebuilder.com.br</font></p>"
BodyText = BodyText & "</body></html>"
erro = enviaEmail(Request("email"), "" & "Indicação" & "", BodyText)
%>
<BR>
<TABLE id=table2 width="90%" border=0>
  <TBODY>
  <TR BACKGROUND="undefined">
    <TD class=conteudo background=undefined>Obrigado por indicar nosso site! 
      Clique <A href="indique_este_site.asp">AQUI</A> para 
voltar!</TD></TR></TBODY></TABLE>
<% else %>

<FORM name=form1 onsubmit="return verifica()" action=indique_este_site.asp method=post>
<TABLE id=table1 width="90%" border=0>
  <TBODY>
  <TR BACKGROUND="undefined">
    <TD class=conteudo background=undefined colSpan=2>Indique este site para um amigo. Por favor preencha os campos abaixo e clique em "Indicar"<BR>&nbsp;</TD></TR>
  <TR BACKGROUND="undefined">
    <TD class=conteudo align=right width="26%" background=undefined>Seu nome:</TD>
    <TD width="73%" background=undefined><INPUT src="undefined" size=45 name=seunome></TD></TR>
  <TR BACKGROUND="undefined">
    <TD class=conteudo align=right width="26%" background=undefined>Seu e-mail:</TD>
    <TD width="73%" background=undefined><INPUT src="undefined" size=45 name=seuemail></TD></TR>
  <TR BACKGROUND="undefined">
    <TD class=conteudo align=right width="26%" background=undefined>Nome de seu amigo:</TD>
    <TD width="73%" background=undefined><INPUT src="undefined" size=45 name=nome></TD></TR>
  <TR BACKGROUND="undefined">
    <TD class=conteudo align=right width="26%" background=undefined>E-mail do seu amigo:</TD>
    <TD width="73%" background=undefined><INPUT src="undefined" size=45 name=email></TD></TR>
  <TR BACKGROUND="undefined">
    <TD width="26%" background=undefined>&nbsp;</TD>
    <TD width="73%" background=undefined>&nbsp;</TD></TR>
  <TR BACKGROUND="undefined">
    <TD width="26%" background=undefined>&nbsp;</TD>
    <TD width="73%" background=undefined><INPUT type=submit src="undefined" value=Indicar name=Indicar><INPUT type=reset src="undefined" value=Limpar name=Limpar></TD></TR></TBODY></TABLE></FORM>
	<% end if %>