Eu sei que é fácil

[Touche 0]

Quero fazer com que esse script exiba somente 6 registros...

 

<table width="200" border=0 cellpadding=0 cellspacing=0>	<%Dim Conexao2Conexao2 ="DRIVER={Microsoft Access Driver (*.mdb)};" & _"DBQ=" & Server.MapPath("db/classificados.mdb") & ";"Dim Sql, Connx, Rsx, Trocador, c, contarSet Connx = Server.CreateObject("adodb.connection")Connx.Open Conexao2Sql = "select * from classificados order by cod desc"Set Rsx=Connx.Execute(Sql)%> <%If not Rsx.Eof Then%>  	 <table border=0 align="right" cellpadding=0 cellspacing=0><tr><td height="18" bgcolor="#6F6F6F" align="right"><font color="white"><b> Classificados Locais :: </b></font></td> <% dim contacor, corcelula contacor  = 0 Do While not Rsx.Eof If contacor = 1 Then	corcelula = "#D2D2D2"  contacor = 0 else	corcelula = "#EFEFEF"contacor = 1 End If  %>  <tr>	<td bgcolor="<%=corcelula%>" height=60><center>  <table width=95% border=0 align="center" cellpadding=0 cellspacing=0>        <tr><td>        <%           response.Write "<a href=anuncio.asp?cod="& Rsx("cod") &">"        response.write rsx("Titulo")         response.write "</a>"               %> 	  	 </td></tr>  </table>  </td>  </tr> <%  Rsx.MoveNextLoop%>    <tr> 	 <td bgcolor="#6F6F6F" height=58 align=right><font color=white>Para anunciar nos Classificados  <BR>Locais, basta <B><a href="classificados_add.asp"><font color="white">Clicar Aqui</B></font></a>  <BR>- Veiculação gratuita  </td> 	 </tr>                 <% 	 end ifRsx.CloseSet Rsx=NothingConnx.CloseSet Connx=Nothing %></table>

 

Sei que é fácil ja usei for mais nao funcionou se alguem puder me ajudar :rolleyes:

 

desde ja fico agradecido

[Salgado 4]

Sql = "select TOP 6 * from classificados order by cod desc"[/tr]