Efetuando uma consulta num Banco de dados Access com Asp

Postado por em 03/04/2012 - Visitas: 3118



O programa abaixo demonstra um código para efetuar a consulta num banco de dados do Access, onde temos
basededados.mdb (nome do arquivo do access)
admin (nome da tabela existente dentro do arquivo, tabela esta que possui o campo nome e senha, ambos do tipo texto)

abaixo o exemplo:

CONSULTA GERAL
<%
set conexao = createobject( "AdoDb.connection" )
´ cria-se o objeto que faz a conexão com o banco
conexao.open "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & server.MapPath( "basededados.mdb" )
´ abre-se a conexão para o banco de dados, onde é informado o nome do banco (access)

set resp = conexao.execute("select * from admin order by nome")
´ aqui a variável resp recebe uma copia dos itens trazidos do banco de dados através do comando
´ select

do while not resp.eof ´ faça enquanto não for fim de arquivo

response.write( "
" & resp("nome") ) ´ exibe uma nova linha com o nome trazido a cada vez que o loop é percorrido

resp.movenext ´ move o ponteiro de registro para um próximo

loop ´ volta para o do while e caso a sentença continue verdadeira continua o laço

%>

Gostou ? Compartilhe