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
VBS Af bsn i VBscript 5 16/07/202614:01 18/07/202610:46
Æ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
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 dag 16:43 Nomad Tracking Car Af fleknes i Apps til Android
25/0916:15 Internet forsvinder hele tiden Af TTA i Internetforbindelser
23/0920:49 Fejl på Tv2 Play Af Bukse i Browsere
23/0918:11 VB, Lægge 2 celler sammen og skrive den i cellen ved side af Af MC3390 i Excel
21/0910:39 DBA er ikke hvad det tidligere var - desværre! Af ErikHg i Fri debat
White papers
Flere white papers »