Søg
Avatar billede mothwe Nybegynder
09. januar 2003 - 22:19 Der er 12 kommentarer og
1 løsning

Math.randon

Hvordan laver jeg lige denne her i VBScript???

Math.floor(Math.random()*rs(0))
Avatar billede dgivoni Nybegynder
09. januar 2003 - 22:44 #1
Rnd() returnerer et tilfaeldigt nummer mellem 0 og 1
Avatar billede dgivoni Nybegynder
09. januar 2003 - 22:46 #2
og Fix(85.34) returnerer 85, dvs. fjerner decimalerne, hvilket i princippet er det samme som floor, som runder nedad.
Avatar billede dgivoni Nybegynder
09. januar 2003 - 22:47 #3
Saa praecis det samme i vbscript bliver:
Fix(Rnd()*rs(0))
Avatar billede mothwe Nybegynder
09. januar 2003 - 22:59 #4
Hey dgivoni, tak for dit svar som giver perfekt mening i mit hoved, men desværre får jeg hele tiden resultatet 1, selvom rs(0)=2.

Hvorfor mon?
Avatar billede dgivoni Nybegynder
09. januar 2003 - 23:04 #5
lyder mærkeligt.
prøv evt. at test både med og uden fix
f.eks.
a = rnd()*rs(0)
Response.write a
Response.write fix(a)
Avatar billede mothwe Nybegynder
09. januar 2003 - 23:05 #6
og sætter jeg rs(0)=100, så bliver resultatet heletiden 70 ???
Avatar billede dgivoni Nybegynder
09. januar 2003 - 23:10 #7
proev at bruge Randomize lige før du bruger rnd()
Avatar billede dgivoni Nybegynder
09. januar 2003 - 23:10 #8
det skulle hjælpe på tilfældigheden... :-)
Avatar billede mothwe Nybegynder
09. januar 2003 - 23:23 #9
Hmm.. er det fordi jeg bruger en variabel (nulstilles den ikke ved reload af en webside?)

Her er noget af min kode:

nr =  Fix(Rnd()*rs(0))
SQLstmt = "SELECT * FROM billede WHERE billedenr=" & nr & ";"
Avatar billede mothwe Nybegynder
09. januar 2003 - 23:24 #10
Hvis jeg bare skriver nr=1 eller nr=2, så virker det?!
Avatar billede dgivoni Nybegynder
09. januar 2003 - 23:30 #11
rnd() er kun en pseudorandom funktion, så hvis du ikke bruger randomize kan du ikke være sikker på tilfældigheden...
prøv at indsætte:
randomize
nr =  Fix(Rnd()*rs(0))
SQLstmt = "SELECT * FROM billede WHERE billedenr=" & nr & ";"
Avatar billede mothwe Nybegynder
09. januar 2003 - 23:33 #12
Så funger det dælme :)

Tak for hjælpen!
Avatar billede dgivoni Nybegynder
09. januar 2003 - 23:37 #13
det var så lidt :-)

/David
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 VBscript kategorien

Titel Indlæg Oprettet Seneste aktivitet
Ændre navn på folder Af bsn i VBscript 12 07/07/202312:45 09/07/202307:04
Outlook makro Af Webnoob i VBscript 6 09/02/202313:32 16/02/202315:51
Sti / Filname med mellemrum ??? Af ksor i VBscript 10 07/10/202200:43 07/10/202215:40
GetLastRow - Google spreadsheet Af rickiegrayholm i VBscript 2 22/04/202213:23 22/04/202214:55
Batch fil Af BDV i VBscript 1 12/01/202210:00 12/01/202210:05
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 20:13 PIHOLE Af dcedata1977 i Linux
13/0312:06 SDKORT / SSD Af dcedata1977 i Linux
13/0309:12 Kan min telefon høre en samtale og lave annonce tilbud efter det Af Niels Ebbe Schmidt Huus i Mobiltelefoner
11/0307:12 Fastnettelefon Af nu_igen i Andet hardware
11/0306:03 Tilføje info til filegenskaber Af Malm i Windows
White papers
Flere white papers »