Ir para conteúdo
Fórum Script Brasil
  • 0

Ajuda...


halakaluf

Pergunta

:(

olha so eu estou aprendendo asp e fiz esse site de cadastro segue o codigo fonte:

Olha ol java e pra testar o username e a senha se o usuario digito alguma coisa caso tenha DIGITADO ELE TESTA SE SÃO IGUAIS.

so que o java não testa nada, se eu mandar o forme em branco ele manda.

<html>
<body>
<center>
<h1><font color=black>PRIMEIRA PÁGINA ASP</font></h1>
</center>

<script language="javascript">
<!--
   function checkForm(form)
   {
      if( form.username.value == "" ) {
         alert("Você precisa preencher o campo Username");
         form.username.focus();
         return(false);
      }
      if( form.senha.value == "" ) {
         alert("Você precisa preencher o campo Senha");
         form.senha.focus();
         return(false);
      }
      if( form.username.value == form.senha.value ) {
         alert("Por segurança, os campos Username e Senha devem ter valores diferentes");
         form.senha.focus();
         return(false);
      }
      return(true); 
   }
-->
</script>

<FORM NAME="cadastro" METHOD="POST" ACTION="envia.asp?acao=insere"
   onsubmit="return(checkForm(this))">
Nome:  <input type="text" name="vNome" size="28"  maxlength="30"><br>
Endereço:    <input type="text" name="vEndereco" size="28"  maxlength="30"><br>
Cidade:  <input type="text" name="vCidade" size="28"  maxlength="30"><br>
Estado:  <input type="text" name="vEstado" size="28"  maxlength="30"><br>
Username:    <input type="text" name="vUsername" size="28"  maxlength="30"><br>
Senha:  <input type="text" name="vSenha" size="28"  maxlength="30"><br>
</FORM>
<FORM METHOD = "POST" ACTION = "envia.asp?acao=insere"> 
<INPUT TYPE ="SUBMIT" VALUE ="ENVIAR">

</FORM>

</body>
</html>
E aqui vai a pagina asp que é a envia.asp segue o codigo fonte: Essa ta com um problema ela não da erro nenhum mas quando eu vou ver se ela realmente inseriu os dados no banco de dados ela so inseriu um registro sem nemuma informação. porque isso?? alguém pode me ajudar????
<%
   Option Explicit
   Dim acao, rs, caminho, sql, conn
   Dim vNome, vEndereco, vCidade, vEstado, vUsername, vSenha
   
   'Identifica o que deve ser feito
   acao = Request("acao")
   
   If acao = "insere" Then       'Se um cadastro foi realizado
      vNome = Request("nome")
      vEndereco = Request("endereço")
      vCidade = Request("cidade")
      vEstado = Request("estado")
      vUsername = Request("username")
      vSenha = Request("senha")
      
      'Aqui, se necessário você pode validar novamente os campos
      
      'Cria a instrução SQL para inserir os dados no banco
      sql = "INSERT INTO usuario (nome, endereco, cidade, " & _
            "estado, username, senha) VALUES ('" & vNome & "','" & _
            vEndereco & "','" & vCidade & "','" & vEstado & "','" & _
            vUsername & "','" & vSenha &"');"
      
      'Se tudo OK, então insere no banco
      Set conn = (Server.CreateObject)("ADODB.Connection")
      caminho = "DBQ=" & Server.MapPath("secomp.mdb")
      conn.Open "Driver={Microsoft Access Driver (*.mdb)};" & caminho
      
      Set rs = conn.Execute(sql)
      
      'Fechando conexão
      conn.Close
      
   Else      'Não foi o formulário que chamou esta página
      Response.Redirect "cadastro.htm"
   End If
%>
<html>
<title>envia.asp</title>
<Body><center>
<h1><font color=black>O Cadastro foi Feito com Sucesso!!!</font></h1>
</center>

</body>
</html>

Link para o comentário
Compartilhar em outros sites

2 respostass a esta questão

Posts Recomendados

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152k
    • Posts
      651,7k
×
×
  • Criar Novo...