Problema con rs.move

[Federix]

Ho uno script che mi restituisce un numero casuale da 1 a 70. Lo script è il seguente:

sql = "select count(*) from vetrine_vetrine where visibile='true'"
Set rs = carezzoweb.execute(sql)
max = rs(0)
rs.close
set rs = nothing

randomize()
casuale = int(rnd() * max)
if casuale = 0 then casuale = 1

ssql = "select * from vetrine_vetrine where visibile = 'true'"
set rs = carezzoweb.execute(ssql)

ora io devo muovermi dal prima record al record "casuale", per fare questo ho fatto:

rs.movefirst
rs.move casuale

solo che il browser mi dice che c'è un eccezione nell'operazione rs.move.
Io sinceramente non sò cosa fare, in quanto con i DB Access me lo fà tranquillamente, mentre con i DB MySQL mi viene fuori questo errore.
Avete consigli???

[weppos]

Una query select va aperta, non eseguita.

ssql = "select * from vetrine_vetrine where visibile = 'true'"
set rs = carezzoweb.execute(ssql)

in

ssql = "select * from vetrine_vetrine where visibile = 'true'"
nomerecordset.Open ssql, nomeconnessione, 1

[Federix]

Oghei, perfetto.

[Federix]

Invece non funziona ugualmente. Non c'è un altro sistema per pescare un record a caso all'interno di un DB sql???

[longline]

Se MySql supporta il metodo MoveNext, puoi fare un ciclo...

[Federix]

Cosa?? Come???

[longline]

rs.MoveFirst
For X = 1 to casuale
  rs.MoveNext
Next

Però, come ho detto, non conosco MySql e non so se supporta questo metodo, anche se penso di si visto che supporta .MoveFirst...

[Federix]

Per ora sembra funzionare, vediamo un pò.