Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: TheGhost(Z) en 14 Septiembre 2009, 14:04 pm



Título: Enviar tabla por Winsock
Publicado por: TheGhost(Z) en 14 Septiembre 2009, 14:04 pm
Hola, amigos.

Tengo un tabla clientes. lo que deseo es enviar todo el contenido al cliente. alguna manera de enviar todo en un bloque?

Lo que he intentado es hacer un For a la tabla y enviar de uno en uno, pero mucho codigo y ademas como que puede fallar, por ejemplo si envio 200 filas.


Laguna sugenrencia de como hacerlo....

Gracias,


Título: Re: Enviar tabla por Winsock
Publicado por: BlackZeroX en 14 Septiembre 2009, 18:11 pm
Una alternativa seria:

con un Arreglo (Array)

Código
  1. Dim str as string
  2. str = Join(arreglo, Chr(255))
  3. winsock.send str, vbString
  4.  
  5.  

De una tabla a un arreglo bidimencional (lo use en seudocodigo y basic):

Código:
Dim str() as string
Redim str(NumeroColumnas-1,NumeroFilas-1)
Desde X = 0 hasta NumeroColumnas-1
    Desde Y = 0 hasta NumeroFilas-1
        str(x,y) = TextoCelda en coordenada x,y
    fin desde Y
    'Aquì podrias enviarias ya el arreglo Str()
fin desde X
    ' O Aquì enviarlo de forma completael arreglo Str()

Dulces Lunas


Título: Re: Enviar tabla por Winsock
Publicado por: TheGhost(Z) en 14 Septiembre 2009, 18:45 pm
Lo que me sugieres es volcar toda la tabla a un arreglo. Y luego voy enviandolo registro por registro o se puede enviar todo el arreglo y ya cuando este en el cliente lo voy extrayendo uno por uno...



Título: Re: Enviar tabla por Winsock
Publicado por: TheGhost(Z) en 16 Septiembre 2009, 14:53 pm
Holas, una idea de hacerlo porfa....