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

Erro No Script

fenix

Perguntado por fenix,

 Share

Pergunta

fenix

fenix

Postado
Postado

o erro é esse :

ADODB.Field erro '80020009'

alterar.asp

<!--#include file="restrito.asp"-->

<!--#include file="conectar.asp"-->

<% AbreConexao

If Request.Form("enviado") = "sim" Then

login = Replace(Request.Form("login"), "'", "/")

senha = Replace(Request.Form("senha"), "'", "/")

senhanova = Replace(Request.Form("senhanova"), "'", "/")

c_senha = Replace(Request.Form("c_senha"), "'", "/")

nome = Replace(Request.Form("nome"), "'", "/")

snome = Replace(Request.Form("snome"), "'", "/")

email = Replace(Request.Form("email"), "'", "/")

sexo = Replace(Request.Form("sexo"), "'", "/")

Set RS = Conexao.Execute("SELECT * FROM usuarios WHERE senha = '"&senha&"'")

If senha <> Session("senha") Then

Response.Write "Este login já está cadastrado!<BR><a href=alterar.asp>Voltar</a>"

Else

Conexao.Execute("UPDATE usuarios SET nome = '"&nome&"', snome = '"&snome&"' , email = '"&email&"', sexo = '"&sexo&"',login = '"&login&"', senha = '"&senhanova&"' WHERE senha = '"&Session("senha")&"'")

Response.Write "Dados alterados"

End If

Else

Set rs = Conexao.Execute("SELECT * FROM usuarios WHERE senha = '"&Session("senha")&"'")%>

<form method="POST" action="alterar.asp">

<input type="hidden" name="enviado" value="sim">

<body bgcolor="#C0C0C0">

<div align="center">

<center>

<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="339" height="242" id="AutoNumber1" bgcolor="#C0C0C0">

<tr>

<td width="339" height="58">

<fieldset> <p align="center"><font face="Tahoma"><b>Cadastro de Usuários</b></font>

</p>

</center>

<p><b><font size="2" face="Verdana">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Nome:&nbsp;</font></b><font face="Verdana"><b><font size="2">

</font><input type="text" name="nome" value="<%=rs("nome")%>" size="20" maxlength="20"></b></font></p>

<p><b><font size="2" face="Verdana">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Sobre Nome:&nbsp;

</font></b><font face="Verdana"><b>

<input type="text" name="snome" value="<%=rs("snome")%>" size="20" maxlength="20"></b></font></p>

<p><b><font size="2" face="Verdana">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;

E-mail: </font>

</b><font face="Verdana"><b>

<input type="text" name="email" value="<%=rs("email")%>" size="20" maxlength="40"></b></font></p>

<p><b><font size="2" face="Verdana">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;

Sexo: <select disabled value="<%=rs("sexo")%>" size="1" name="sexo">

<option>---( Escolha um&nbsp; Sexo)---</option>

<option value="masculino">Masculino</option>

<option value="feminino">Feminino</option>

<option value="Lesbica">Lesbica</option>

<option value="Gay">Gay</option>

</select></font></b></p>

<b><font size="2" face="Verdana">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;

Login: </font></b>

<font face="Verdana"><b>

<input type="text" disabled name="login" size="20" maxlength="40" value="<%=rs("login")%>"></b></font>

<p>

<b><font size="2" face="Verdana">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;

Senha Atual: </font></b>

<font face="Verdana"><b>

<input type="text" name="senha" size="20" maxlength="40"></b></font>

</p>

<p><b><font size="2" face="Verdana">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;

Senha: </font></b><font face="Verdana"><b>

<input type="password" name="senhanova" size="20" maxlength="8"></b></font></p>

<p><b><font size="2" face="Verdana">&nbsp;Confirme a senha:

</font></b><font face="Verdana"><b>

<input type="password" name="c_senha" size="20" maxlength="8"></b></font></p>

<p align="center">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;

<input type="submit" value="Alterar">

</form>

<% End If

FechaConexao %>

Link para o comentário
Compartilhar em outros sites

1 resposta a esta questão

Posts Recomendados

  • 0
Guest - fenix -

Guest - fenix -

Postado
Postado

Erro de tempo de execução do Microsoft VBScript erro '800a01c2'

Número de argumentos incorreto ou atribuição de propriedade inválida: 'RS'

/clanevil/alterar.asp, line 53

Link para o comentário
Compartilhar em outros sites

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.

×
 Share
Ir para lista de Perguntas


  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,3k
×
×
  • Criar Novo...