3 svar · 145 visningar · startad av CleaR
Jag har en sida som jag vill att det ska stå automatiskt nummerordning på de tio mest klickade länkarna fast jag har ett litet problem som jag gärna skulle vilja bli av med.
Här är hela min kod:
<link rel="stylesheet" type="text/css" href="poll/style.css">
<script language="javascript">
<!--
function spel(url,width,height)
{
egg="scrollbars=yes,resizable=no";
egg+=",width="+width;
egg+=",height="+height;
unik=new Date();
unik=unik.getSeconds()+"_"+unik.getMinutes()+"_"+unik.getHours();
window.open(url,unik,egg);
}
//-->
</SCRIPT>
<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq="_
& Server.MapPath("db/mindatabas.mdb")&";"
SQLsats = "SELECT TOP 10 * FROM download ORDER BY klick DESC, id"
Set RecSet = Connect.Execute(SQLsats)
intOrder = 1
Response.Write "<br>"
Do Until RecSet.EOF
Response.Write "<b> " &intOrder & "</b> <a href=""javascript:spel('spel/klick.asp?id=" & RecSet("id") & "','700','500');"">" & RecSet("namn") & "</a><br>"
intOrder = intOrder + 1
RecSet.MoveNext
Loop
RecSet.Close
Connect.Close
Set RecSet = nothing
Set Connect = nothing
%>
Så här ser sidan ungefär ut:
http://frip.dk/pimpboy/bilder/originaltop10.gif
Fast jag vill att den ska se ut så här:
http://frip.dk/pimpboy/bilder/villhatop10.gif
Hur gör man så att det ser ut som i bilden ovan?
Min sida är http://pimpboy.foo.se ,kolla där så ser ni hur det ser ut nu.
Man ska egentligen inte använda tabeller till sånt här, men men...
Response.Write "<table>"
Do Until RecSet.EOF
Response Write "<tr><td align=""right""><b>" & intOrder & "</b></td><td><a href=""javascript:spel('spel/klick.asp?id=" & RecSet("id") & "','700','500');"">" & RecSet("namn") & "</a></td></tr>"
intOrder = intOrder + 1
RecSet.MoveNext
Loop
Response.Write "</table>"
Om du menar att jag ska ändra koden så att den ser ut så här:
**<link rel="stylesheet" type="text/css" href="poll/style.css">
<script language="javascript">
<!--
function spel(url,width,height)
{
egg="scrollbars=yes,resizable=no";
egg+=",width="+width;
egg+=",height="+height;
unik=new Date();
unik=unik.getSeconds()+"_"+unik.getMinutes()+"_"+unik.getHours();
window.open(url,unik,egg);
}
//-->
</SCRIPT>
<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq="_
& Server.MapPath("db/mindatabas.mdb")&";"
SQLsats = "SELECT TOP 10 * FROM download ORDER BY klick DESC, id"
Set RecSet = Connect.Execute(SQLsats)
intOrder = 1
Response.Write "<table>"
Do Until RecSet.EOF
Response Write "<tr><td align=""right""><b>" & intOrder & "</b></td><td><a href=""javascript:spel('spel/klick.asp?id=" & RecSet("id") & "','700','500');"">" & RecSet("namn") & "</a></td></tr>"
intOrder = intOrder + 1
RecSet.MoveNext
Loop
Response.Write "</table>"
RecSet.Close
Connect.Close
Set RecSet = nothing
Set Connect = nothing
%>**
..så funkar det i alla fall inte
Ingen som vet?
