Pessoal boa noite,
Estou com um problema q nao 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
%>

Random Repetindo Foto.como Evitar?
Started By dartvader, 14/03/2005, 03:00
2 replies to this topic
1 user(s) are reading this topic
0 membro(s), 1 visitante(s) e 0 membros anônimo(s)