Ir para conteúdo
Fórum CódigoFonte.net
Entre para seguir isso  
tulioreis

Erro Aprovar comentários.

Recommended Posts

Estou com o seguinte erro:

ERRO:

ADODB.Recordset erro '800a0bb9 '

Os argumentos são do tipo errado, estão fora do intervalo aceitável ou estão em conflito um com o outro.

/ aprovar.asp , linha 7

_____________________________________________________________________________________

Pagina: vercomentarios.asp

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>

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

<%

set listarcomentarios = Server.CreateObject("ADODB.Recordset")

listarcomentarios.open "SELECT * FROM comentarios where statuscoment=1",conexao

%>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<html xmlns="http://www.w3.org/1999/xhtml">

<head>

<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />

<link href="estilos.css" rel="stylesheet" type="text/css" />

<title>Sistema de Notícias</title>

</head>

<body>

<div id="conteudo">

<div id="topo">

<img src="imagens/topo.jpg" width="500" height="172" />

</div>

<div id="menu">

<a href="novanoticia.asp">Cadastrar Notícias</a> | <a href="vercomentarios.asp">Novos Comentário</a> | <a href="sair.asp">Sair do admin</a>

</div>

<div id="titulo">

<h3>Comentários a serem moderados:</h3>

</div>

<%while not listarcomentarios.EOF%>

<div id="exibircomentarios">

<strong>Nome:</strong> <%=listarcomentarios("nome")%><br />

<strong>Comentário:</strong> <%=listarcomentarios("comentario")%><br />

Em <%=listarcomentarios("datahora")%> <br /><br />

<a href="aprovar.asp?id=<%=listarcomentarios("id")%>"><img src="imagens/aprovar.jpg" width="100" height="33" border="0" /></a> <a href="naoaprovar.asp?id=<%=listarcomentarios("id")%>"><img src="imagens/naoaprovar.jpg" width="100" height="33" border="0" /></a>

</div>

<%

listarcomentarios.movenext

wend

%>

<div id="rodape">

<h5>Copyright 2010 - Todos os Direitos Reservados</h5>

</div>

</div>

</body>

</html>

Pagina: aprovar.asp

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>

<%

id = request("id")

statuscoment = 2

set alterar = Server.CreateObject("ADODB.Recordset")

alterar.open "UPDATE comentarios set statuscoment='"& statuscoment &"' where idnoticia='"& id &"'",conexao

response.Redirect("comentarioaprovado.asp")

%>

_________________________________________________________________________

Alguém sabe como resolver isso?

Desde já agradeço.

Compartilhar este post


Link para o post
Compartilhar em outros sites

Deixa eu explicar.

Tenho a noticia, alguém ler e comenta. O comentário sera moderado. Enquanto não é aprovador o status dele fica = 1 ( no banco de dados). Quando eu aprovo o status muda para =2 e seria mostrado. Porém quando clico em aprovar dá esse erro.

Se não tiver jeito pra esse e se alguém puder me dá uma dica de como consigo fazer isso ta valendo.

Valeu

Compartilhar este post


Link para o post
Compartilhar em outros sites

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
Entre para seguir isso  

×
×
  • Criar Novo...