[James87]

hi guys, i need help on randomize the questions from access database. what can i do to randomize it? i'm new to vb code. Any help will be greatly appreciated! thx in advance.

below are my code

<%
    dim numOfItemsPerPage, currentPage, numberForPaging
    numOfItemsPerPage = 5
    'start the main loop to find all the questions
    set RS = Server.CreateObject("ADODB.recordset")
    sql="SELECT * FROM QUESTION "
    on error resume next
    RS.Open sql, conn
    response.Write(request.QueryString("errorStr"))
if not RS.EOF then
    RS.movefirst
    do
        response.write "<b>" & rs("No") & ". " & rs("Question") & "</b><p>" & chr(13)
        'display all available options
        set ORS = Conn.Execute("SELECT * FROM [option] WHERE [QuestionID]=" & RS("QuestionID") )
        if not ORS.EOF then
            ORS.movefirst
            do
            response.write "<input type=Radio Name=""Question" & RS("QuestionID") & """ Value=""Answer" & ORS("OptionID") & """>" & ORS("Option") & "<br>" & chr(13)
                ORS.movenext
            loop until ORS.EOF
        end if
        response.write "<p>"
        RS.movenext
    loop until RS.EOF
    if err<>0 then
    response.Write(sql)
    end if
end if
conn.close
%> 

moving to databases

add order by newid()

i do not remember if it is mssql only or access too

[Sxooter]

This really depends on how many rows are in your database and what your requirements are.

If there are only few hundred or maybe 5,000 rows in the database, then adding

order by rand() limit 1 is ok.

As your dataset grows, order by rand() becomes progressively slower and unusable. At that point you've got to switch to something else. Generally pre-randomizing either the data in the table, or making a join table with randomized numbers to pick your entries from.

but for smaller datasets, just stick to order by rand() limit 1