ciao weppos questo è il codice ...

codice:
  sql = "SELECT titolo, id, email FROM sito "
  Set rsModulo= Server.CreateObject("ADODB.Recordset")
  rsModulo.Open sql, conn, 3, 3

 var Quanti = parseInt(Rs.RecordCount)
    RsModulo.MoveFirst()

   

var Casuale = parseInt(Math.random() * Quanti)
    RsModulo.Move(Casuale)
grazie sb82 ho risolto quel problema