Farklı başlık açmadan ben de ASP kodunu vereyim:

<% 
dim  generated_array
redim generated_array(5)
generated_array(1)="resim.gif"
generated_array(2)="resim2.gif"
generated_array(3)="resim3.gif"
generated_array(4)="resim4.gif"
generated_array(5)="resim5.gif"
randomize timer
dim  result
result=int(rnd*5)+1
dim  strOut
select  case result  
      case  1
        strOut="<img src="&generated_array(1)&" border=0>"
      case  2  
        strOut="<img src="&generated_array(2)&" border=0>"
      case  3
        strOut="<img src="&generated_array(3)&" border=0>"
      case  4
        strOut="<img src="&generated_array(4)&" border=0>"
      case  5
        strOut="<img src="&generated_array(5)&" border=0>"        
end  select
response.write (strOut)
%>

5 resim döndüreceğimizi belirttik arttırmak istersek şu şekilde sıralayabiliriz (yukarıdaki belirttiğimiz 5 değerlerini arttırmayı da unutmuyoruz):