Tjena!
Jag skulle behövahjälp med ett litet
script...
Det är så att jag skulle vilja ha hjälp med att göra ett script som visar top 15 på en lista...
<% Response.Buffer = True %>
<html>
<head>
<title>BildRöstning - _ _ _ _ _ _.nu</title>
</head>
<body>
<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source ="& Server.MapPath("votedb.mdb")
SQL = "SELECT top 15 * From bildrost ORDER BY roster DESC"
Set RecSet = Connect.Execute(SQL)
If RecSet.EOF Then
%>
Inga BildOmröstningar för tillfället...
<%
Else
%>
<b>Rösta på bilder:</b><br>
<%
For loopcount = 1 to 15
If RecSet.EOF then
%>
<table border="2" width="100%">
<tr>
<td width="8%"><% =loopcount %></td>
<td width="82%"><a href="bildrostning_regga.asp">Din bild här</a></td>
<td width="10%"> </td>
</tr>
</table>
<%
Else
ID = RecSet("ID")
bild = RecSet("bild"")
RB = RecSet("Roster")
%>
<table border="2" width="100%">
<tr>
<td width="8%"><% =loopcount %></td>
<td width="82%"><a href="bildrostning_rakna.asp?ID=<% =ID%>"><img src="<% =bild%>"></a></td>
<td width="10%"></td>
</tr>
</table>
<%
RecSet.movenext
end if
next
%>
<p>
<%End If%>
<%
RecSet.Close
Set RecSet = Nothing
Connect.Close
Set Connect = Nothing
%>
<hr>
<a href="bildrostning_login.asp">Logga in</a> <a href="bildrostning_alogin.asp?">Admin</a>
</body>
</html>
Och jag uppstäckte att jag hade gjort fel på det och nu skulle jag vilja ha
hjälp med det att om det finns 15 ID eller mindre så ska det skriva ut det så långt som möjligt
och på dom resterande platserna ska det stå "Din bild här"
------------------
Das Dunkhopf...