sono sempre qui...

vorrei sapere come posso avere un numero a caso compreso tra i miei id.


Dim acaso
Set acaso = dcnDB.Execute(SQL)
Dim maxID, minID, rndID
maxID = acaso("MaxID")
minID = acaso("MinID")

Randomize
rndID = Int((maxID - minID + 1) * Rnd + minID)

Function DiffADate()
DiffADate = Abs (DateDiff("d", Now, now-"& rndID&"))
End Function
'Dim acaso
SQL = "SELECT * FROM ricette WHERE ID="&DiffADate&" and categoriacod <> 17"


dove sbaglio??????

mi da questo errore:

Tipo di errore:
Microsoft JET Database Engine (0x80040E0C)
Testo del comando non impostato per l'oggetto comando.
/dia/cucina/cucina/index.asp, line 990

la linea e questa: Set acaso = dcnDB.Execute(SQL)