PROCURAR POR INDEX

USUARIO.EXCLUIDOS 01/10/2006 23:28:35
#174900
Galera eu to deparando com um problema eu preciso dar varios loads de winsock de acordo com um bando de dados porem estou deparando com um problema eu gostaria que ele procurace antes se ja existe um objeto aberto com aquele Index como eu faria isso galera??

Vlws galera..
USUARIO.EXCLUIDOS 02/10/2006 09:43:30
#174925
Ninguém sabe????
USUARIO.EXCLUIDOS 02/10/2006 10:30:16
#174934
vê se ajuda:

http://www.vbmania.com.br/vbmania/vbmdetail.php?varID=1923

Ok?
USUARIO.EXCLUIDOS 02/10/2006 11:38:19
#174960
Este números estão sendo chamados por ordem numérica? Se não:

WSock = Seu componente
Indice = Indice que vc quer adicionar
Dim s As String
On Error Resume Next
s = WSock(Indice).Name
If s = "" Then
  MsgBox "O indice não existe", vbInformation
  Err.Clear
  Load WSock(Indice)
Else
  MsgBox "O indice já foi logado", vbCritical
End If


Qualquer dúvida poste...flw
USUARIO.EXCLUIDOS 02/10/2006 12:07:49
#174979
Entao MAtioli ele procura num bd o index que ele vai ter que por mais nao necessariamente em ordem pode ser um sckRecebe(1), depois um sckRecebe(9) e tals nao necessariamente em sequencia...

Dai na hora que ele for dar o Load no winsock ele tem que ver se ja existe um winsock com o Indice que ele vai dar load se existir nao pode criar.
USUARIO.EXCLUIDOS 02/10/2006 12:17:32
#174983 Resposta escolhida
Citação:

LUGAID escreveu:
Entao MAtioli ele procura num bd o index que ele vai ter que por mais nao necessariamente em ordem pode ser um sckRecebe(1), depois um sckRecebe(9) e tals nao necessariamente em sequencia...

Dai na hora que ele for dar o Load no winsock ele tem que ver se ja existe um winsock com o Indice que ele vai dar load se existir nao pode criar.



Foi o que imaginei, é só usar a dica que eu dei uai...
Vc testou? Funfo?
USUARIO.EXCLUIDOS 02/10/2006 12:28:05
#174987
funciona sim eu só nao intendi o que ele faz... kkkk
tipo se der um erro é pq nao existe... mais como ele interpreta que nao existe???
USUARIO.EXCLUIDOS 02/10/2006 12:31:47
#174990
Seguinte, a variável S foi declarada com String, portanto com valor = "", então qdo chega nessa linha:

s = WSock(Indice).Name


Se o indice não existir, essa linha apresentará erro, fazendo com que seja passado para a próxima linha, e com isso, a variavel S não terá se valor modificado, sendo assim, uso o if:

If s = "" Then

Pois se ela estiver vazia, é pq a linha onde era pra ela receber o Name do objeto deu erro...No else, é pq pegou o valor que no seu caso seria "sckRecebe"...

Sacou?
Qualquer dúvida poste...flw
USUARIO.EXCLUIDOS 02/10/2006 12:37:17
#174991
Opa blz agora eu entendi sim obrigado, e funcionou perfeitamente como eu queria... vlws velho, vou te pontuar..
Tópico encerrado , respostas não são mais permitidas
Voltar