FAQ |
Kalender |
![]() |
#1 | ||
|
|||
Medlem
|
Försöker fixa följande i ASP men har fastnat i en tankevurpa.
Sidan laddas, ett nummer slumpas fram mellan 1-4. Sen skall inte samma nummer komma upp förrän alla nummer i serien är "slut". T.ex 3,4,1,2 ... 2,4,1,3 ... osv Kört randomize och sen satt en sträng för att sedan stämma av om randomvärdet är samma som strängen och då slumpa fram ett nytt. Men då kan t.ex 1 återkomma efter 1 annat unikt nummer :-( Hoppas någon förstår :-) |
||
![]() |
![]() |
![]() |
#2 | |||
|
||||
Har WN som tidsfördriv
|
Nått sånt här kanske?
Kod:
Dim NummerSträng, SlumpatNummer NummerSträng = "" Do While len(NummerSträng < 4) Slumpatnummer = Randomfunktion... If Not Instr(Nummersträng, SlumpatNummer) Then NummerSträng = NummerSträng + SlumpatNummer Response.Write SlumpatNummer & ", " End If Loop |
|||
![]() |
![]() |
![]() |
#3 | ||
|
|||
Har WN som tidsfördriv
|
den kan dock fastna i en oändlig slinga..
så här: sätt upp en array med alla möjliga lottnumer Kod:
dom lotteryNumbers(4) for I=1 to 4 lotterNumbers(I) = I next |
||
![]() |
![]() |
![]() |
#4 | ||
|
|||
Medlem
|
Tack melin, det var något sånt jag hade tänkt mig, får se om jag får ihop resten!
|
||
![]() |
![]() |
![]() |
#5 | |||
|
||||
Har WN som tidsfördriv
|
Så länge du bara har fyra nummer så känns det som att min något ineffektiva do while fungerar hyffsat. Men det kanske är lika bra att göra rätt från start..
|
|||
![]() |
![]() |
Svara |
|
|