Fórum Contato
  
   O portal do desenvolvedor ASP Segunda-feira - 14 de Junho de 2021  
Busca

Menu do site
Efetuar Login
Usuário:

Senha:

 Esqueceu a senha?
Login automático

 Cadastre-se
 Fóruns   Meu cadastro   Meu perfil   Ranking de usuários 

 FórumProgramaçãoErros Responder mensagem 

 Erro Aprovar comentários. Atualizado em 01/04/2012 ás 19:04:00

Postado em 01/04/2012 ás 19:04:00
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"%>

<%
set listarcomentarios = Server.CreateObject("ADODB.Recordset")
listarcomentarios.open "SELECT * FROM comentarios where statuscoment=1",conexao
%>






Sistema de Notícias











Comentários a serem moderados:





<%while not listarcomentarios.EOF%>


Nome: <%=listarcomentarios("nome")%>

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

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


"> ">


<%
listarcomentarios.movenext
wend
%>


Copyright 2010 - Todos os Direitos Reservados






_______________________________________________________________________


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.
SuperASP do Brasil Ltda - contato@superasp.com.br

© 2001/2008 - Superasp do Brasil Ltda. Todos os direitos reservados