Mi Troyano [TroLao]

Iniciado por Lao, 22 Septiembre 2007, 13:29 PM

0 Miembros y 2 Visitantes están viendo este tema.

Lao

Estoy haciendo mi troyano, voy bien para mi gusto, aca les dejo una foto, si tienen algunos codes para ayudarme que sean buenos o si son malos tmb , todo sirve.

Cuando lo termine libero el code asi lo ven ustedes y lo usan de ejemplo.
Saludos

Picture

anion

por lo poco que se ve del codigo desde ya te digo que no esta identado.

Lao

Cita de: anion en 22 Septiembre 2007, 13:39 PM
por lo poco que se ve del codigo desde ya te digo que no esta identado.


Identado ? que quisiste decir ? saludos

d(-_-)b

#3
man, esta bien eso de que agas un troyano, pero man, has algo mas util...esta claro que estas empezando...pero ten en cuenta que no hay nada mejor que un file manager, keylogger, process manager, regedit manager, entre otros, etc...

perdon si te estoy criticando, solo lo digo para que te animes a hacer algo realmente novedoso, y el diseño de un troyano es muy importante...en cuanto a ese que tienes, ufff, no me gusta...

te recomiendo que agas el troyano de lo que ballas aprendiendo, no copies codigo ni peges, asi creo que no aprenderas nada...lo importante es eso aprender...eso es lo que vale...

para hacer un troyano, puedes empezar a estudias sobre cliente y servidor etc... y asi construir tu troyano poco a poco...

crear el cliente no es nada dificil, es lo mas facil de un troyano, lo mas dificil y lo mas importante es el servidor, que es el que realizara todas las peticiones que agas con el cliente...aparte de eso el server te tiene que enviar su respuesta, en eso da resultado cuando uno ve la informacion de la pc en un listview, etc..

recuerda que es mada idea hacer troyano con lammeaderas, lo mejor de los troyanos son sus funciones interesantes que nos permite aprovechar la pc remotamente, no nada de eso como, abrir cd, cerrarlos, etc.. cosas asi,

no hay nada mejor que troyanos con toque de profesionalidad...por ejemplo, poison, nuclear rat, Bandook, etc...

bueno espero que algun dia termines tu troyano, y no los de a conocer a todos...

saludos...
Max 400; caracteres restantes: 366

Spider-Net

Cita de: lauchon_ao en 22 Septiembre 2007, 13:52 PM
Cita de: anion en 22 Septiembre 2007, 13:39 PM
por lo poco que se ve del codigo desde ya te digo que no esta identado.


Identado ? que quisiste decir ? saludos

lauchon_ao identar el código quiere decir "estructurar" de alguna manera tu código para hacerlo más comprensible y fácil de editar el día de mañana o bien para entenderlo más fácilmente por otros programadores si liberas tu código, te pongo un ejemplo.

Código sin identar:
Código (vb) [Seleccionar]

If x = 1 Then
MsgBox ("hola",vbInformation)
Else
MsgBox("adios",vbinformarion)
End If

Select Case a

Case 1:
If Text1.Text="hola" Then
MsgBox ("adios", vbinformation)
ElseIf Text1.Text="hasta luego" Then
Msgbox ("hasta luego", vbinformation)
Else
Msgbox ("No saludo", vbinformation)
End If

Case 2:
If Text2.Text = "Buenos días" Then
MsgBox("Buenos días",vbinformation)
ElseIf Text2.Text = "Buenas tardes" Then
MsgBox("Buenas tardes",vbinformation)
Else
MsgBox("Maleducado, salúdame!",vbinformation)
End If
End Select


Código identado:

Código (vb) [Seleccionar]
If x=1 Then
    MsgBox ("hola",vbInformation)
Else
    MsgBox("adios",vbinformarion)
End If

Select Case a

Case 1:

    If Text1.Text="hola" Then
        MsgBox ("adios", vbinformation)
    ElseIf Text1.Text="hasta luego" Then
        Msgbox ("hasta luego", vbinformation)
    Else
        Msgbox ("No saludo", vbinformation)
    End If

Case 2:

    If Text2.Text = "Buenos días" Then
        MsgBox("Buenos días",vbinformation)
    ElseIf Text2.Text = "Buenas tardes" Then
        MsgBox("Buenas tardes",vbinformation)
    Else
        MsgBox("Maleducado, salúdame!",vbinformation)
    End If

End Select


Como puedes ver el código identado es mucho más comprensible y agradable a la hora de leerlo, y te será mucho más fácil encontrar lo que  buscas y editar tu código en un futuro además de facilitar el trabajo si esque haces el código fuente en equipo o lo compartes con más gente. Además es recomendable comentar el código para saber más o menos que hacía cada cosa, dentro de unos meses si vuelves a mirar tu código te lo agradacerás tu mismo ;)

Lao

Cita de: Dominicano en 23 Septiembre 2007, 01:30 AM
man, esta bien eso de que agas un troyano, pero man, has algo mas util...esta claro que estas empezando...pero ten en cuenta que no hay nada mejor que un file manager, keylogger, process manager, regedit manager, entre otros, etc...

perdon si te estoy criticando, solo lo digo para que te animes a hacer algo realmente novedoso, y el diseño de un troyano es muy importante...en cuanto a ese que tienes, ufff, no me gusta...

te recomiendo que agas el troyano de lo que ballas aprendiendo, no copies codigo ni peges, asi creo que no aprenderas nada...lo importante es eso aprender...eso es lo que vale...

para hacer un troyano, puedes empezar a estudias sobre cliente y servidor etc... y asi construir tu troyano poco a poco...

crear el cliente no es nada dificil, es lo mas facil de un troyano, lo mas dificil y lo mas importante es el servidor, que es el que realizara todas las peticiones que agas con el cliente...aparte de eso el server te tiene que enviar su respuesta, en eso da resultado cuando uno ve la informacion de la pc en un listview, etc..

recuerda que es mada idea hacer troyano con lammeaderas, lo mejor de los troyanos son sus funciones interesantes que nos permite aprovechar la pc remotamente, no nada de eso como, abrir cd, cerrarlos, etc.. cosas asi,

no hay nada mejor que troyanos con toque de profesionalidad...por ejemplo, poison, nuclear rat, Bandook, etc...

bueno espero que algun dia termines tu troyano, y no los de a conocer a todos...

saludos...

Gracias por la opinion, no copie codigo por ahora, pienso hacerlo en cosas q no se hacer y aprenderlas osea ver como esta echo, y el servidor tmb esta echo, todo lo que esta en la foto el servidor responde. saludos graacias.

Xerok1!

yo llevo haciendo mi troyano puff...perdi la cuenta  :xD pero poco a poco lo voy aumentando...ahora estoy haciendo el editor de registro remoto,y no hace muxo le mejore las capturas de pantalla y le hice q permtiera skins para que quedara mejor..pero como tampoco tengo mucho tiempo..pos me durara el proyecto años :xD :xD

un saludo,y a mejorar :P :P
[Firma]Esperando haber si acaba el concurso de firmas y la pongo[/Firma]

Lao

Cita de: Xerok1! en 23 Septiembre 2007, 19:04 PM
yo llevo haciendo mi troyano puff...perdi la cuenta  :xD pero poco a poco lo voy aumentando...ahora estoy haciendo el editor de registro remoto,y no hace muxo le mejore las capturas de pantalla y le hice q permtiera skins para que quedara mejor..pero como tampoco tengo mucho tiempo..pos me durara el proyecto años :xD :xD

un saludo,y a mejorar :P :P

Muchas gracias, igual ahora estoy atrasado, instale windows vista y no funka el visual basic 6.0 un bajon !! estoy buscando el .net, suerT

‭lipman

El VB 6 funciona perfectamente en el Vista, allí tengo el Enterprise Edition.

Lao

Cita de: Spider-Net en 23 Septiembre 2007, 02:04 AM
Cita de: lauchon_ao en 22 Septiembre 2007, 13:52 PM
Cita de: anion en 22 Septiembre 2007, 13:39 PM
por lo poco que se ve del codigo desde ya te digo que no esta identado.


Identado ? que quisiste decir ? saludos

lauchon_ao identar el código quiere decir "estructurar" de alguna manera tu código para hacerlo más comprensible y fácil de editar el día de mañana o bien para entenderlo más fácilmente por otros programadores si liberas tu código, te pongo un ejemplo.

Código sin identar:
Código (vb) [Seleccionar]

If x = 1 Then
MsgBox ("hola",vbInformation)
Else
MsgBox("adios",vbinformarion)
End If

Select Case a

Case 1:
If Text1.Text="hola" Then
MsgBox ("adios", vbinformation)
ElseIf Text1.Text="hasta luego" Then
Msgbox ("hasta luego", vbinformation)
Else
Msgbox ("No saludo", vbinformation)
End If

Case 2:
If Text2.Text = "Buenos días" Then
MsgBox("Buenos días",vbinformation)
ElseIf Text2.Text = "Buenas tardes" Then
MsgBox("Buenas tardes",vbinformation)
Else
MsgBox("Maleducado, salúdame!",vbinformation)
End If
End Select


Código identado:

Código (vb) [Seleccionar]
If x=1 Then
    MsgBox ("hola",vbInformation)
Else
    MsgBox("adios",vbinformarion)
End If

Select Case a

Case 1:

    If Text1.Text="hola" Then
        MsgBox ("adios", vbinformation)
    ElseIf Text1.Text="hasta luego" Then
        Msgbox ("hasta luego", vbinformation)
    Else
        Msgbox ("No saludo", vbinformation)
    End If

Case 2:

    If Text2.Text = "Buenos días" Then
        MsgBox("Buenos días",vbinformation)
    ElseIf Text2.Text = "Buenas tardes" Then
        MsgBox("Buenas tardes",vbinformation)
    Else
        MsgBox("Maleducado, salúdame!",vbinformation)
    End If

End Select


Como puedes ver el código identado es mucho más comprensible y agradable a la hora de leerlo, y te será mucho más fácil encontrar lo que  buscas y editar tu código en un futuro además de facilitar el trabajo si esque haces el código fuente en equipo o lo compartes con más gente. Además es recomendable comentar el código para saber más o menos que hacía cada cosa, dentro de unos meses si vuelves a mirar tu código te lo agradacerás tu mismo ;)

Ah si, con el tabulador, antes lo hacia, lo voy a hacer para cuando lo libere, muchas gracias, igual ahora tengo otro problema q no me deja avanzar si te interesa mira el post q hize "Vb y Win vista" . SuerT gracias