Perchè questo codice, che utilizzo per estrarre un elemento a caso da una tabella ed estrarre il numero di elementi della tabella e poi calcolo un numero casuale tra 1 e tale valore:
codice:
<% 
' apertura conn 
strconn = "Driver={Microsoft Access Driver (*.mdb)}; DBQ="& server.mappath("/mdb-database/simple.mdb")
set objconn = server.createobject("ADODB.connection")
objconn.open strconn

' query SQL 
strSQLMax = "SELECT Max(ID) as MaxVal FROM message ORDER BY ID" 
strSQL = "SELECT Top 1 ID, content FROM message Where ID = " 

' estrai valore massimo 
Set rs = objconn.Execute(strSQLMax) 
intMax = rs("maxVal") 
rs.Close 
set rs = Nothing 

' genera valora casuale 
Randomize() 
intRandom = CInt ((Rnd() * intMax) + 1) 

' estrai record 
Set rs = objconn.Execute(strSQL & intRandom) 

' visualizza in qualche modo 
' ... 

rs.Close 
set rs = Nothing 

' chiusura conn 
objconn.Close 
set objconn = Nothing 
%>
Restituisce:
Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

[Microsoft][ODBC Microsoft Access Driver] You tried to execute a query that does not include the specified expression 'ID' as part of an aggregate function.