Fiz um randomize para pegar registros aleatórios no banco de dados, conforme vi em outro tópico aqui...
O problema é que dá sempre o mesmo resultado.
O código:
rs.Open "SELECT COUNT(codigo) AS total FROM pergunta WHERE cod_categoria = "&id_categoria&" AND status=1 AND NOT EXISTS (SELECT id_pergunta FROM quiz_data WHERE id_pergunta = codigo AND id_usuario = '"&id_usuario&"') ", Conexao
total = rs.fields("total").value
Randomize()
Aleatorio = Int(total*Rnd) + 1
rs.close
rs.Open "SELECT top " & Aleatorio & " codigo FROM pergunta WHERE status = 1 AND cod_categoria = "&id_categoria&" AND NOT EXISTS (SELECT id_pergunta FROM quiz_data WHERE id_pergunta = codigo AND id_usuario = '"&id_usuario&"') ORDER BY codigo DESC", Conexao
Pergunta
pgmador
pessoal,
Fiz um randomize para pegar registros aleatórios no banco de dados, conforme vi em outro tópico aqui...
O problema é que dá sempre o mesmo resultado.
O código:
rs.Open "SELECT COUNT(codigo) AS total FROM pergunta WHERE cod_categoria = "&id_categoria&" AND status=1 AND NOT EXISTS (SELECT id_pergunta FROM quiz_data WHERE id_pergunta = codigo AND id_usuario = '"&id_usuario&"') ", Conexao total = rs.fields("total").value Randomize() Aleatorio = Int(total*Rnd) + 1 rs.close rs.Open "SELECT top " & Aleatorio & " codigo FROM pergunta WHERE status = 1 AND cod_categoria = "&id_categoria&" AND NOT EXISTS (SELECT id_pergunta FROM quiz_data WHERE id_pergunta = codigo AND id_usuario = '"&id_usuario&"') ORDER BY codigo DESC", ConexaoComo fazer para realmente ser randomico???
Link para o comentário
Compartilhar em outros sites
3 respostass a esta questão
Posts Recomendados