:( 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>
