Random udtræk

SELECT top 1 udvælger den første af en række poster alt efter sortering, men du vil have RND og det harmionerer jo ikke med RND.

Prøv at undgå TOP 1.

Jeg får samme fejl hvis jeg undlader den.

Denne fungerer i en forespørgsel i ACC 2003:

SELECT TOP 1 Rnd([DIT FELT]) AS Udtryk1
FROM DIN TABEL;

Jeg benytter normalt en funktion som supplement


Function Randomizer() As Integer
Static AlreadyDone As Integer
        If AlreadyDone = False Then Randomize: AlreadyDone = True
    Randomizer = 0
End Function


SELECT TOP 1 tbltilbud.fldtilbud
FROM tbltilbud
GROUP BY tbltilbud.fldtilbud
HAVING (((randomizer())=0))
ORDER BY Rnd(IsNull([fldtilbud])*0+1);

Men nu bruger jeg den ældre version

Set Conn8 = Server.CreateObject("ADODB.Connection")
DSN8 = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("./tilbud.mdb")
Conn8.Open DSN8

Set rs8 = Conn8.Execute("SELECT TOP 1 * FROM tblTilbud  ORDER BY RND (fldTilbud)")

Altså jeg benytter asp, og ikke asp.net

Nu har jeg fået lavet så den skriver alle 3 poster ud, selvom den har en rnd funktion. men den kommer så ikke med fejl.

Randomize
hej = -int(1000*Rnd())+1
Set rs8 = Conn8.Execute("SELECT TOP 1 Rnd(" & hej & "*fldID), * FROM (tblTilbud) ORDER BY fldTilbud")

Jeg har absolut ingen forstand på ASP.

Lukker