conexiones multiples con winsock ayuda

Iniciado por Fucko, 20 Marzo 2010, 22:13 PM

0 Miembros y 1 Visitante están viendo este tema.

Fucko

gracias!
eso lo puedo hacer, puedo aceptar las multiples conexiones, y responder a cada uno desde el evento dataarrival, pero el problema es el siguiente:

desde el evento data arrival, el server responde al cliente correcto, o sea, solo responde al cliente que envió la petición o string, pero si quiero hacer, en vez de en el evento data arrival, en un boton, no se como adaptar o que codigo usar, ya que al responder, o bien, el server responde a todos, o solo al primer cliente conectado...
Cree en los que buscan la verdad, duda de los que la han encontrado...

BlackZeroX

#11
es fácil un ejemplo sutil seria este:

Código (vb) [Seleccionar]

sub main()
   msgbox(DataArrival(val(inputbox("Ingresa un Index X entre 0 y 10","","0"))))
end sub

public function DataArrival() as string()
  dim tmpArray() as string,i as integer
  redim tmparray(10)
'   tmparray(0) = "a"
'   tmparray(1) = "aa"
'   tmparray(2) = "aaa"
'   tmparray(3) = "aaaa"
'   tmparray(4) = "aaaaa"
'   tmparray(5) = "aaaaaa"
'   tmparray(6) = "aaaaaaa"
'   tmparray(7) = "aaaaaaaa"
'   tmparray(8) = "aaaaaaaaa"
'   tmparray(9) = "aaaaaaaaaa"
'   tmparray(10) = "aaaaaaaaaaa"
   '    //  Es lo mismo que arriva solo que simplificado
   for i = lbound(tmparray) to ubound(tmparray)
       tmparray=string(i+1,"a")
   next

   DataArrival=tmparray
end function


P.D.: Pega en un modulo y pon el proceso sub main() como inicial igual puedes quitar TODOS los FORMS y meter un modulo simple y pegar este código de esta forma se ejecuta automaticamente.

Dulce Infierno Lunar!¡.
The Dark Shadow is my passion.

Fucko

gracias!
no puedo hacer funcionar lo ultimo...
te paso el code en privado si no es mucha molestia.
para que se entienda bien lo que quiero hacer XD
saludos
Cree en los que buscan la verdad, duda de los que la han encontrado...