Random billeder

Her får du et skridt på vejen - for 15 point må du lave resten selv

redim MyArr(3)
Randomize

ens = true
do while ens
       
For i = 0 to 3
    Myarr(i) = 1 + int(Rnd*24)
    next
    ens = false

    for i = 0 to 3
        for j = i to 3
            if not i = j and Myarr(i) = Myarr(j) then
            ens = true
            next
        next
    loop

Et array bliver oprettet - med 4 tal

f.eks

f.eks

Myarr(0) = 5
Myarr(1) = 1
Myarr(2) = 6
Myarr(3) = 8

Hvis du har et AutonummerID i din DB kan dú hente de 4 records ud fra ovenstående tal - dvs. billed nr 5,1,6,8 vil blive vist

Hej,
Evt. en lidt mere enkel løsning. Et asp script eks billeder.asp
<%

RANDOMIZE
LowestNumber = 1
HighestNumber = 10
RandomNumber = INT((HighestNumber-LowestNumber+1)*Rnd+LowestNumber)
SELECT CASE RandomNumber
CASE "1"%>
<A HREF="http://www.etellerandet.dk"><IMG SRC="billeder/billede1.gif" BORDER=0></A>
<%CASE "2"%>
<A HREF="http://www.etellerandet"><IMG SRC="billeder/billede2.gif" BORDER=0></A>
<%CASE "3"%>
<A HREF="http://www.etellerandet.net"><IMG SRC="billeder/billede3.gif" BORDER=0></A>
<%END SELECT%> 

Og så videre hvis du har flere billeder !

Der hvor du vil have vist billederne sætter du den her ind:
<!--#INCLUDE FILE="billeder.asp"-->

mvh
/Ivan

florint >> Det samme billed må ikke vises 2 gange

Hej,

Jeg opfattede det som om det bare skulle skiftes når siden blev loaded !
/Ivan (men ellers har du ret)

Hmmm... Sorry i ikke har fået dem før... fandt på noget andet og glemte helt det her spm...