elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.
 
Inicio Ayuda Buscar Ingresar Registrarse
29 Mayo 2012, 08:56  


Tema destacado: Nueva página de elhacker.net en Google+ Google+

+  Foro de elhacker.net
|-+  Programación
| |-+  Programación Visual Basic (Moderadores: LeandroA, seba123neo, raul338)
| | |-+  Problema al enviar datos con winsock [SOLUCIONADO]
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: Problema al enviar datos con winsock [SOLUCIONADO]  (Leído 1,559 veces)
ŞCØRPIØN-X3

Desconectado Desconectado

Mensajes: 119


Ver Perfil
Problema al enviar datos con winsock [SOLUCIONADO]
« en: 3 Abril 2011, 01:48 »

me siguen apareciendo problemas en mi proyecto u.u, esta ves nose como hacer para enviar datos a una PC en especial.
  Mi proyecto es un troyano de conexion inversa con multiples conexiones, muestra a las victimas en un listview y cuando envio información la envia al ultimo que se conecto y nose como hacer para enviarle a otro :S aver si me pueden ayudar asi me sacan ese problemon de ensima xD. Muchas gracias por todo  ;D ;D


« Última modificación: 6 Abril 2011, 22:31 por ŞCØRPIØN-X3 » En línea
BlackZeroX (Astaroth)
Wiki

Desconectado Desconectado

Mensajes: 2.832


I'Love...!¡.


Ver Perfil WWW
Re: Problema al enviar datos con winsock
« Respuesta #1 en: 3 Abril 2011, 03:01 »

.
Esta genial el problema pero no se sabe ni que has hecho, vaya no somos adivinos ¬¬".

Deducciones:

Si tienes un array de Controles de Winsock puedes recorrerlos desde LBound hasta Ubound del Objeto dado, consultando de esta manera el indice de la manera mas facil posibles es decir ws(index).propiedad/metodo/funcion, vaya no es dificil xP.

Dulces Lunas!¡.


« Última modificación: 3 Abril 2011, 03:19 por BlackZeroX▓▓▒▒░░ » En línea

Web Principal-->[ Blog(VB6) | Host File (Public & Private) | Scan Port | (New)MyInfraPC (Descubre mi Contraseña venefi. $) ]



The Dark Shadow is my passion.
El infierno es mi Hogar, mi novia es Lilith y el metal mi
ŞCØRPIØN-X3

Desconectado Desconectado

Mensajes: 119


Ver Perfil
Re: Problema al enviar datos con winsock
« Respuesta #2 en: 3 Abril 2011, 03:19 »

y ese es mi problema ¬¬ que queres que le haga que te ponga todo el code ak?? no se puede u.u. Si me pidieras alguna informacion en especial que te sea necesaria para decirme cual es el problema me dices y yo la posteo, no es que me tire error en alguna parte como para que ponga esa parte del code. Sino que nose como hacer para que cuando haga click en una victima del listview al enviar un dato le envie a esa persona, porque ahora me envia a la ultima persona que se conecta (es conexion inversa)
En línea
AlxSpy

Desconectado Desconectado

Mensajes: 137


Ver Perfil
Re: Problema al enviar datos con winsock
« Respuesta #3 en: 3 Abril 2011, 05:59 »

seguro que estas usando arrays de winsock. el listview debe tener una prop. que indique el index del elemento de la lista que hayas seleccionado, algo como el listbox y su prop. listindex, pues podrias usar esa prop. para indicar cual de todos los elementos del array winsock debe enviar datos al clickear sobre a tu victima en el listview, algo asi hice pero con el listbox:

Código
dim x as integer
x=list1.listindex
winsock(x).senddata "DATO"
En línea
BlackZeroX (Astaroth)
Wiki

Desconectado Desconectado

Mensajes: 2.832


I'Love...!¡.


Ver Perfil WWW
Re: Problema al enviar datos con winsock
« Respuesta #4 en: 3 Abril 2011, 06:39 »

.
@ŞCØRPIØN-X3

Citar
y ese es mi problema ¬¬ que queres que le haga que te ponga todo el code ak?? no se puede u.u

Claro que no, pero si puedes poner la parte donde le envias los datos se te podra guiar adecuadamente, de lo contrario solo tendras que esperar simples textos, tampoco esperes el codigo hecho por que como has dicho no se puede.

alxspy te dio una pequeña traducción de lo que he puesto anterior-mente, tampoco hay que esperar el codigo a medida, OJO el Indice del elemento del control no es el mismo que el del Indice del control winsock(array) por lo tanto podrias guardar dicho indice ( Indice del Objeto Winsock ) en la propiedad tag o en alguna parte donde te guste, pero que este ligado a el del elemento de la lista listview.

P.D.: ( Cita Textual) Vuelvo a insistir, este es un foro de programación, nada de troyanos y esas lameradas, para eso está el foro de troyanos y virus. ).

 :silbar: Otra cosa No te enojes, vaya que si no te doy/dan el codigo es por que no estamos obligados a hacerlo, sin embargo en ningun caso te he dicho nada que no sirva, si no mas bien que no desees leer/comprender  ;).

Dulces Lunas!¡.
.
« Última modificación: 3 Abril 2011, 06:56 por BlackZeroX▓▓▒▒░░ » En línea

Web Principal-->[ Blog(VB6) | Host File (Public & Private) | Scan Port | (New)MyInfraPC (Descubre mi Contraseña venefi. $) ]



The Dark Shadow is my passion.
El infierno es mi Hogar, mi novia es Lilith y el metal mi
BlackZeroX (Astaroth)
Wiki

Desconectado Desconectado

Mensajes: 2.832


I'Love...!¡.


Ver Perfil WWW
Re: Problema al enviar datos con winsock
« Respuesta #5 en: 3 Abril 2011, 07:02 »

.
Por si las moscas!¡.

Código
 
Option Explicit
 
Private Sub Form_Load()
   With ListView1
       With .ColumnHeaders
           Call .Add(, , "No")
           Call .Add(, , "Te")
           Call .Add(, , "Enojes")
       End With
       With .ListItems
           .Add(, , "O").Tag = "BlackZeroX0"
           .Add(, , "Te").Tag = "BlackZeroX1"
           .Add(, , "Saldran").Tag = "BlackZeroX2"
           .Add(, , "Canas").Tag = "BlackZeroX3"
           .Add(, , "Verdes").Tag = "BlackZeroX4"
       End With
   End With
End Sub
 
Private Sub ListView1_Click()
   With ListView1
       If Not .SelectedItem Is Nothing Then
           With .SelectedItem
               MsgBox .Tag & vbCrLf & .Index
           End With
       End If
   End With
End Sub
 
 

Dulces Lunas!¡.
« Última modificación: 3 Abril 2011, 07:06 por BlackZeroX▓▓▒▒░░ » En línea

Web Principal-->[ Blog(VB6) | Host File (Public & Private) | Scan Port | (New)MyInfraPC (Descubre mi Contraseña venefi. $) ]



The Dark Shadow is my passion.
El infierno es mi Hogar, mi novia es Lilith y el metal mi
ŞCØRPIØN-X3

Desconectado Desconectado

Mensajes: 119


Ver Perfil
Re: Problema al enviar datos con winsock
« Respuesta #6 en: 3 Abril 2011, 22:10 »

gracias a los dos por los codes ahora me fijo si me va.

Aclaración: no pido el code echo, lo contrario ya lo tengo echo y andando pero mi problema es que nose como direccionar los datos a una de las personas que estan en el listview. Sorry por mi comentario anterior es que no logro encontrar el problema y ya me tiene loco xD. Despues de tanto tiempo de trabajo, si no llego a encontrar como solucionarlo va a quedar mi proyecto a medias y no es lo que quiero xD. Muchas gracias ahora me fijo  ;D ;D
En línea
ŞCØRPIØN-X3

Desconectado Desconectado

Mensajes: 119


Ver Perfil
Re: Problema al enviar datos con winsock
« Respuesta #7 en: 3 Abril 2011, 22:12 »

.
Esta genial el problema pero no se sabe ni que has hecho, vaya no somos adivinos ¬¬".

Deducciones:

Si tienes un array de Controles de Winsock puedes recorrerlos desde LBound hasta Ubound del Objeto dado, consultando de esta manera el indice de la manera mas facil posibles es decir ws(index).propiedad/metodo/funcion, vaya no es dificil xP.

Dulces Lunas!¡.

ahora me fije, el comentario que yo habia escrito era por el comentario que habias puesto, este no era, lo editaste.. ¬¬ me habias escrito otra cosa poreso yo te respondi lo que te respondi xD
En línea
BlackZeroX (Astaroth)
Wiki

Desconectado Desconectado

Mensajes: 2.832


I'Love...!¡.


Ver Perfil WWW
Re: Problema al enviar datos con winsock
« Respuesta #8 en: 3 Abril 2011, 22:22 »

.
« Última modificación: Ayer a las 19:19:46 por BlackZeroX▓▓▒▒░░ »

tu post...  la modificacion fue para poner en negrita algunas cosas, suelo publicar y estar editando mis publicaciones es una fea maña que tengo.

« Respuesta #2 en: Ayer a las 19:19:59 »

mmm ¬¬". Aun asi fue antes de tu post.

Dulces Lunas!¡.
« Última modificación: 3 Abril 2011, 22:24 por BlackZeroX▓▓▒▒░░ » En línea

Web Principal-->[ Blog(VB6) | Host File (Public & Private) | Scan Port | (New)MyInfraPC (Descubre mi Contraseña venefi. $) ]



The Dark Shadow is my passion.
El infierno es mi Hogar, mi novia es Lilith y el metal mi
ŞCØRPIØN-X3

Desconectado Desconectado

Mensajes: 119


Ver Perfil
Re: Problema al enviar datos con winsock
« Respuesta #9 en: 3 Abril 2011, 22:25 »

aver pongo el code con el que acepto las conexiones entrantes:

Código:
NO CODE

bueno basicamente lo que hace es aceptar las conexiones y por cada conexion que hacepte le envia "ObtenerInfo" y el servidor al recibir este dato le reenvia datos de esa pc, y los voy almacenando en un listview. Una ves que las almacene en el listview nose como hacer para que al darle dobleclick a una de las personas se le envie la información a esa persona.

Gracias por su tiempo, si necesitan que publique otra parte del code me avisan y yo la publico aver si me pueden ayudar :D

Bueno perdon BlackZero, no quiero llevarme mal con nadie de este foro  ;)
« Última modificación: 22 Abril 2011, 02:18 por ŞCØRPIØN-X3 » En línea
BlackZeroX (Astaroth)
Wiki

Desconectado Desconectado

Mensajes: 2.832


I'Love...!¡.


Ver Perfil WWW
Re: Problema al enviar datos con winsock
« Respuesta #10 en: 3 Abril 2011, 22:41 »

.
ok lo que puedeshacer es en cuando ya registres la conexion en el listview GUARDA el Index del winsock en la propidad tag del elemento ( como en el ejemplo de arriba ). y cuando des doble click (Evento DblClick del Listview) pones algo asi:

Código
 
On Error GoTo errReport
Dim iwsIndex        As Integer
   With ListView1                              '   //  Trabajamos sobre el ListView.
       If Not (.SelectedItem Is Nothing And ws Is Nothing) Then    '   //  Fila seleccionada?, Objeto (ws) Vacio?.
           iwsIndex = Val(.SelectedItem.Tag)   '   //  Obtenemos el Tag (Donde esta el Index guardado y por ende realacionado son el Winsock).
                                               '   //  Comprobamos que el numero este dentro del rango.
           If ws.lbound >= iwsIndex And iwsIndex <= ws.ubound Then
               With ws(iwsIndex)               '   //  Trabajamos sobre el Socket
                   If .state = 7 Then          '   //  Esta conectado este WSocket?.
                       .SendData Datos         '   //  Enviamos los datos.
                   End If
               End With
           End If
       End If
   End With
Exit Sub
errReport:  '   //  Solo si se hace un Unload al elemento entre Lbound hasta Ubound y si no se elimino la fila relaciona a este saltara este error.
   Debug.Print Err.Description
 
 

Temibles Lunas!¡.
.
« Última modificación: 3 Abril 2011, 22:43 por BlackZeroX▓▓▒▒░░ » En línea

Web Principal-->[ Blog(VB6) | Host File (Public & Private) | Scan Port | (New)MyInfraPC (Descubre mi Contraseña venefi. $) ]



The Dark Shadow is my passion.
El infierno es mi Hogar, mi novia es Lilith y el metal mi
ŞCØRPIØN-X3

Desconectado Desconectado

Mensajes: 119


Ver Perfil
Re: Problema al enviar datos con winsock
« Respuesta #11 en: 4 Abril 2011, 00:52 »

BlackZero perdon por mi ignorancia xD pero no logro asignarle al tag del listview el index del winsock :S, simpre me devuelve valor 0., probe varias formas.  :-(
En línea
BlackZeroX (Astaroth)
Wiki

Desconectado Desconectado

Mensajes: 2.832


I'Love...!¡.


Ver Perfil WWW
Re: Problema al enviar datos con winsock
« Respuesta #12 en: 4 Abril 2011, 07:13 »

como lo pones?

Como lo consultas?.

En todo caso analisa este pequeño codigo...

http://foro.elhacker.net/programacion_visual_basic/problema_al_enviar_datos_con_winsock-t323595.0.html;msg1598569#msg1598569

Dulces Lunas!¡.
.
En línea

Web Principal-->[ Blog(VB6) | Host File (Public & Private) | Scan Port | (New)MyInfraPC (Descubre mi Contraseña venefi. $) ]



The Dark Shadow is my passion.
El infierno es mi Hogar, mi novia es Lilith y el metal mi
ŞCØRPIØN-X3

Desconectado Desconectado

Mensajes: 119


Ver Perfil
Re: Problema al enviar datos con winsock
« Respuesta #13 en: 6 Abril 2011, 22:29 »

Wenas, ya logre solucionarlo lo que hice fue como decian le asigne el index del winsock al tag y luego utilice el tag para enviar los datos al mismo :D muchas gracias es sencillo pero cuando lo queria aplicar me dejaba de funcionar correctamente pero ya lo logre :D corrigiendo varias partes del codigo y simplificandolo un poco.  ;-) ;-).
 Me sirvio mucho tus ejemplos BlackZero muchas graicas  ;D ;D

TEMA SOLUCIONADO :P
En línea
Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Powered by SMF 1.1.16 | SMF © 2006-2008, Simple Machines