Jump to content


Photo

Random Repetindo Foto.como Evitar?


  • Faça o login para participar
2 replies to this topic

#1 dartvader

dartvader

    Novato no fórum

  • Usuários
  • 6 posts
  • Sexo:Não informado

Posted 14/03/2005, 03:00

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

%>

#2 Rerex

Rerex

    Turista

  • Usuários
  • 25 posts
  • Sexo:Não informado

Posted 14/03/2005, 15:56

Você tem que adicionar os itens já adicionados em um Array e toda vez antes de exibir, deve verificar se ele estáa no Array.

#3 dartvader

dartvader

    Novato no fórum

  • Usuários
  • 6 posts
  • Sexo:Não informado

Posted 15/03/2005, 21:50

ae caomao aaaafço isso ???????




1 user(s) are reading this topic

0 membro(s), 1 visitante(s) e 0 membros anônimo(s)

IPB Skin By Virteq