Rondom Repetindo Foto.como Evitar?

[Guest Guest]

Pessoal boa noite,

Estou com um problema q não consigo identificar no meu codigo asp.Fiz um codigo rondom so que ele repete 1 a 2 vezes a mesma foto do veiculo.Que linha de codigo posso botar nele para q impessa do mesmo repetir?

Segue codigo para analise.

agradeço.

Abraços

<%

Set rsV = abredb.Execute("SELECT * FROM veiculos ORDER BY data_cad ASC")

V1 = 0

V2 = 0

V3 = 0

V4 = 0

V5 = 0

V6 = 0

if not rsV.eof then

strVeiculos = rsV.getrows()

rsV.movefirst

Do While Not rsV.EOF

intCounter = intCounter + 1

rsV.movenext

Loop

rsV.MoveFirst

end if

cont = 1

if not rsV.eof then

for x = 1 to 3

if not rsV.eof then

Randomize

intID = Int(Rnd * intCounter)

Do Until intID <> V1 AND intID <> V2 AND intID <> V3 AND intID <> V4 AND intID <> V5 AND intID <> V6

Randomize

intID = Int(Rnd * intCounter)

Loop

if V1 <> 0 then

V1 = intID

elseif V3 <> 0 then

V3 = intID

else

V5 = intID

end if

%>

[bareta]

tenta usar um if..... junto com uma session....

if session("id")<>valor(id do produto) then

.....

end if

mais ou menos asim ..

deu pra entender

[RAFBRASIL]

Mas Bareta, o if que sugeriste só evitará que a figura se repita 2 vezes seguidas, e acho que ele não quer nenhuma repetição no ciclo.

Essas linhas:

rsV.movefirst

Do While Not rsV.EOF

intCounter = intCounter + 1

rsV.movenext

Loop

rsV.MoveFirst

Podem ser substituidas por apenas uma:

intCounter = Ubound (strVeiculos,2)

Eu faria assim, criaria uma nova dimensão do vetor strVeiculos() que utilizaria para marcar qundo o registro fosse exibido randômicamente. Dai com um if no início do laço for eu ignoiraria os registros marcados (já exibidos).

Ou não.

[Guest Guest]

oi pessoal.Ate pode repetir depois outra vez que acessarem o site.O importante é que não repita na mesma vez que a pessoa acesse a pagina.Entenderam? sou novo em asp e se puderem me ajuadr mais agradeceria muito.abraços galera

[Guest Guest]

Bareta.podes me explicar melhor como poderei colocar este comando neste meu codigo? Obrigado

[cyberalexxx]

Que banco de dados você usa??

[Guest Guest]

access

[cyberalexxx]

access

vixi!!!

eu perguntei porque eu teria uma solução para o mysql que seria:

SELECT * FROM veiculos ORDER BY rand()

no access existe também a função RND(campo), mais o pessoal do forum já reportou que ele não funciona legal.

[bareta]

sql="select top XX * from tabela ORDER by rnd(id)"

set rs=conn.execute(sql)

aonde o xx é quantidade de registros que você quer

[Guest Guest]

Mas cyberalexxx não tem alguma linha de comando que se eu botar neste codigo vai impedir de que ele repita?

[cyberalexxx]

Mas cyberalexxx não tem alguma linha de comando que se eu botar neste codigo vai impedir de que ele repita?

Infelizmente não conheço nenhum atalho para seu problema.

Caso o sorteio direto no banco de dados (rnd) não de certo, acho que vai ter q ser através de varias comparações mesmo (ifs).

[]'s