Fala povo da programação.
Quero saber como fazer uma comparação.
Ex.
Tenho a seguinte sequencia.
12,125,1250,45,450,453
Onde cada número representa um código.
Quero ir seleconando um a um aleatoriamente, mas sem repetir.
Tenho números de 01 a 1000.
Quero fazer seleção nesses números, retirando apenas esses"12,125,1250,45,450,453
Tem como fazer isso.
Thanks.
Publicidade
|
|
Page 1 of 1
Help-me com String's Quero obter alguns valores dentro de um
#2
Posted 11 December 2004 - 11:20 AM
Brother!!
Estou com um pouquinho de pressa, mas utilize este exemplo para vc desenvolver seu sisteminha...
Bota alguns 'IFs' que vc consegue o que esta precisando...
abraços!!!
Estou com um pouquinho de pressa, mas utilize este exemplo para vc desenvolver seu sisteminha...
CODE
<%
nome = "jose|paulo|william|wellington|giuliana"
total = 3
Analistas = Split(nome, "|")
For k = 0 to Ubound(Analistas)
response.Write(Analistas(k) & "<br>")
Next
response.Write("<br><b>Sorteio dos Analistas( ):</b><br><br>")
y = 1
For i = 1 to total
ArrayAnalista = Split(nome, "|")
Randomize()
AnalistaSorteado = Rnd() * UBound(ArrayAnalista)
AnalistaSorteado = CInt(AnalistaSorteado)
Response.Write y & " - " & ArrayAnalista(Cint(AnalistaSorteado)) & "<br>"
If Cint(AnalistaSorteado) = 0 Then
nome = Replace(nome, ArrayAnalista(Cint(AnalistaSorteado)) & "|", "")
Else
nome = Replace(nome, "|" & ArrayAnalista(Cint(AnalistaSorteado)), "")
End If
y = y + 1
Next
%>
nome = "jose|paulo|william|wellington|giuliana"
total = 3
Analistas = Split(nome, "|")
For k = 0 to Ubound(Analistas)
response.Write(Analistas(k) & "<br>")
Next
response.Write("<br><b>Sorteio dos Analistas( ):</b><br><br>")
y = 1
For i = 1 to total
ArrayAnalista = Split(nome, "|")
Randomize()
AnalistaSorteado = Rnd() * UBound(ArrayAnalista)
AnalistaSorteado = CInt(AnalistaSorteado)
Response.Write y & " - " & ArrayAnalista(Cint(AnalistaSorteado)) & "<br>"
If Cint(AnalistaSorteado) = 0 Then
nome = Replace(nome, ArrayAnalista(Cint(AnalistaSorteado)) & "|", "")
Else
nome = Replace(nome, "|" & ArrayAnalista(Cint(AnalistaSorteado)), "")
End If
y = y + 1
Next
%>
Bota alguns 'IFs' que vc consegue o que esta precisando...
abraços!!!
Share this topic:
Page 1 of 1
Similar Topics
| Topic | Forum | Started By | Stats | Last Post Info | |
|---|---|---|---|---|---|
|
Empresa de música digital organiza Wikipedia
IDG Now! - Computação Pessoal |
Notícias |
TiTi Celestino
|
|
|
|
paginação php/mysql
como faço para separar as mensagens |
PHP |
juninhoguitarr
|
|
|
|
Ficar muito tempo na frente da TV e do computador aumenta depressão
|
Notícias |
Notícias
|
|
|
|
Coréia do Norte começa a usar o Twitter
|
Notícias |
Notícias
|
|
|
|
Nova versão do Linux Ubuntu tem computação em nuvem
|
Notícias |
Notícias
|
|
|
|
Ladrões furtam laptop com fotos pessoais de Carla Bruni na França
|
Notícias |
Notícias
|
|
|
|
Botoes para iframe, alguem pode me ajudar
fiz botoes no fireworks e nao sei como inserir iframe |
Fireworks |
heavenboy
|
|
|
|
Comunidades virtuais em russo dão aulas de suicídio
|
Notícias |
Notícias
|
|
Publicidade
|
|

Help













