Hur gör jag för att få de försyta 15 att visas med banner och resten med dess länk?
<%Set RecSet=Conn.Execute("Select * From topplista Order By Inp Desc")
If RecSet.EOF Then
For i = 1 to AntalTopp%>
<tr height="30">
<td align="center" width="40"><b><%=i%>.</b></td>
<td align="center"><b><%=Joina%></b></td>
<td align="center" width="40"> </td>
<td align="center" width="40"> </td>
</tr>
<%Next
Else%>
<tr>
<td width="40" align="center"><b>PLATS</b></td>
<td><b>HEMSIDA</b></td>
<td width="40" align="center"><b>IN</b></td>
<td width="40" align="center"><b>UT</b></td>
</tr>
<%X=0
Z=1
Do Until RecSet.EOF Or X=AntalTopp%>
<tr>
<td align="center"><b><%=Z%>.</b></td>
<td>
<div align="center"><a href="topplista.asp?go=out&id=<%=RecSet("Id")%>" target="_blank" OnClick="javascript:location.reload()"><img src="<%=RecSet("banner")%>" border="0" width="468" height="60"></a></div><br>
<b><%=RecSet("Sidnamn")%></b><br>
<%=RecSet("Info")%>
</td>
<td align="center"><b><%=RecSet("Inp")%></b></td>
<td align="center"><b><%=RecSet("Utp")%></b></td>
</tr>
<%Z = Z + 1
X = X + 1
RecSet.MoveNext
Loop
Set Antal=Conn.Execute("Select Count(*) As antal From topplista")
Tot = Antal("antal")
Antal = AntalTopp-Tot
y = Tot+1
For i = 1 to Antal%>
<tr height="30">
<td align="center" width="30"><b><%=y%>.</b></td>
<td align="center"><b><%=Joina%></b></td>
<td align="center" width="40"> </td>
<td align="center" width="40"> </td>
</tr>
<%y=y+1
Next
End If%>