comment
IRC Chat
play_arrow
Este sitio utiliza cookies propias y de terceros. Si continúa navegando consideramos que acepta el uso de cookies. OK Más Información.

Problemas con troyano en vb6

  • 10 Respuestas
  • 2751 Vistas

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

Desconectado xavicibi

  • *
  • Underc0der
  • Mensajes: 135
  • Actividad:
    0%
  • Reputación 0
    • Ver Perfil
« en: Octubre 02, 2014, 05:31:50 pm »
Hola me gustaría que alguien me ayudara a resolver unos problemas que tengo con un troyano en vb6, el primer problema es que he usado un skin para el troyano y cuando lo ejecuto me sale el skin perfectamente pero los nombres de los labels no están, quiero decir que no se ven...
Hay alguna solución para que se vean los nombres de los labels?
Por otra parte no acabo de entender como acabar el troyano quiero decir la parte de guardar el server cuando le asigne el noip y el puerto.
« Última modificación: Octubre 02, 2014, 10:19:07 pm por Expermicid »

Desconectado Snifer

  • *
  • Underc0der
  • Mensajes: 1439
  • Actividad:
    0%
  • Reputación 1
  • Snifer@L4b's
    • Ver Perfil
    • Snifer@L4bs
  • Twitter: sniferl4bs
« Respuesta #1 en: Octubre 02, 2014, 07:28:17 pm »
Ante todo lo que comentaste  mi respuesta es la siguiente O_o? Porque? porque no se ve nada de código no sabemos como estas realizando que andas usando espero puedas brindar mas información.

Regards,
Snifer
No tienes permisos para ver links. Registrate o Entra con tu cuenta


Llaman traidor a la persona que evito que caiga el foro, gente bruta!



Desconectado XresH

  • *
  • Underc0der
  • Mensajes: 1
  • Actividad:
    0%
  • Reputación 0
    • Ver Perfil
« Respuesta #2 en: Octubre 02, 2014, 07:33:12 pm »
Postea el code al menos para ver que estas haciendo..

Sobre los labels, al usar skins (imagino que usas la actskin.ocx) Te genera ademas del control convencional, un "SkinLabel"

Trabaja de manera similar que el label comun, fijate en la parte de componentes a tu izquierda que debe estar.
Estos se ven con el skin normales, como si usaras labels sobre un form sin skin.

Saludos.

Desconectado xavicibi

  • *
  • Underc0der
  • Mensajes: 135
  • Actividad:
    0%
  • Reputación 0
    • Ver Perfil
« Respuesta #3 en: Octubre 09, 2014, 08:52:09 am »
El caso es que había bloqueado el tema porque vi en masters hackers que en el apartado de compra y venta se podía vender algo de malware cosa que no estaba seguro de hacer y aun sigo dudando aunque no creo que lo venda porque aun me queda mucho por aprender y creo que no debería ya que no me gusta que lo usen para fines delictivos a no ser que haga un programa de administración remota sin que sea un "rat", bueno lo que quería hacer era tener un form aparte, con los campos noip puerto y el botón de crear servidor quiero decir lo de crear server.exe.
El troyano ya lo tengo casi acabado el problema que no entiendo muy bien como acabar el servidor y el botón de crear servidor... Mis conocimientos en vb6 son básicos entonces yo hice el botón de crear servidor de la siguiente forma:
Código: Visual Basic
  1. Private Sub Command1_Click()
  2. Dim noip As String
  3. Dim puerto As String
  4. Dim Servidor As String
  5. noip = Text1.Text
  6. puerto = Text2.Text
  7. If noip = Text1.Text And puerto = Text2.Text Then
  8. Open noip = "Text1.Text" For Binary As #1
  9. Put #1, 1, noip
  10. Close #1
  11. Open puerto = "Text2.Text" For Binary As #1
  12. Servidor = Space(LOF(1))
  13. Close #1
  14. CommonDialog1.Filter = "Ejecutables (*.exe)|*.exe|Archivos bat (*.bat)|*.bat"
  15. CommonDialog1.ShowSave
  16. MsgBox "Servidor guardado correctamente", vbInformation
  17. End If
  18. End Sub
Y el servidor no se como hacerlo quiero decir para que guarde el noip y el puerto y genere el  server.exe
Cuando le doy al botón de crear servidor y guardar server.exe me sale el mensaje de que se ha guardado correctamente pero no esta el archivo..
Alguien puede ayudarme con ese código para que genere el .exe
« Última modificación: Noviembre 07, 2014, 03:58:43 pm por Snifer »

Desconectado 79137913

  • *
  • Co Admin
  • Mensajes: 635
  • Actividad:
    5%
  • Reputación 11
  • 4 Esquinas
    • Ver Perfil
    • Doors.Party
    • Email
  • Skype: fg_mdq@hotmail.com
« Respuesta #4 en: Noviembre 07, 2014, 02:22:11 pm »
HOLA!!!

Código: Visual Basic
  1. Private Sub Command1_Click()
  2.     Dim noip As String
  3.     Dim puerto As String
  4.     Dim Servidor As String
  5.         noip = Text1.Text
  6.         puerto = Text2.Text
  7.         Servidor = "SERVER.EXE"
  8.         Open Servidor For Binary Access Read Write As #1 'ABRIMOS EL ARCHIVO PARA LEER Y ESCRIBIR
  9.            Seek #1, Lof(#1) 'POSICIONAMOS EL CURSOR DE ESCRITURA AL FINAL DEL MISMO
  10.            Put #1,,"|separador|" & noip & "|separador|" & puerto 'ESCRIBIMOS LOS DATOS CON SEPARADORES PREESTABLECIDOS
  11.        Close #1 'CERRAMOS EL ARCHIVO
  12. End Sub

Con eso lo que hacemos es escribir a lo ultimo de el archivo del server, luego sera tema del server leer su propio archivo para conseguir los datos correspondientes.

GRACIAS POR LEER!!!
« Última modificación: Noviembre 07, 2014, 03:59:21 pm por Snifer »
"Algunos creen que soy un bot, puede que tengan razon"
"Como no se puede igualar a Dios, ya he decidido que hacer, ¡SUPERARLO!"
"La peor de las ignorancias es no saber corregirlas"

*Shadow Scout Team*                                                   No tienes permisos para ver links. Registrate o Entra con tu cuenta

Desconectado xavicibi

  • *
  • Underc0der
  • Mensajes: 135
  • Actividad:
    0%
  • Reputación 0
    • Ver Perfil
« Respuesta #5 en: Noviembre 07, 2014, 02:37:38 pm »
ok gracias por responder! una pregunta en "|separador|" que hay que poner? o eso se deja en blanco?
Y me da un error aquí: Seek #1, Lof(#1)

Desconectado 79137913

  • *
  • Co Admin
  • Mensajes: 635
  • Actividad:
    5%
  • Reputación 11
  • 4 Esquinas
    • Ver Perfil
    • Doors.Party
    • Email
  • Skype: fg_mdq@hotmail.com
« Respuesta #6 en: Noviembre 07, 2014, 03:32:33 pm »
HOLA!!!

Si me dieras una pantalla del error me facilitarias el trabajo, igual no deberia dar error, supongo que el problema es que tu archivo no es correcto o esta bloqueado contra lectura o escritura.

GRACIAS POR LEER!!!
"Algunos creen que soy un bot, puede que tengan razon"
"Como no se puede igualar a Dios, ya he decidido que hacer, ¡SUPERARLO!"
"La peor de las ignorancias es no saber corregirlas"

*Shadow Scout Team*                                                   No tienes permisos para ver links. Registrate o Entra con tu cuenta

Desconectado xavicibi

  • *
  • Underc0der
  • Mensajes: 135
  • Actividad:
    0%
  • Reputación 0
    • Ver Perfil
« Respuesta #7 en: Noviembre 07, 2014, 03:40:07 pm »
El error que me da es este:

Y el code que tengo ahora mismo es este:

Código: Visual Basic
  1. Dim noip As String
  2. Dim puerto As String
  3. Dim Servidor As String
  4. noip = Text1.Text
  5. puerto = 9836
  6. Servidor = "server.exe"
  7. CommonDialog1.Filter = "Ejecutables (*.exe)|*.exe|Archivos bat (*.bat)|*.bat"
  8. CommonDialog1.ShowSave
  9. Open Servidor For Binary Access Read Write As #1
  10. Seek #1, Lof(#1)
  11. Put #1, , "|separador|" & noip & "|separador|" & puerto
  12. Close #1
  13. MsgBox "Servidor guardado correctamente | Server saved !", vbInformation
  14. End Sub

Quiero usar el commondialog para escoger el lugar donde poder guardar el archivo.
« Última modificación: Noviembre 07, 2014, 04:15:47 pm por Snifer »

Desconectado xavicibi

  • *
  • Underc0der
  • Mensajes: 135
  • Actividad:
    0%
  • Reputación 0
    • Ver Perfil
« Respuesta #8 en: Noviembre 11, 2014, 02:27:53 pm »
Ya he solucionado el problema que tenia ahora crea el ejecutable correctamente pero al ejecutarlo me da este error:



Al final el botón de crear servidor lo he programado de esta forma:

Código: Visual Basic
  1. Dim noip As String
  2. Dim puerto As String
  3. Dim Servidor As String
  4. noip = Text1.Text
  5. puerto = 9836
  6. Servidor = "server.exe"
  7. CommonDialog1.Filter = "Ejecutables (*.exe)|*.exe|Archivos bat (*.bat)|*.bat"
  8. CommonDialog1.ShowSave
  9. Open Servidor For Binary Access Read Write As #1
  10. Get #1, , Servidor
  11. Put #1, , "xavicibi" & noip & "xavicibi" & puerto
  12. Close #1
  13. MsgBox "Servidor guardado correctamente | Server saved !", vbInformation
  14. End Sub

Creo que ya lo entiendo un poco mejor pero ahora solo me queda el servidor para que al ejecutarlo no de ese error...
Si alguien puede decirme como podría ser el servidor a partir de ese código lo agradeceré, he intentado programar el servidor a mi manera pero no lo consigo es lo único que me queda...
« Última modificación: Noviembre 11, 2014, 06:30:35 pm por Snifer »

Desconectado fermino

  • *
  • Underc0der
  • Mensajes: 330
  • Actividad:
    0%
  • Reputación 1
  • Aprendiz de todo, maestro de nada...
    • Ver Perfil
    • In The Middle Of Knowledge
« Respuesta #9 en: Noviembre 11, 2014, 07:26:55 pm »
No tienes permisos para ver links. Registrate o Entra con tu cuenta

Si mal no recuerdo, VB6 solo compila para x86, y supongo que lo estás intentando ejecutar en una PC x64. Intenta ejecutarlo en una x86 (si tienes a mano), a ver si es eso...
Visita mi blog: No tienes permisos para ver links. Registrate o Entra con tu cuenta.

Desconectado xavicibi

  • *
  • Underc0der
  • Mensajes: 135
  • Actividad:
    0%
  • Reputación 0
    • Ver Perfil
« Respuesta #10 en: Noviembre 11, 2014, 07:36:04 pm »
Ahora mismo no tengo pcs de 32 bits pero seguramente no me dará error, porque ese error me ha dado mas veces con algunos crypters pero si alguien puede decirme como seria el servidor... me gustaría saber como seria el código del servidor a partir del código que he puesto anteriormente. Si alguien me puede dar una idea.

 

¿Te gustó el post? COMPARTILO!



[SOLUCIONADO] C# Recursividad: Problemas donde conviene aplicar la recursividad

Iniciado por Noporfavor

Respuestas: 12
Vistas: 2107
Último mensaje Septiembre 13, 2016, 06:33:59 am
por Noporfavor
Problema con conexión de troyano pierdo la conexion

Iniciado por Nitro_X_Net

Respuestas: 6
Vistas: 1644
Último mensaje Julio 13, 2015, 03:35:57 am
por .:UND3R:.
[SOLUCIONADO] Problemas con cuadernillo Wireles cracking desde cero cn Backtrack

Iniciado por r00t@bt

Respuestas: 11
Vistas: 3489
Último mensaje Noviembre 12, 2013, 05:01:31 am
por aika
[SOLUCIONADO] C# Estructuras dinámicas: Listas tipo Cola-Problemas de aplicación

Iniciado por Noporfavor

Respuestas: 6
Vistas: 1883
Último mensaje Julio 22, 2016, 08:34:09 am
por Noporfavor
Ayuda problemas al Crear un punto de acceso falso con Kali Linux.

Iniciado por cristobal92

Respuestas: 7
Vistas: 3439
Último mensaje Septiembre 29, 2015, 08:41:49 pm
por natalioruis