Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

angus

Tô quase lá

Recommended Posts

Porque este erro? *********************ADODB.Recordset error '800a0e78' Operação solicitada pelo aplicativo não permitida se o objeto estiver fechado. /galeria/index.asp, line 41 ***********************<%Dim conexao, rs, registros, paginadim dir, foto'Número de registros por paginaregistros = 2' Verifica qual páginaif request.Querystring("pagina")="" thenpagina= 1Elsepagina = request.Querystring("pagina")End if' Variaveis de conexaoset conexao=Server.CreateObject("ADODB.Connection")set rs=Server.CreateObject("ADODB.Recordset")conexao = "Driver={Microsoft Access Driver (*.mdb)};dbq=" & server.MapPath("fotos.mdb")rs.CursorType = 3rs.Pagesize = registros' Abre a sqlsql = "SELECT * From Baladas order by ID desc"rs.open sql, conexaofoto = request.querystring("id")%><html><head><title>Fotos</title><meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"></head><body><%while not rs.Eof%><%response.write "<a href=""index.asp?categoria="&categoria&"&foto="& rs("capa")&"""><img src=""" & rs("capa")&""" alt=""" &rs("capa")&""" border=""0""></a>"%><br><%if rs.Recordcount > registros thenanterior = pagina - 1proxima = pagina + 1end ifif pagina > 1 thenrs.movenextresponse.write "<a href=""index.asp?categoria="&categoria&"&pagina="& anterior&""">Pagina Anterior</a>"elseresponse.write "Pagina Anterior"End ifif not rs.eof thenresponse.write "<a href=""index.asp?categoria="&categoria &"&pagina="& proxima&""">Próxima Página</a>"elseresponse.write "Póxima Página"end if%><% rs.closewend%></body></html>

Compartilhar este post


Link para o post
Compartilhar em outros sites

<%

rs.close

wend

%>

[/tr]
Não seria:
<%wend

rs.close%>

[/tr]

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.