Estrazione random

[AltF4]

sto provando a fare una estrazione casuale dal db ma mi da un errore:



Microsoft JET Database Engine errore "80040e14'

Errore di sintassi (virgola) nell'espressione della query 'id >= 6,11080193519592'.

lista.asp, riga 46



questo è il codice trovato su aspitalia.com:

set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath("mdb-database/nuovo.mdb") & ";"

SQL = "SELECT MAX(id) AS MaxId FROM tbldati"
set rs = conn.Execute(SQL)
If Not rs.Eof Then
    MaxId = rs("MaxId") 
Else
    MaxId = 0
End If

Rs.Close : Set rs = Nothing
%>

<%
Randomize
RandomNumber = Rnd * MaxId
%>

<%

SQL = "SELECT TOP 1 * FROM tbldati WHERE id >= " & RandomNumber
set rs = conn.Execute(SQL)  <--- questa è la riga 46 <----
If Not rs.Eof Then
    Response.Write rs("marca") & " - " & rs("modello")
Else
    Response.Write "Niente da visualizzare"
End If

%>

Ci sono errori o è il db?

Thanks

[Roby_72]

Se non converti l'esito del random in numero intero la funzione come vedi ti restituisce una valore decimale che ovviamente come contatore non potrà mai esistere...

RandomNumber = Cint(Rnd * MaxId)

Roby

[AltF4]

funziona, ma volevo chiederti una cosa.

secondo te è normale che per la maggior parte delle volte visualizza il primo record e solo qualche volta gli altri?

<%
' Open Connection to the database
set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath("auto.mdb") & ";"

SQL = "SELECT MAX(id) AS MaxId FROM tbldati"
set rs = conn.Execute(SQL)
If Not rs.Eof Then
    MaxId = rs("MaxId") 
Else
    MaxId = 0
End If

Rs.Close : Set rs = Nothing
%>

<%
Randomize
RandomNumber = Cint(Rnd * MaxId)
%>

<%

SQL = "SELECT TOP 1 * FROM occasioni WHERE id >= " & RandomNumber
set rs = conn.Execute(SQL)

Response.Write rs("marca") & " - " & rs("prezzo")
%>

potrebbero essere solo dei casi?

grazie ancora

[99eros9]

prova a simulare il gioco dei dati craps e lo scoprirai
comunque i valori sono pseudo casuali e si basano, in linea generale, su di un dato di base che può essere l'ora corrente o un valore che tu scegli come base... nel tuo caso il valore di base che stai passando è MAX(id) e dal momento che il valore è, almeno nelle tue prove, quasi sempre lo stesso... le operazioni matematiche procurano risultati molto più "falsati" che se usassi un valore che cambia ad ogni istante.. come l'ora, appunto!... potrebbe essere una spiegazione piuttosto logica

[AltF4]

Il tuo ragionamento non fa una piega, ma con questo sistema non è possibile ottenere un effetto random accettabile?

sto continuando a provare, ma nel 90% dei casi mi riporta il primo record e raramente, solo raramente gli altri?

posso ovviare in qualche modo o devo cambiare funzione?

[AltF4]

mah.. dopo altre prove ho notato che alla prima esecuzione del file visualizza sempre e soltanto il primo record!!

devo fare parecchi refresh prima che visualizzi almeno un'altro diverso dal primo.

siccome la pagina non sarà mai aggiornata, suppongo che non funzioni mai l'effetto random!!

giusto??

[99eros9]

Il random viene prodotto quando il server elabora la richiesta della pagina.

Non puoi ovviare, perchè la base dati uscirebbe dal limite che corrisponde al numero totale dei tuoi record...
comunque la mia era solo una spiegazione vagamente logica
Non è detto che tu nel gioco non sia particolarmente sfigato :-)

fai provare a fare il refresh ad un altro :maLOL:

[Roby_72]

Prova con

Randomize Timer

Roby

[AltF4]

Andrebbe bene così?

<%
Randomize
RandomTimer = Cint(Rnd * MaxId)
%>

[AltF4]

lo so, ho detto una ca**ata!! VVoVe:

ma come faccio?