Immagini random

[ltatas]

Immagini random

Salve a tutti vorrei mettere uno script che mi visualizza in random n immagini linkabili in posizioni diverse ogni volta che si aggiorna.
Ho trovato questo script:

<script language="JavaScript">
<!--
function random_imglink(){
var myimages=new Array()
myimages[1]="01.jpg"
myimages[2]="02.jpg"
myimages[3]="03.jpg"
var imagelinks=new Array()
imagelinks[1]="pluto.com"
imagelinks[2]="pippo.com"
imagelinks[3]="paperino.net"
var ry=Math.floor(Math.random()*myimages.length)
if (ry==0)
ry=1
document.write('<a href='+'"'+imagelinks[ry]+'"'+'><img src="'+myimages[ry]+'" border=0></a>')
}
random_imglink()
//-->
</script>

Però se immetto più volte "document.write" visualizzo più volte la stessa immagine e nel caso faccio un più uno dopo supero il limite.
Qualcuno può darmi una mano?
Grazie

[expertwers]

Puoi provare ad utilizzare:

[HTML]<script type="text/javascript"><!--
var ran=new Array();

ran[0]='<img src="indirizzo_immagine">';
ran[1]='<img src="indirizzo_immagine">';
ran[2]='<img src="indirizzo_immagine">';

var id=Math.round(Math.random()*(ran.length-1)); document.write(ran[id]);
//--></script>
[/HTML]

logicamente aggiungendo i collegamenti.

[tuttoweb80]

funziona?

[ltatas]

No nn funziona.
Lasciando perde i link, ho inserito lo script, ma prima di tutto visualizzo una solo immagine, mentre vorrei visualizzare sempre tutte e tre ma sempre in ordine diverso.
Ciao e grazie

[ltatas]

Non viene in mente niente?
Volevo sapere se potevo fare in modo che il primo banner non era uguale a tutti gli altri, ecosi via.
Ciao e grazie

[ltatas]

Ho trovato questo e ho fatto la modifica che aggiungo 1 al valore random, l'unica cosas che dovrei dire che il valore deve essere compreso tra x e n, altrimenti va mi da un numero che nn è associato

<%
Dim saryBanners(3,3)
Dim intTotalBanners
Dim intRandomNumber
Dim intRandomNumber1

intTotalBanners = 3

saryBanners(1,1) = "PLUTO"
saryBanners(1,2) = "1.jpg"
saryBanners(1,3) = "xxx.pluto.xx"

saryBanners(2,1) = "PIPPO"
saryBanners(2,2) = "2.jpg"
saryBanners(2,3) = "xxx.pippo.xx"

saryBanners(3,1) = "Paperino"
saryBanners(3,2) = "3.jpg"
saryBanners(3,3) = "xxx.paperino.xx"

randomize

intRandomNumber = Int((intTotalBanners) * Rnd + 1)
intRandomNumber1 = Int((intTotalBanners) * Rnd + 2)

Response.Write("<a href=""" & saryBanners(intRandomNumber,3) & """ title=""" & saryBanners(intRandomNumber,1) & """ target=""_blank""><img src=""" & saryBanners(intRandomNumber,2) & """ border=""0""></a>")

Response.Write("<a href=""" & saryBanners(intRandomNumber1,3) & """ title=""" & saryBanners(intRandomNumber1,1) & """ target=""_blank""><img src=""" & saryBanners(intRandomNumber1,2) & """ border=""0""></a>")

%>

Come posso risolvere?