Quantcast
Channel: Fórum ASP
Viewing all articles
Browse latest Browse all 1214

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

$
0
0

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.

Viewing all articles
Browse latest Browse all 1214