Kak she stane za poveche ot edin baner?
<%
randomize()
r=rnd()
if r>0.5 then
response.write("ad.gif")
else
response.write("ad2.gif")

End If
%>

Знаем... нагрухваш всички банери в масив и после си избираш един /кода е примерен и подлежи на проверка, понеже ме мързи да тествам/:

Dim Banners (100)



Banners (1)='banner1.gif'

Banners (2)='banner2.gif'

...

Banners (100)='banner100.gif'



Randomize



Response.Write Banners (Int (Rnd*100+1))

посоченият от теб пример може да се съкрати - не е нужно да имаш банери в масив, след като можеш да кръстиш банерите от baner1 до baner100 и просто да

response.write "baner" & sluchajno_chislo & ".gif"...

разбира се, това е опростенческо, понеже банерите несъмнено имат и ЛИНКОВЕ към тях :) Тогава се връщаме към твоето решение с двумерен масив и данни за връзката.

Е, защо да е по-сложничко с база?
Например:

set Rs = oConn.Execute("SELECT * FROM banners")

strBanners = rs.getrows()
rs.movefirst
Do While Not rs.EOF
intCounter = intCounter + 1
rs.movenext
Loop

Randomize
intID = Int(Rnd * intCounter)
strDisplay = strBanners(1,intID)
------------------------------------------------------
<%= strDisplay%>

ohh, otnovo ne bih postupil taka :)

kato komentar - tozi recordset sys set rs=conn.execute sql_zajavka ima po default mnogo tupi svojstva. primerno niama recordcount :) osven tova s rs.getrows() udvojavash zaemanoto v pametta prostranstvo, poneje ti taka ili imash vednuj dannite v recordset. na 3-o miasto tova rs.movefirst e izlishno.

so, mojat primer
<%
set rs=server.createobject("adodb.recordset")

randomize
rs.open "select * from banners", conn, 3
if not rs.eof then
rs.absoluteposition=(rs.recordcount-1)*rnd+1
show_my_banner
end if
rs.close
%>

Мда, в общи линии си прав - малко наизуст го писах и не е особено оптимизирано :)).
Но всичко върши работа...
А и какво значи execute има тъпи свойства? Всичко зависи от това, какво ти трябва, ако не ти трябват съответни свойства не би следвало да те интересува има или ги няма :).
А rs.movefirst-а що съм го написал??? Знам ли :).

ами нали това е форум за обмяна на опит ;-)

просто споделих начина на работа, който според мен е по-ефективен :)

Po otnoshenie na performance..
ako otworsih RS prez con.execute, rabotata s nego e po-byrza, zaradi fowrwardOnly, adClient i t.n.
Towa ti pozwolqwa da teglish recordite bez da chakas celiqt RS da pristigne pri teb..
AMa nqma zanachenie..
karaj prosto wmetwane

da, ama puk connectiona ti e zaet, dokato asp-to produljava da se execute-va i moje da ti se naloji da rabotish s 2 connectiona;

osven tova ti lipsvat danni za tova kolko e goliam recordseta.

ne vijdam nikakvo smisleno predimstvo.