Código de Visual Basic - Codigo de virus Redlof

Versión 1
estrellaestrellaestrellaestrellaestrella(6)

Publicado el 12 de Enero del 2004gráfica de visualizaciones de la versión: Versión 1
22.348 visualizaciones desde el 12 de Enero del 2004
estrellaestrellaestrellaestrellaestrella
estrellaestrellaestrellaestrella
estrellaestrellaestrella
estrellaestrella
estrella

Si alguno de los archivos de descarga no funciona, comentanos aquí el error.




Comentarios sobre la versión: Versión 1 (6)

12 de Enero del 2004
estrellaestrellaestrellaestrellaestrella
Hola a todos, espero que les sirva este código.

En realidad, no tengo mucho mérito pues lo que simplemente hice, fue trasladar las rutinas de encriptación que viene en los archivos folder.htt que se crean por doquier y los coloco en una función dentro de un modulo de vb.

De todas maneras, al menos la curiosidad me sirvio para descubir que hace y que no hace ese virus que a mi parecer, pudo ser mucho más dañino.
Responder
13 de Enero del 2004
estrellaestrellaestrellaestrellaestrella
No es para que lo tomes para mal pero para abrir un archivo es mas simple usar una estructura, ademas puedes analizar las cadenas con las funciones left, mid, right, instr y demas:

Sub Abrir_archivo(numero as byte, archvo as string)
dim fragmento as string *32768 ' equivale a 2^15 (32kb)
Numero=1
Open archivo For Binary as Numero
While Not Eof (Numero)
Get Numero ,fragmento
Txt_Archivo=Txt_Archivo & fragmento
Doevents ' hace que no se cuelgue el sistema
Wend
Close Numero
End sub
Responder
18 de Enero del 2004
estrellaestrellaestrellaestrellaestrella
Ja ja ja ja, tienes razón, no es que yo no sepa como cargar un archivo
sino que tambien quise mostrar que ese tipo de procesos (esos caracteres puestos en varias cadenas si se pueden contemplar)

Es mas, hasta se pueden ver varias cadenas de texto, que nisiquiera tienen nombre bien definido.

Pero es un programa que lo hice para mostrar algunas cosas, y no
para dar una clase de programación, eso corre por cuenta de cada uno
si quieres ver sobre estructuras y clases, hay otros programas que he publicado, que cumplen con esos requisitos

pd: NO SEAN OCIOSOS PUES; HAGAN ALGO TAMBIEN...
Responder
19 de Septiembre del 2004
estrellaestrellaestrellaestrellaestrella
esto es una truchada.....dejate de romper las pelotas, se re nota que esto lo encriptaste vos, y para el colmo le sumaste 1 a cada caracter en el codigo exceptuando los codigos de CrLf y la comilla...

miren esta farsa...

For I = 1 To Len(ScriptCode)

VA0 = Asc(Mid(ScriptCode, I, 1))
If VA0 = 18 Then
VA2 = Chr(34) ' todos los asc(18) se convierten en comillas
ElseIf VA0 = 28 Then
VA2 = Chr(10) ' los 28 se convierten en alimentador de carro asc(10)
ElseIf VA0 = 29 Then
VA2 = Chr(13) ' y los 29 en enter
Else
VA2 = Chr(VA0 + 1) ' al resto le suma uno...ejemplo "la 'a' es la 'b' "
End If

ScriptText = ScriptText & VA2

Next

las compañias invierten millones en desencriptar y vos lo sacas asi de una
Responder
14 de Junio del 2005
estrellaestrellaestrellaestrellaestrella
No lo he visto pero como es el único código de virus que hay le voy a dar el visto bueno. ...
Responder
28 de Julio del 2006
estrellaestrellaestrellaestrellaestrella
hagan un poco ustedes??? a este tipo de gente que envia descubrimientos truchos se los llaman caraduras, atorrantes, chantas, sin verguenzas, etc...
Responder

Comentar la versión: Versión 1

Nombre
Correo (no se visualiza en la web)
Valoración
Comentarios...
CerrarCerrar
CerrarCerrar
Cerrar

Tienes que ser un usuario registrado para poder insertar imágenes, archivos y/o videos.

Puedes registrarte o validarte desde aquí.

Codigo
Negrita
Subrayado
Tachado
Cursiva
Insertar enlace
Imagen externa
Emoticon
Tabular
Centrar
Titulo
Linea
Disminuir
Aumentar
Vista preliminar
sonreir
dientes
lengua
guiño
enfadado
confundido
llorar
avergonzado
sorprendido
triste
sol
estrella
jarra
camara
taza de cafe
email
beso
bombilla
amor
mal
bien
Es necesario revisar y aceptar las políticas de privacidad

http://lwp-l.com/s945