Ir para conteúdo
Fórum Script Brasil
  • 0

Link Nos Arquivos "top Downloads"


soscripts

Pergunta

Como faço pra incluir o link (igual desse site) de download no script abaixo:

<%

set conn = server.createobject ("ADODB.connection")
conn.Open "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.Mappath("dow\prog\bd\downloads.mdb")

Set rs =Server.CreateObject("ADODB.Recordset")
        SQL = "select top 5 * from links order by cliques desc "
        Set rs = Conn.Execute(SQL)

	If rs.EOF Then
            	Response.Write "Nenhum usuario cadastrado"
            	else
	do while num < 13
             response.write "<br>" 
    response.write " <img src=""imgs/menu_ico.gif"" width=""16"" height=""9"" align=""top"" >"
    response.write rs("nome")
    response.write " - "
    response.write rs ("cod")  
    response.write "</br>"
    response.write "&nbsp;cliques: &nbsp;"
        response.write rs ("cliques") 
        response.write "<br>" 
          num=num+1
  
  	rs.MoveNext
	Loop
	End If

%>

Seria aqui?

response.write rs("nome")

Só num sei como colocar. alguém poderia me ajudar?

Link para o comentário
Compartilhar em outros sites

6 respostass a esta questão

Posts Recomendados

  • 0

response.write rs("nome")

response.write " - "

response.write "<a href="&"arquivo.asp"&">"&rs ("cod") &"</a>"   

response.write "</br>"

response.write "&nbsp;cliques: &nbsp;"

response.write rs ("cliques")

response.write "<br>"

qualquer duvida estamos ai....

Link para o comentário
Compartilhar em outros sites

  • 0

Salve soscripts !!

Você pode fazer, assim:

<%

set conn = server.createobject ("ADODB.connection")
conn.Open "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.Mappath("dow\prog\bd\downloads.mdb")

Set rs =Server.CreateObject("ADODB.Recordset")
SQL = "select top 5 * from links order by cliques desc "
Set rs = Conn.Execute(SQL)

If rs.EOF Then
Response.Write "Nenhum usuario cadastrado"
else
do while num < 13
response.write "<br>" 
response.write " <img src=""imgs/menu_ico.gif"" width=""16"" height=""9"" align=""top"" >"
response.write "<a href='arquivo.asp'>"&rs("nome")&"</a>"
response.write " - "
response.write "<a href="&"arquivo.asp"&">"&rs ("cod") &"</a>"    
response.write "</br>"
response.write "&nbsp;cliques: &nbsp;"
response.write rs ("cliques") 
response.write "<br>"
num=num+1

rs.MoveNext
Loop
End If

%>
e assim:
<%

set conn = server.createobject ("ADODB.connection")
conn.Open "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.Mappath("dow\prog\bd\downloads.mdb")

Set rs =Server.CreateObject("ADODB.Recordset")
SQL = "select top 5 * from links order by cliques desc "
Set rs = Conn.Execute(SQL)

If rs.EOF Then
Response.Write "Nenhum usuario cadastrado"
else
do while num < 13
response.write "<br>" 
response.write " <img src=""imgs/menu_ico.gif"" width=""16"" height=""9"" align=""top"" >"%>
<a href="arquivo.asp">rs("nome")</a>
<%response.write " - "
response.write "<a href="&"arquivo.asp"&">"&rs ("cod") &"</a>"    
response.write "</br>"
response.write "&nbsp;cliques: &nbsp;"
response.write rs ("cliques") 
response.write "<br>"
num=num+1

rs.MoveNext
Loop
End If

%>

Qualquer dúvida é só falar!!! wink.gif

[]'s

Victor

Link para o comentário
Compartilhar em outros sites

  • 0

Poxa pessoal. vocês. não poderiam ter explicado melhor. Parabéns e obrigada pela ajuda.!!!!!

Agora entendi perfeitamente.

Então aí entendi o significado da coisa e alterei o ARQUIVO.ASP pro nome dos meus downloads ACRESCENTANDO os seus respecitivos ID.

response.write "<a href='dow/prog/downloads.asp?ID="& rs("ID") &"'> "&rs("nome")&"</a>"

Grata,

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,3k
×
×
  • Criar Novo...