Originariamente inviato da optime
Standing ovation per l'ottimo titolo dato al thread. Una lettura del regolamento prima di postare non puo' che far bene.


cmq io proverei con

Rnd(ID_Squadra)

cerca strSql e sostituiscila cosi:
strSql = "SELECT * FROM PICTURES WHERE PIC_APPROVED = 1 AND PIC_ID = Rnd(PIC_ID)" ORDER BY PIC_ID ASC"

se nn sbaglio esiste la funzione random in sql

oppure se nn esiste prova con
Randomize
numero = Int((NUMERO_TOTALE_RECORD * Rnd) + 1)
strSql = "SELECT * FROM PICTURES WHERE PIC_APPROVED = 1 AND PIC_ID =" & numero & " ORDER BY PIC_ID ASC"