08. marts 2009 - 12:01Der er
3 kommentarer og 1 løsning
Ny randomize
Hi
Hvis jeg bruger: Randomize Terning = int(rnd()*antal)+1 Set RS = Server.CreateObject("ADODB.Recordset") RS.Open "Select * from billeder where medlemid ="& terning &"", Conn if rs.eof then
Hvis den når enden altså der ingen er skal den kører turen igen altså en ny Randomize, til den finder en.
Troede man kunne bruge Goto men det virker ikke her.
Med kunstig intelligens skaber HP’s nye OmniBook X 14 en unik og skræddersyet brugeroplevelse målrettet dem, der ønsker høj ydeevne og intelligente funktioner
24. juli 2024
Slettet bruger
08. marts 2009 - 12:06#1
Set RS = Server.CreateObject("ADODB.Recordset") fundet = false
do until false = true Randomize Terning = int(rnd()*antal)+1 RS.Open "Select * from billeder where medlemid ="& terning &"", Conn
if not rs.eof then fundet = true end if loop
Dette burde hjælpe dig.
Synes godt om
Slettet bruger
08. marts 2009 - 12:06#2
Smider lige et svar med det samme, hvis det eventuelt er sandt :o)
rettede den lige til så den duede. Men ideen var rigtig
Synes godt om
Slettet bruger
08. marts 2009 - 17:33#4
ja var vidst kommet til at skrive false = true ;) men godt det virkede.
Synes godt om
Ny brugerNybegynder
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.