Top 10

Setembro 27, 2003

Ae pessoal,

Estou tentando fazer um top 10 na página inicial do meu site para listar o sites mais clicados do meu banco de dados. O problema que não estou conseguindo fazer a paginação, ou seja, só consigo mostrar o 1º site, os outros 9 eu não consigo. Como faço para mostrar os 10 sites mais clicados e não somente o 1º masi clicado?

<%

Dim totalBandas, rst, conn, driver, site, url, top10

set conn = Server.CreateObject("ADODB.Connection")
driver = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath("../db/search_engine.mdb") & ";"
conn.Open driver


Set rst = conn.Execute("select top 10 * from tblWebsites order by Hits desc")

totalBandas = rst("Hits")
site = rst("Title")
url = rst("URL")
top10 = ("top 10")
Set rst = Nothing
Set conn = Nothing

Response.Write("Top site: <b>") & site
Response.Write("</b><br>Url: <b>") & url
Response.Write("</b><br>Visitas: <b>") & totalBandas
Response.Write("<br></b>")
%>

no aguardo

diraol · Setembro 28, 2003

tipo, no fim do código coloca isso aqui...........

<%rs.movenext
loop%>

Setembro 28, 2003

B) Ae diraol,

VALeu pela ajuda cara, só que está ocorrendo um erro. Coloquei as especificações do DO WHILE NOT rst.EOF / rst.MOVENEXT, só que a paginação veio repetindo o mais clicado 10 vezes, ou seja, não me trouxe os outros 9 do mesmo jeito. Como elimino as repetições para os outros 9 aparecerem?

Obrigado. :D

diraol · Setembro 28, 2003

veja ai.........

<%
dim db,rs,sql
set db = Server.CreateObject("ADODB.Connection")
db.Open "provider=microsoft.jet.oledb.4.0;data source="& server.mappath("SEUBD.mdb")
sql = "select * from SUATABELA order by CAMPODATABELA desc"
set rs = db.Execute(sql)
%>
<html>
<head>
<title>Sites do [GuTo]</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>

<body>
<%
for count = 0 to 4 step 1 %>
 ID:<%=rs("id").value%> - apelido:<%=rs("apelido").value%>
<%rs.movenext
next%>
<a href="http://www.sitesdoguto.kit.net" target="_blank">Veja os endereços dos sites do [webmaster]®</a>
</body>
</html>

Setembro 28, 2003

Obrigadão Diraol,

Valeu pela ajuda e paciência cara... Agora deu certo...

Depois se quiser visitar o meu site para conferir como ficou visita lá:

http://www.doutorbusca.com.br

Até mais!

diraol · Setembro 28, 2003

opa..

estamos ai pra ajudar... :D

Entrar

Top 10

Pergunta

Guest Ademar Júnior

Link para o comentário

Compartilhar em outros sites

5 respostass a esta questão

Posts Recomendados

diraol

Link para o comentário

Compartilhar em outros sites

Guest Ademar Júnior

Link para o comentário

Compartilhar em outros sites

diraol

Link para o comentário

Compartilhar em outros sites

Guest Ademar Júnior

Link para o comentário

Compartilhar em outros sites

diraol

Link para o comentário

Compartilhar em outros sites

Participe da discussão

Estatísticas dos Fóruns

Navegação

Atividades