Bien, ya tengo el código reformado con los consejos de PABLOMI.
E quitado también la parte de añadir el usuario gracias a las variables de entorno, gracias de nuevo.
color 0d
echo -----Ordena Escritorios-----
echo Este programa ordenara los archivos
echo sueltos que tengas en el escritorio
:empezemos
echo Copiando archivos texto
for %%a in ("txt","doc","dic","wtx"
) do (
xcopy /i /q "%userprofile%\escritorio\*.%%~a" "%userprofile%\%usuario%\escritorio\archivos_de_texto"
del /q "
%userprofile%\escritorio\*.
%%~a"
)
echo Copiando archivos pdf
xcopy /i /q "%userprofile%\escritorio\*.%%~a" "%userprofile%\%usuario%\escritorio\archivos_pdf"
del /q "
%userprofile%\escritorio\*.
%%~a"
)
echo Copiando archivos de imagen
for %%a in ("jpg","bmp","png","gif","gih","gbr","jpe","psd","tga","tif","tiff","xcf"
) do (
xcopy /i /q "%userprofile%\escritorio\*.%%~a" "%userprofile%\%usuario%\escritorio\archivos_imagen"
del /q "
%userprofile%\escritorio\*.
%%~a"
)
echo Copiando archivos sonido
for %%a in ("aif","aifc","aiff","amf","asf","au","audiocd","cda","far","it","itz","lwv","midi","miz","mp1","mp3","mtm","ogg","ogm","okt","ra","rm","snd","au","stm","stz","ult","voc","wav",
) do (
xcopy /i /q "%userprofile%\escritorio\*.%%~a" "%userprofile%\%usuario%\escritorio\archivos_audio"
del /q "
%userprofile%\escritorio\*.
%%~a"
)
echo Copiando archivos iso
xcopy /i /q "%userprofile%\escritorio\*.%%~a" "%userprofile%\%usuario%\escritorio\archivos_iso"
del /q "
%userprofile%\escritorio\*.
%%~a"
)
echo Copiando archivos de video
for %%a in ("avi","mpg","mpeg","wmv","mov","asf","divx","mp4","div","dvd","ivf","miv","mov","movie","mpa","mpe","mpv2","qt","qtl","wm","wav"
) do (
xcopy /i /q "%userprofile%\escritorio\*.%%~a" "%userprofile%\%usuario%\escritorio\archivos_video"
del /q "
%userprofile%\escritorio\*.
%%~a"
)
echo Copiando archivos comprimidos
for %%a in ("rar","tar","zip"
) do (
xcopy /i /q "%userprofile%\escritorio\*.%%~a" "%userprofile%\%usuario%\escritorio\archivos_comprimido"
del /q "
%userprofile%\escritorio\*.
%%~a"
)
echo Copiando archivos html
xcopy /i /q "%userprofile%\escritorio\*.%%~a" "%userprofile%\%usuario%\escritorio\archivos_html"
del /q "
%userprofile%\escritorio\*.
%%~a"
)
:salir
cls
echo Gracias por usar el programa Ordena Escritorios
echo (((((((((((((((((((((((((((((((((((((((((((
echo (( (( Mascando arrob
@s
((
echo (( xxxxxxxxxxx
((((((((((((((((((((((
echo (((((((((((((((((((((((