Avatar billede reino Nybegynder
20. juni 2007 - 17:29 Der er 8 kommentarer og
1 løsning

Random recordset fra database

Hej

Har søgt en del. Er der nogen der har en ide til hvordan man retriever et random recordset fra en accessdatabase, ex. en tabel hvor der er 30 records, skal kun bruge 10 random records, ingen af dem må være ens ?

Har forsøgt denne, men det er som om den ikke "randomizer":

sql="select top 10 menu_id, menu_short, menu_title from menustruktur_" & lang & " where menu_id<>" & id& " and menu_id<>0 order by Rnd([menu_ID]),menu_ID"
Avatar billede w13 Novice
20. juni 2007 - 18:13 #1
Og du har sat randomize én gang i dit dokument?
Avatar billede softspot Forsker
20. juni 2007 - 23:25 #2
Prøv med denne her:

Randomize
rndIdx = int(1000*Rnd())+1
SQL = "select top 10 Rnd(" & -1 * (rndIdx) & "*ID), menu_id, menu_short, menu_title from menustruktur_" & lang & " where menu_id<>" & id& " and menu_id<>0 order by 1,menu_ID"
Avatar billede reino Nybegynder
21. juni 2007 - 07:30 #3
Så får jeg denne fejl:

Microsoft OLE DB Provider for ODBC Drivers error '80040e10'

[Microsoft][ODBC Microsoft Access Driver] Too few parameters. Expected 1.

Any ideas ?
Avatar billede fennec Nybegynder
21. juni 2007 - 08:39 #4
Prøv med denne:

randomize
R = clng(123456*rnd)
sql = "select top 10 menu_id, menu_short, menu_title from menustruktur_" & lang & " where menu_id<>" & id& " and menu_id<>0 order by rnd(-(ID)*" & R & ")"
Avatar billede fennec Nybegynder
21. juni 2007 - 08:41 #5
Er Menu_ID din primærnøgle?? For så skal det være sådan her i stedet:
randomize
R = clng(123456*rnd)
sql = "select top 10 menu_id, menu_short, menu_title from menustruktur_" & lang & " where menu_id<>" & id& " and menu_id<>0 order by rnd(-(menu_id)*" & R & ")"
Avatar billede softspot Forsker
21. juni 2007 - 09:19 #6
Ja, det er klart at ID skal skiftes ud med menu_ID i mit eksempel, for ellers mangler der en kolonne (som ADO også brokker sig over):

Randomize
rndIdx = int(1000*Rnd())+1
SQL = "select top 10 Rnd(" & -1 * (rndIdx) & "*menu_ID), menu_id, menu_short, menu_title from menustruktur_" & lang & " where menu_id<>" & id & " and menu_id<>0 order by 1,menu_ID"
Avatar billede reino Nybegynder
21. juni 2007 - 09:45 #7
Heps, stort :), virker 100 %, takker. Softspot smider du et svar.:)
Avatar billede softspot Forsker
21. juni 2007 - 09:53 #8
Velbekomme :)
Avatar billede reino Nybegynder
21. juni 2007 - 10:17 #9
:)
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester