webForumDet fria alternativet

Slumpa poster från databaser

ASPur ASP

3 svar · 178 visningar · startad av anno

annoMedlem sedan nov. 2000213 inlägg
#1

Har gjort en liten snurra som slumpar ut en fråga från en databas, men nu vill jag slumpa ut 5 frågor och det måste vara unika frågor som kommer ut.

så här har jag skrivit nu:

  <%
Dim strSQL, Conn
strSQL = "Select fraga from tblSlumper"
Conn = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("slump.mdb")

Dim rs
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open strSQL, Conn, 3

Dim intRnd
Randomize
intRnd = (Int(RND * rs.RecordCount))

rs.Move intRnd

Response.Write rs("fraga")

rs.Close
Set rs = Nothing
%>

men nu vet jag inte hur jag ska gå vidare, någon som vet eller har något eget exempel.

------------------
/Andreas

[Redigerat av anno den 13 jun 2001]

[Redigerat av anno den 13 jun 2001]

@ndersMedlem sedan juni 200032 969 inlägg
#2

vad är problemet?

------------------
<A HREF="http://cartman.nu" TARGET=_blank>
can i borrow your goat?
</A>

annoMedlem sedan nov. 2000213 inlägg
#3

Problemet är att jag inte vet hur man skriver ut 5 slumpade frågor av mina totalt 20 frågor, alla unika. Det som jag gjort nu skriver bara ut en fråga.

------------------
/Andreas

@ndersMedlem sedan juni 200032 969 inlägg
#4

lägg en liten loop runt, typ

for i = 1 to 5
...
next

just slumpning har varit uppe åtskilliga gånger bara de senaste dagarna, så leta lite så hittar du nog trådar som kan hjälpa dig.

mvh,

------------------
<A HREF="http://cartman.nu" TARGET=_blank>
can i borrow your goat?
</A>

133 ms totalt · 3 externa anrop · v20260731065814-full.29ac60f6
0 ms — hämta forumlista (cache)
0 ms — hämta statistik (cache)
129 ms — hämta tråd, inlägg och bilagor (db)