Utilizzo questa query per estrarre alcuni dati dal database:

codice:
<%
sql = "SELECT dato_a FROM tabella group by dato_a order by rand() limit 50"

Set Rs = Conn.Execute(sql)

while not rs.eof

fsize=fsize

if fsize > 6 then
   fsize = 1
end if

dato_a = lcase(Rs("dato_a"))

'dato_a= (UCase(left(dato_a, 1)) & mid(dato_a, 2, len(dato_a)-1))

%>

<%=dato_a%>

<%

rs.movenext

fsize=fsize+rnd(0.001)

wend

%>
Ultimamente i dati da estrarre sono aumentati di molto e la query è molto molto lenta.

Secondo voi è possibile migliorarla per aumentarne la prestazioni?


Grazie