Random images

Sådan her?

<%
randomize
randomvalue = Int(rnd*9)+1
response.write "<img class=""pic"" src=""00"&randomvalue&".jpg"">"
%>

Hvis dine billeder hedder ex 001.jpg, 002.jpg osv. :)

jps6kb> Det er ikke nok

Du skal have en loop og en "huskeliste", hvor du tilføjer de tal du lige har haft..

hvordan det?

det virker nemlig heller ikke

jps6kb> Lidt i stil med http://www.eksperten.dk/spm/707926

Bare med ASP (går jeg ud fra)..

Scriptet der bliver brugt findes http://www.eksperten.dk/spm/707926#rid6355235

Med rettelsen http://www.eksperten.dk/spm/707926#rid6355272

Eksempel:

dim total_antal_billede
total_antal_billede = 10 ' her sættes antallet af billeder i alt

dim randomtal, tal, run
randomtal = ""
tal = 0
run = true

randomize

for i = 1 to 4

    run = true

    do while run = true and c < 40

        tal = int(rnd * total_antal_billede) + 1

        if instr(randomtal, tal & ",") < 1 then
            randomtal = randomtal & tal & ","
            run = false
        end if

    loop

    response.write "<img src=""billede" & tal & ".jpg""><br>"

next

I min kode:
- er der ialt 10 billeder at vælge imellem
- hedder billederne "billede1.jpg", "billede2.jpg".., osv.

Rettelse:

dim total_antal_billede
total_antal_billede = 10 ' her sættes antallet af billeder i alt

dim randomtal, tal, run
randomtal = ""
tal = 0
run = true

randomize

for i = 1 to 4

    run = true

    do while run = true

        tal = int(rnd * total_antal_billede) + 1

        if instr(randomtal, tal & ",") < 1 then
            randomtal = randomtal & tal & ","
            run = false
        end if

    loop

    response.write "<img src=""billede" & tal & ".jpg""><br>"

next