netten bulduğum hazır bir kodu biraz düzenleyerek şöyle bişey yaptım
Kod:
<%
dim rastgele_resim
redim rastgele_resim(6)
rastgele_resim(1)="pics/01.jpg"
rastgele_resim(2)="pics/02.jpg"
rastgele_resim(3)="pics/03.jpg"
rastgele_resim(4)="pics/04.jpg"
rastgele_resim(5)="pics/05.jpg"
rastgele_resim(6)="pics/06.jpg"
randomize timer
dim result
result=int(rnd*6)+1
dim strOut
select case result
case 1
strOut="<a href=sayfa1.asp><img src="&rastgele_resim(1)&" border=0 alt=Resim1>"
case 2
strOut="<a href=sayfa2.asp><img src="&rastgele_resim(2)&" border=0 alt=Resim2>"
case 3
strOut="<a href=sayfa3.asp><img src="&rastgele_resim(3)&" border=0 alt=Resim3>"
case 4
strOut="<a href=sayfa4.asp><img src="&rastgele_resim(4)&" border=0 alt=Resim4>"
case 5
strOut="<a href=sayfa5.asp><img src="&rastgele_resim(5)&" border=0 alt=Resim5>"
case 6
strOut="<a href=sayfa6.asp><img src="&rastgele_resim(6)&" border=0 alt=Resim6>"
end select
response.write (strOut)
%>
anasayfada bulunan her tabloya bu kodu yerleştirip her tablo için 10 resim atıyacam. 100 resim 10'ar 10'ar dağıtılmış olacak. tam istediğim gibi olmadı ama aynı işi görüyor. a href ve alt komutlarında " işareti kullanamadım, hata veriyor. asp bilmediğim için ona çözüm bulamadım, ama çalışıyor yinede. tek sorun alt=Doğa Foto yazdığım zaman browserde sadece Doğa çıkıyor. DoğaFoto birleşik yazmam gerekiyor mecburen. asp bilmeden bu işlerle uğraşmak baya kasıyor ama döküman okumakta sıkıyor, ancak böyle öğreniliyor işte..
not: konu asp'ye döndü, asp bölümüne taşırsanız sevinirim..