CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg
Cookie ikon
Avatar billede lordnelson Seniormester
08. marts 2009 - 12:01 Der 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.

Ln
Avatar billede 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.
Avatar billede Slettet bruger
08. marts 2009 - 12:06 #2
Smider lige et svar med det samme, hvis det eventuelt er sandt :o)
Avatar billede lordnelson Seniormester
08. marts 2009 - 13:17 #3
Tak for det

rettede den lige til så den duede. Men ideen var rigtig
Avatar billede Slettet bruger
08. marts 2009 - 17:33 #4
ja var vidst kommet til at skrive false = true ;) men godt det virkede.
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
Programmeringssprog kurser
Kurser inden for grundlæggende programmering
Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel Indlæg Oprettet Seneste aktivitet
Lost focus Af bsn i ASP 1 07/11/202415:34 01/01/202514:58
ASP classic Af bsn i ASP 8 28/10/202423:11 30/10/202422:51
Classic - filer vist med sidste fil først Af bsn i ASP 5 23/05/202409:56 24/05/202400:02
Optimer MySql table med ASP Af poulmadsen i ASP 4 26/04/202417:16 26/04/202418:37
JSON Af ingeman i ASP 3 07/04/202417:53 08/04/202412:09
Se alle spørgsmål i kategorien Opret spørgsmål

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.

Opret Log ind

Du kan også logge ind via nedenstående tjenester



Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I går 19:07 Mellem tidspunkter Af nyhavn18 i Excel
I går 10:02 Oversigt over antal feriedage Af AnjaJesse i Excel
I går 06:56 manglende filter Af skaanning i E-mail programmer
30/0616:17 Brugere må gerne redigere, men ikke overskrive default sortering eller filtrering Af mj72 i Excel
30/0613:37 Google Drev til PC vil ikke logge på Af k_lindholm i Backup- & Antivirus
White papers
Flere white papers »


Premium
Teaser billede
Paradoksalt at staten binder sig til Microsoft med ny mangeårig aftale: ”Lad os håbe, at det er slut, når den her kontrakt udløber," siger toprådgiver
Læs mere »
Milliard-virksomheden Crayon står til at forsvinde: Opsluges helt af SoftwareOne efter opkøb
Caroline Stage vil bremse omstridt AI-lov
Microsoft fyrer tusindvis af medarbejdere for at øge effektiviteten
Se alle »
Computerworld
Teaser billede
Danmarks største fiberselskab skifter navn: Norlys skal ikke længere hedde Norlys
Læs mere »
Hundredevis af printer-modeller ramt af sårbarheder
Amerikansk koncern med 700 ansatte i Danmark: Sender besked til kunder 21 måneder efter storstilet angreb
Microsoft kæmper med at få Copilot ud over rampen – og det skyldes især én ting
Se alle »
CIO
Teaser billede
Microsoft kæmper med at få Copilot ud over rampen – og det skyldes især én ting
Læs mere »
Hackerne slog til under stor SAP-migrering: Tvang Bauhaus til at vælge én af disse tre løsninger for it-infrastrukturen
Her står medarbejderne for at ansætte og fyre - og det har gjort rekruttering af it-professionelle langt lettere
Microsoft ændrer i sin it-sikkerheds-arkitektur efter gigantnedbrud
Se alle »
Job & Karriere
Teaser billede
Fungerede ikke: Dropper AI som erstatning for kundeservice-medarbejdere - har nu brug for nye folk
Læs mere »
NNIT har fyret 100 medarbejdere - nedjusterer markant
It-chef og halv it-afdeling fyret i forsikringsselskab på grund af kommentar om potteplante
Danske it-folk tør ikke længere skifte job hele tiden - og det er der en særlig årsag til
Se alle »
White paper
Teaser billede
IT i front: Sådan bliver netværk en strategisk driver
Læs mere »
AI og kunderejsen: Sådan vinder du fremtidens forbrugere
Sikkerhed gjort enkelt: Beskyt din virksomhed direkte i browseren
Cybersikkerhed 2025: Er din branche blandt de mest udsatte?
Se alle »

Events
Flere events »
White papers
Flere white papers »
IT-Kurser
Se alle vores it-kurser »