weight

Sitter och skall göra ett script som skall rotera banners på min sida. Problemet är att jag vill ha så man kan bestämma att en viss banner skall visas oftare än en annan, som när man använder weight i AdRotator fast vad jag har fattad det som så kan man bara använda AdRotator med en textfil och inte med en databas.
Nån som har någon ide på hur man kan göra så att man har en "tyngd" på varje banner?

------------------
// David - Probably the best guy in the world

Om du har en tabell som heter banners och som har bla kolumnerna

id weight

där weight är ett heltal. 1 motsvarar normalvikt och det förutsätts att alla banners har en vikt.

Tanken är att man lägger in alla id i en array och de som har högre vikt förekommer fler gånger i arrayen och har därmed större sannolikhet att bli valda.

sql = "select (select sum(weight) from banners),id , weight from banners"
set rs = connect.execute(sql)
dim a()
items = rs(0)
redim a(items - 1)
pos = 0

while not rs.eof
   for i = 1 to rs(2)
       a(pos) = rs(1)
       pos = pos + 1
   next
   rs.movenext
wend
randomize
id = a(int(rnd()*items))

sql = "select * from banners where id = " & id

------------------
essentitia preter non sans multiplicandum