Slumpa från databas ?

4 svar · 344 visningar · startad av ConnyFox 8 dec. 2001

ConnyFoxMedlem sedan aug. 20011 087 inlägg

8 dec. 2001 13:49#1

har frågat om detta innan men fick alldrig riktigt något svar som hjälpte mig =/ Jag har gjort ett script där länkar listas beroende på vilken kategori man är i, allt funkar fint men när jag vill lista 10 slumpade inlägg blir det stop. Någon som vet hur man fixar detta så det går ihop med min kod?

<% 

database = Server.MapPath("links.mdb")
Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& database

Set RecSet = Server.CreateObject("ADODB.Recordset")

if Request.querystring("kategori") = "alla" then
SQL = "SELECT * FROM links ORDER BY linkname"

elseif Request.querystring("kategori") = "Senaste" then
SQL = "SELECT TOP 10 * FROM links ORDER BY datum DESC"

elseif Request.querystring("kategori") = "Top" then
SQL = "SELECT TOP 10 * FROM links ORDER BY klicks DESC"

[b] elseif Request.querystring("kategori") = "random" then
SQL = "SELECT TOP 10 * FROM links ORDER BY rnd" [/b] <-- detta funkar inte hur gör man?

else
SQL = "SELECT * FROM links WHERE kategori LIKE '"& Request.querystring("kategori") &"' ORDER BY datum DESC"

end if
RecSet.Open SQL, Connection, 3, 3
%>

<html>
<head>
	<title>Untitled</title>
	<link rel="stylesheet" href="mall.css">
</head>

<body topmargin="0" leftmargin="0" class="iframe">
<center>

<table cellspacing="0" width="270"><tr><td>
<!--#include file="links_kategorier.asp" -->
<b>Kategori</b> : <%=request.querystring("kategori")%> - <b>Antal Inlägg</b> : <%=Recset.RecordCount%>
<%
Do until RecSet.EOF
%>
</td></tr><tr><td><hr>

<b><%
x = x+1 
response.write x
%></b>.
<a href="links_funktioner.asp?ID=<%=RecSet("ID")%>&URL=<%=RecSet("link")%>&funktion=klicks" target="newwindow"><%=RecSet("linkname")%></a> - <%=RecSet("klicks")%>st klick<br>
<b>Kategori </b>: <%=RecSet("kategori")%><br>
<b>Insänd av</b> : <%=RecSet("namn")%><br>
<b>Beskrivning</b> : <%=RecSet("beskrivning")%>
</td></tr><tr><td>
<%
if Session("inloggad") = True then %>
- <a href="links_form.asp?ID=<%=RecSet("ID")%>" target="change">Ändra</a> 
- <a href="links_funktioner.asp?ID=<%=RecSet("ID")%>&funktion=delete&kategori=<%=RecSet("kategori")%>">Ta Bort</a> - 
<% end if %>
</td></tr>

<%
RecSet.MoveNext
loop

RecSet.Close
connection.Close
%>
</table>
</body>
</html>

[Redigerat av ConnyFox den 08 dec 2001]

mozillaMedlem sedan juli 20011 084 inlägg

8 dec. 2001 13:56#2

hmm ... okej är inte säker men om du kopierat av helt så är det väll fel här?

elseif Request.querystring("kategori") = "random" then
SQL = "SELECT TOP 10 * from links ORDER BY rnd

ska det inte vara

elseif Request.querystring("kategori") = "random" then
SQL = "SELECT TOP 10 * FROM links ORDER BY rnd[b]"[/b]

sedan bara en fråga varför står FROM på den sisa litet men alla andra stort??

ConnyFoxMedlem sedan aug. 20011 087 inlägg

8 dec. 2001 14:08#3

Hehe jo självfallet men nu e d så att d e själva koden som inte existerar så d går inte att göra så d va bara för o visa hur jag vill göra. Redigerat det nu o ändrat till FROM men d spelar ju ingen roll eftersom d e själva kodsättet som e fel o inte att d e felstavat :O)

[Redigerat av ConnyFox den 08 dec 2001]

ConnyFoxMedlem sedan aug. 20011 087 inlägg

8 dec. 2001 23:41#4

Ingen? *snyft* Att random ska vara så jobbigt!

------------------
*brölar ljudligt*

ConnyFoxMedlem sedan aug. 20011 087 inlägg

10 dec. 2001 13:43#5

nehepp inte d nej.. aja antar att jag får ge upp den funktionen tills vidare då!

------------------
*brölar ljudligt*