Ir para conteúdo

POWERED BY:

Arquivado

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

Paulo Felipe de Araujo

Como faço pra exibir os dados do meu banco ?

Recommended Posts

Não consigo mostrar os dados que estao no banco de dados.

 

Aqui está o erro q aparece pra mim:

 

Erro de tempo de execução do Microsoft VBScript erro '800a01a8'

Objeto necessário: ''

/licao_asp/controle.asp, linha 16

 

Aqui tá o código:

 

 

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<!--#include file="conexao.asp"-->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<link href="css/style.css" rel="stylesheet" type="text/css"/>
<title>Mr.SAC - Contact Center</title>
</head>
<body>
<%
dim sql, cont, conntemp, rstemp
sql = "SELECT * FROM clientes WHERE id >0"
set rstemp = conntemp.execute(sql)
cont = 1
If rstemp.eof then
response.write "Não há dados a exibir<br>"
response.write sql & "<br>Não retorna informação alguma..."
connection.close
set connection=nothing
response.end
end if
%>
<table id="tabela">
<tr height="45px" style="background:#09C; color:#FFF;">
<td><font face="Comic Sans MS" size="+2">ID</font></td>
<td><font face="Comic Sans MS" size="+2">Nome</font></td>
<td><font face="Comic Sans MS" size="+2">E-mail</font></td>
<td><font face="Comic Sans MS" size="+2">Senha</font></td>
<td><a href="#" title="Alterar"><img src="img/alterar2.png" title="Alterar" align="bottom" height="35px" width="35px"/></a></td>
<td><a href="#" title="Alterar"><img src="img/remove.png" title="Remover" align="bottom" height="35px" width="35px" /></a></td>
</tr>
<%
response.Write "<tr>"
for each item in rstemp.fields
response.write "<td><B>" & item.name & "</B></TD>"
next
response.write "</tr>"
DO UNTIL rstemp.eof
id=rstemp("id")
nome=rstemp("nome")
email=rstemp("email")
senha=rstemp("senha")
response.write "<tr>"
response.write "<td>" & id & "</td>"
response.write "<td>" & nome & "</td>"
response.write "<td>" & email & "</td>"
response.write "<td>" & senha & "</td>"
response.write "</tr>"
rstemp.movenext
cont=cont+1
LOOP
rstemp.close
set rstemp=nothing
conntemp.close
set conntemp=nothing
%>
</table>
<div id="quant">
<h2>Esta tabela possui <% =contador %> registros</h2>
</div>
<div class="add">
<a href="cadastrar.asp" title="Cadastre-se já !!">
<img src="img/add.png" width="25px" height="25px"/>Cadastre-se já !!</a>
</div>
</body>
</html>
por favor se puderem me ajudar, eu agradeço.

Compartilhar este post


Link para o post
Compartilhar em outros sites

veja se dentro de conntemp, esta sua string de conexão se for, terá que colocar um include na página, senão apenas coloque sua string de conexão. Dá uma olhada aqui

Compartilhar este post


Link para o post
Compartilhar em outros sites

Insira o seguinte code

constring=”provider=microsoft.JET.OLEDB.4.0;Data Source=” & Server.MapPath(“db/quaddra.mdb”)

Set conexao=Server.CreateObject(“ADODB.Connection”)

conexao.open constring

 

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.