erro

www · Outubro 5, 2003

o erro que tá dando é

Erro de compilação do Microsoft VBScript erro '800a03f6'

'End' esperado

/novo/verificacadastro.asp, line 246

ALGUEM SABE COMO RESOLVER?

o cod é ...

<!--#include file="conexao3.asp"--><!--#include file="conexao.asp"--><html><head><title>Novo Hojenanoite.com.br</title><meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"><script language="JavaScript" type="text/JavaScript"><!--   function MM_preloadImages() { file://v3.0  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)    if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}}file://--></script><link href="link.css" rel="stylesheet" type="text/css"></head><body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0"><table width="760" border="0" align="center" cellpadding="0" cellspacing="0" background="images/bg_pag1.gif">  <tr>     <td colspan="3">       <div align="center">         <!--#include file=top.asp-->      </div></td>  </tr>  <tr>     <td width="151" valign="top"> <div align="center">        <!--#include file=left.asp-->      </div></td>    <td width="318" valign="top">      <table width="98%" border="0" align="center" cellpadding="0" cellspacing="0">        <tr>           <td width="312" height="19">             <div align="left"><img src="images/titulo_cadastro.gif" width="300" height="16"></div>          </td>        </tr>        <tr>           <td height="333" valign="top">             <div align="left"> <font size="1">               <% usuario = request.form("usuario")senha = request.form("senha")confirmasenha = request.form("confirmasenha:")nome = request.form("nome")sobrenome = request.form("sobrenome")endreco = request.form("endereco")bairro = request.form("bairro")cidade = request.form("cidade")uf = request.form("uf")email = request.form("telefone")telefone = request.form("telefone")juntinhu = request.form("juntinhu") ' Erro 1 - Campo obrigatorio naum digitado ' Erro 2 - Dados no campo invalidos ' Erro 3 - Usuário ja cadastrado no Hojenanoite ' Erro 4 - Cadastro Senha e Repete senha sao diferentes ' Erro 5 - Email ja existente no hojenanoite ' Erro 6 - Email ja cadastrado no juntinhu ' Erro 7 - Usuario ja cadastrado no juntinhu erro = 0  'Verifica se os campos obrigatorios foram digitados campos = "" if usuario = "" then  campos = campos & "- usuario<br>"  erro = 1 end if if senha = "" then  campos = campos & "- senha<br>"  erro = 1 end if if confirmasenha = "" then  campos = campos & "- confirmasenha<br>"  erro = 1 end if if nome = "" then  campos = campos & "- Nome<br>"  erro = 1 end if if sobrenome = "" then  campos = campos & "- sobrenome<br>"  erro = 1 end if if endereco = "" then  campos = campos & "- Endereco<br>"  erro = 1 end if if bairro = "" then  campos = campos & "- Bairro<br>"  erro = 1 end if if cidade = "" then  campos = campos & "- Cidade<br>"  erro = 1 end if if uf = "" then  campos = campos & "- Estado<br>"  erro = 1 end if if telefone = "" then  campos = campos & "- Telefone<br>"  erro = 1 end if  if email = "" then  campos = campos & "- Seu E-Mail <br>"  erro = 1 end if if juntinhu = "" then  campos = campos & "- Deseja Participar do Juntinhu? <br>"  erro = 1 end if   if erro <> 1 then   ' Verifica se o usuario jah existe no HojeNaNoite  SQL_Usuarios = "Select * from usuarios where usuario = '" & usuario & "'"  Usuarios.Open SQL_Usuarios, conexao  if Usuarios.RecordCount > 0 then   erro = 3  end if  Usuarios.close ' Verifica se o usuário jah esta cadastrado com o mesmo email  SQL_Usuarios2 = "Select * from usuarios where email = '" & email & "'"  Usuarios.Open SQL_Usuarios2, conexao  if Usuarios.RecordCount > 0 then   erro = 5  end if  Usuarios.close    'Verfica se o usuário repetiu a senha de forma correta  if senha <> confirmasenha then  erro = 4  end if  if juntinhu = S then' Verifica se o usuário jah esta cadastrado no juntinhu com o mesmo email  SQL_Usuarios3 = "Select * from usuarios where email = '" & email & "'"  Usuarios.Open SQL_Usuarios3, conexao3  if Usuarios.RecordCount > 0 then   erro = 6  end if  Usuarios.close    ' Verifica se o usuario jah existe no Juntinhu  SQL_Usuarios4 = "Select * from usuarios where usuario = '" & usuario & "'"  Usuarios.Open SQL_Usuarios4, conexao3  if Usuarios.RecordCount > 0 then   erro = 7  end if  Usuarios.close    elsejuntinhu = Nend if end if  %>                           <% if erro = 0 and juntinhu = s thenresponse.redirect "http://juntinhu.hojenanoite.com.br/juntinhu/novo/cadastro2.asp"else if erro = 0 and juntinhu = n then'Grava as informações no Banco de Dados SQL_Insere = "INSERT INTO usuarios(usuario, senha, nome, sobrenome, endereco, bairro, cidade, uf, email, telefone, juntinhu, data, hora, ip) VALUES ('" & usuario & "','" & senha & "','" & nome & "','" & sobrenome & "','" & endereco &  "','" & bairro & "','" & cidade & "','" & uf & "','" & email & "','" & telefone & "','" & juntinhu & "','" & data & "','" & hora & "', '" & ip & "');" 'response.write SQL_Insere Conexao.Execute SQL_Insere SQL_Insere2 = "INSERT INTO usuarios(usuario, senha, nome, sobrenome, endereco, bairro, cidade, uf, email, telefone, juntinhu, data, hora, ip) VALUES ('" & usuario & "','" & senha & "','" & nome & "','" & sobrenome & "','" & endereco &  "','" & bairro & "','" & cidade & "','" & uf & "','" & email & "','" & telefone & "','" & juntinhu & "','" & data & "','" & hora & "', '" & ip & "');" 'response.write SQL_Insere2 Conexao3.Execute SQL_Insere2 else if erro <> 0 then%>              </font>               <p align="center"><font size="1" color="#000000" face="Tahoma, Arial"><br>                <b>Ocorreu um Erro</b><br>                <% if erro = 1 then%>                Os campos marcados com (*)<b> são obrigatórios.<br>                </b>Os campos abaixo não foram preenchidos ou possuem dados                 inválidos:</font></p>              <p align="center"><font size="1" color="#000000" face="Tahoma, Arial"><b><%= campos %></b></font></p>              <p align="center"><font color="#000000" size="1"><b><font face="Tahoma, Arial">[                 <a href="javascript:history.back();">Voltar</a> ]</font></b></font></p>              <font color="#000000" size="1">               <% elseif erro = 2 then %>              </font>               <p align="center"><font size="1" color="#000000" face="Tahoma, Arial"><b>Os dados digitados por você em um de nossos campos não conferem ou não estão de acordo com nossa regra de validação, clique em voltar altera seus dados e tente novamente.</b></font></p>              <p align="center"><font color="#000000" size="1"><b><font face="Tahoma, Arial">[                 <a href="javascript:history.back();">Voltar</a> ]</font></b></font></p>              <font color="#000000" size="1">      <% elseif erro = 3 then %>              </font>               <p align="center"><font size="1" color="#000000" face="Tahoma, Arial"><b>O                 usuário <%= usuario %> já existe em nosso sistema. Por favor selecione                 outro nome de usuário.</b></font></p>              <p align="center"><font color="#000000" size="1"><b><font face="Tahoma, Arial">[                 <a href="javascript:history.back();">Voltar</a> ]</font></b></font></p>              <font color="#000000" size="1">     <% elseif erro = 4 then %>              </font>               <p align="center"><font size="1" color="#000000" face="Tahoma, Arial"><b>Existe                 dois campos em nosso formulário chamados Senha e Confirma Senha                 , a senha digitada em senha e Confirma Senha não são idênticas,                 clique em voltar corrija este erro e tente novamente.</b></font></p>              <p align="center"><font color="#000000" size="1"><b><font face="Tahoma, Arial">[                 <a href="javascript:history.back();">Voltar</a> ]</font></b></font></p>              <font color="#000000" size="1">              <% elseif erro = 5 then %>              </font>               <p align="center"><font size="1" color="#000000" face="Tahoma, Arial"><b>O                 email <%= email %> digitado por você já está cadastrado no HojeNanoite.                 Clique em voltar altere o email e tente novamente.</b></font></p>              <p align="center"><font color="#000000" size="1"><b><font face="Tahoma, Arial">[                 <a href="javascript:history.back();">Voltar</a> ]</font></b></font></p>              <font color="#000000" size="1">               <% elseif erro = 6 then %>              </font>               <p align="center"><font size="1" color="#000000" face="Tahoma, Arial"><b>O                 email <%= email %> digitado por você já está cadastrado no Juntinhu.                 Clique em voltar altere o email e tente novamente.</b></font></p>              <p align="center"><font color="#000000" size="1"><b><font face="Tahoma, Arial">[                 <a href="javascript:history.back();">Voltar</a> ]</font></b></font></p>              <font color="#000000" size="1">               <% elseif erro = 7 then %>              </font>               <p align="center"><font size="1" color="#000000" face="Tahoma, Arial"><b>O                 nome de usuário <%= usuario %> digitado por você já está cadastrado                 no Juntinhu. Clique em voltar altere o seu nome de usuário e tente                 novamente.</b></font></p>              <p align="center"><font color="#000000" size="1"><b><font face="Tahoma, Arial">[                 <a href="javascript:history.back();">Voltar</a> ]</font></b></font></p>              <font color="#000000" size="1">               <% else %>     <% end if %>               </font>               <p align="center"><font size="1" color="#000000" face="Tahoma, Arial"><b>Cadastro                 efetuado com sucesso!!!</b><br>                Um e-mail de confirmação foi enviado para <b><%= email %>.<br>                </b></font></p>              <p align="center"> </p>              <font color="#000000" size="1">            <% end if %>                   </font> </div>          </td>        </tr>      </table>    </td>    <td width="291" valign="top"><div align="center">        <table width="98%" border="0" cellspacing="0" cellpadding="0">          <tr>             <td><img src="images/titulo_juntinhu_cadastro.gif" width="280" height="16"></td>          </tr>        </table>                <img src="images/fig_juntinho_cadastro.gif" width="275" height="327"></div></td>  </tr></table> <div align="center"><!--#include file=rodape.asp--></div> </body></html>

ruinas · Outubro 5, 2003

Oct 5 2003, 07:09 PM] o erro que tá dando é Erro de compilação do Microsoft vb script:history.back();">Voltar</a> ] <% elseif erro = 2 then %> Os dados digitados por você em um de nossos campos não conferem ou não estão de acordo com nossa regra de validação, clique em voltar altera seus dados e tente novamente. [ <a href="java script:history.back();">Voltar</a> ] <% elseif erro = 3 then %> O usuário <%= usuario %> já existe em nosso sistema. Por favor selecione outro nome de usuário. [ <a href="java script:history.back();">Voltar</a> ] <% elseif erro = 4 then %> Existe dois campos em nosso formulário chamados Senha e Confirma Senha , a senha digitada em senha e Confirma Senha não são idênticas, clique em voltar corrija este erro e tente novamente. [ <a href="java script:history.back();">Voltar</a> ] <% elseif erro = 5 then %> O email <%= email %> digitado por você já está cadastrado no HojeNanoite. Clique em voltar altere o email e tente novamente. [ <a href="java script:history.back();">Voltar</a> ] <% elseif erro = 6 then %> O email <%= email %> digitado por você já está cadastrado no Juntinhu. Clique em voltar altere o email e tente novamente. [ <a href="java script:history.back();">Voltar</a> ] <% elseif erro = 7 then %> O nome de usuário <%= usuario %> digitado por você já está cadastrado no Juntinhu. Clique em voltar altere o seu nome de usuário e tente novamente. [ <a href="java script:history.back();">Voltar</a> ] <% else %> <% end if %> Cadastro efetuado com sucesso!!! Um e-mail de confirmação foi enviado para <%= email %>. <% end if %> </div> </td> </tr> </table> </td> <td width="291" valign="top"><div align="center"> <table width="98%" border="0" cellspacing="0" cellpadding="0"> <tr> <td><img src="images/titulo_juntinhu_cadastro.gif" width="280" height="16"></td> </tr> </table> <img src="images/fig_juntinho_cadastro.gif" width="275" height="327"></div></td> </tr></table> <div align="center"></div> </body></html>De uma olhada acima q eu ja arrumei..use o ELSE IF juntos "elseif"Valeu ate a proxima

Penna · Outubro 6, 2003

Não à problemas de usar else if. Separados. Pelo menos sempre funfou comigo.O problema é que você não deve ter fechado algum If que você abriu.

Neco · Outubro 6, 2003

é isso mesmo....Confere tudo direito ai...esse erro aparece quando você não fechou algum IFAbraços

Entrar

Arquivado

erro

Recommended Posts

www 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

ruinas 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

Penna 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

Neco 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

Fixar div até atingir uma certa altura

Ajuda com Extends e envio para o banco

PHP+Codeginiter - Orientação para Impressão

Este projeto é apoiado pelas empresas

Fóruns

Tempo Real

Informação importante