Randomize mail from MySQL database

[Brake Fail]

Including this script does not work.
I get the value -1 on Rand_nr and Number.
Why it nit working. I have read a lot on this...still

strSQL = "SELECT lopnr, namn, enamn FROM tblTest" Set Rs = objConn.Execute(strSQL) If Rs.EOF Then Response.Write "Inga poster att slumpa ?n.." Rs.Close : Set Rs = Nothing Else With Rs .Close .Cursortype=3 .Open End With Antal = Rs.RecordCount Randomize Rand_nr = Int(Rnd * Antal) Rs.Move Rand_nr Response.Write ""&Antal & "" Response.Write ""&Rand_nr & "" Response.Write " "&Rs("id")&". "&Rs("namn")&", "&Rs("enamn")&" " Rs.Close : Set Rs = Nothing End If

[Katty]

 Else With Rs .Close .Cursortype=3 .Open End With

Are you really closing the Record Set to open it again?
Can not bring Cursortype directly or use getRows instead and get number of responses then?

[MindSpace]

Why not use rand () in mysql instead of ASP? What I mean is that you should ask the database to return what they want, instead of downloading everything and then manually do anything half hitch filter.

select ID, Name, rand () AS random from table1
order by rand ()
Limit 1

This always gives a single post in response, and it is that at precisely the moment has the smallest value in the "coincidence".

(Although not 100% correct, as the rand () value is in the SELECT statement has no meaning, you need not even enter it. That's the ORDER BY uses as it is interesting.)