Ir para conteúdo

POWERED BY:

Arquivado

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

Manckenna

acesso ao dados de um banco de dados pelo asp

Recommended Posts

Este exercício pertence ao livro Faça um Site ASP página 102 e 103 da editora ÉricaAutor: carlos A.J. Olivieiro<html> <head> <title>Acessando dados de um banco de dados access</title> </head> <body bgcolor="#fffff"> <font face="arial" size="3" color="red"><b>Livros da Editora On-Line</font></b><br> <% DIM conCadLivro DIM recLivro const cntCaminho = "c:\inetpub\wwwroot\asp\cadlivro.mdb" Set conCadLivro = Server.CreateObject("ADODB.Connection") Set recLivro = Server.CreateObject("ADODB.Recordset") conCadLivro.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & cntCaminho recLivro.open "Livros" ,conCadlivro Do while Not RecLivro.Eof Response.Write "<table border='0' cellpadding='3' cellspacing='0' width='700'>" Response.Write "<tr>" & "<td width='40' bgcolor='maroon'><font color='white' size='1' face='arial'>Código</font></td>" Response.Write "<td width='160' bgcolor='maroon'><font color='white' size='1' face='arial'>Categoria</font></td>" Response.write "<td width='250' bgcolor='maroon'><font color='white' size='1' face='arial'>Nome do Autor</font></td>" Response.write "<td width='250' bgcolor='maroon'><font color='white' size='1' face='arial' >Título do Livro</font></td>" & "</tr>" Response.Write "<tr>" & "<td width='40' bgcolor='gold'><font color='black' size='2' face='arial'>" & "<b>" & RecLivro.Fields("Codigo") & "</b></font></td>" Response.Write "<td width='160' bgcolor='gold'><font color='black' size='2' face='arial'>" & "<b>" & RecLivro.Fields("Categoria)") & "</font></td>" Response.Write "<td width='250' bgcolor='gold'><font color='black' size='2' face='arial'>" & "<b>" & RecLivro.Fields("NomeAutor") & "</font></td>" Response.write "<td width='250' bgcolor='gold'><font color='black' size='2' face='arial'>" & "<b>" & RecLivro.fields("NomeLivro") & "</font></td></tr>" Response.write "<tr> & <td colspan='4' width='100%' bgcolor='Lightyellow'><font size='2' face='arial' color='black'><b>Resumo da Obra</b><br>" & RecLivro.Fields("ResumoObra") & "</tr><br></table>" RecLivro.MoveNext Loop recLivro.close conCadLivro.close %> </body> </html> Quando tendo abrir no Internet Explore ou no Ópera aparece a seguinte mensagem:Tipo de err Informações técnicas (para a equipe de suporte) Tipo de err ADODB.Recordset (0x800A0CC1) O item não pode ser encontrado na coleção correspondente ao nome ou ao ordinal solicitado manckenna@hotmail.com

Compartilhar este post


Link para o post
Compartilhar em outros sites

Verifique se o nome dos campos no codigo correspondem aos mesmos nomes no banco de dados, tem que ta igualzinnn

Compartilhar este post


Link para o post
Compartilhar em outros sites

você ta tentando imprimir na tela ou gravar em uma variavel um campo que você não selecionou...verifica quais você selecionou e quais você esta tentando pegar...

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.