elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.


Tema destacado: Entrar al Canal Oficial Telegram de elhacker.net


+  Foro de elhacker.net
|-+  Programación
| |-+  Scripting
| | |-+  [Batch] mi primer aporte: Ordenar escritorios		0 Usuarios y 2 Visitantes están viendo este tema.
Páginas: [1] 2 3 Ir Abajo Respuesta Imprimir
Autor Tema: [Batch] mi primer aporte: Ordenar escritorios  (Leído 13,978 veces)
moikano→@


Desconectado Desconectado

Mensajes: 572


Cultiva tu mente y cuerpo, son tu única propiedad


Ver Perfil WWW
[Batch] mi primer aporte: Ordenar escritorios
« en: 26 Octubre 2010, 15:19 pm »
Pues bien, ya e echo algunas consultas en este foro y sus consejos me han sido útiles. Así que para agradecerles esas ayudas os dejo este código (el mas largo que e echo) que ordena los archivos de un escritorio.
Es un código muy sencillo, ni siquiera utilizó bucles ni nada por el estilo.
El script busca archivos con una extensión que luego utilizara para crear una carpeta igual con el nombre de la extensión y lo guardara todo ahí dentro.
Por supuesto es muy mejorable, si tienes aportaciones no dudes, postea!
Código
  1. @ echo off
  2. title Ordena Escritorios
  3. color 0d
  4. echo                       -----Ordena Escritorios-----
  6. echo                   Este programa ordenara los archivos 
  7. echo                   sueltos que tengas en el escritorio
  9. echo                            Empezamos? (s/n)
  11. set /p res=
  12. if %res%==s goto :empezemos
  13. if %res%==n goto :salir
  14.  
  15. :empezemos
  16. cls
  17. echo                     Pon el nombre de tu usuario
  19. echo                            Sabes cual es? 
  20. echo     (si no sabes te mostrara la lista de usuarios el propio programa)
  21. echo                                (s/n)
  22. set /p usu=
  23. if %usu%==s goto :1usu
  24. if %usu%==n goto :2usu
  25.  
  26. :2usu
  27. cls
  28. net user
  30. echo                            ya lo tienes?
  32. echo                            continuemos...
  33.  
  34. :1usu
  35. cls
  36. echo                     Pon el nombre de tu usuario
  37. set /p usuario=
  38.  
  41. echo                                                 Copiando archivos texto
  44. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.txt" "c:\documents and settings\%usuario%\escritorio\archivos de texto"
  45. del /q "c:\documents and settings\%usuario%\escritorio\*.txt"
  46.  
  47. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.doc" "c:\documents and settings\%usuario%\escritorio\archivos de texto"
  48. del /q "c:\documents and settings\%usuario%\escritorio\*.doc"
  49.  
  50. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.dic" "c:\documents and settings\%usuario%\escritorio\archivos de texto"
  51. del /q "c:\documents and settings\%usuario%\escritorio\*.dic"
  52.  
  53.  
  54. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.wtx" "c:\documents and settings\%usuario%\escritorio\archivos de texto"
  55. del /q "c:\documents and settings\%usuario%\escritorio\*.wtx"
  56.  
  57.  
  58.  
  61. echo                                                  Copiando archivos pdf
  64.  
  65.  
  66. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.pdf" "c:\documents and settings\%usuario%\escritorio\archivos de pdf"
  67. del /q "c:\documents and settings\%usuario%\escritorio\*.pdf"
  68.  
  71. echo                                                  Copiando archivos de imagen
  74.  
  75. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.jpg" "c:\documents and settings\%usuario%\escritorio\archivos de imagen"
  76. del /q "c:\documents and settings\%usuario%\escritorio\*.jpg"
  77.  
  78. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.bmp" "c:\documents and settings\%usuario%\escritorio\archivos de imagen"
  79. del /q "c:\documents and settings\%usuario%\escritorio\*.bmp"
  80.  
  81. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.png" "c:\documents and settings\%usuario%\escritorio\archivos de imagen"
  82. del /q "c:\documents and settings\%usuario%\escritorio\*.png"
  83.  
  84. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.bmp" "c:\documents and settings\%usuario%\escritorio\archivos de imagen"
  85. del /q "c:\documents and settings\%usuario%\escritorio\*.bmp"
  86.  
  87. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.gif" "c:\documents and settings\%usuario%\escritorio\archivos de imagen"
  88. del /q "c:\documents and settings\%usuario%\escritorio\*.gif"
  89.  
  90. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.gih" "c:\documents and settings\%usuario%\escritorio\archivos de imagen"
  91. del /q "c:\documents and settings\%usuario%\escritorio\*.gih"
  92.  
  93. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.gbr" "c:\documents and settings\%usuario%\escritorio\archivos de imagen"
  94. del /q "c:\documents and settings\%usuario%\escritorio\*.gbr"
  95.  
  96. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.jpe" "c:\documents and settings\%usuario%\escritorio\archivos de imagen"
  97. del /q "c:\documents and settings\%usuario%\escritorio\*.jpe"
  98.  
  99. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.psd" "c:\documents and settings\%usuario%\escritorio\archivos de imagen"
  100. del /q "c:\documents and settings\%usuario%\escritorio\*.psd"
  101.  
  102. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.rgb" "c:\documents and settings\%usuario%\escritorio\archivos de imagen"
  103. del /q "c:\documents and settings\%usuario%\escritorio\*.rgb"
  104.  
  105. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.tga" "c:\documents and settings\%usuario%\escritorio\archivos de imagen"
  106. del /q "c:\documents and settings\%usuario%\escritorio\*.tga"
  107.  
  108. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.tif" "c:\documents and settings\%usuario%\escritorio\archivos de imagen"
  109. del /q "c:\documents and settings\%usuario%\escritorio\*.tif"
  110.  
  111. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.tiff" "c:\documents and settings\%usuario%\escritorio\archivos de imagen"
  112. del /q "c:\documents and settings\%usuario%\escritorio\*.tiff"
  113.  
  114. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.xcf" "c:\documents and settings\%usuario%\escritorio\archivos de imagen"
  115. del /q "c:\documents and settings\%usuario%\escritorio\*.xcf"
  116.  
  119. echo                                                 Copiando archivos sonido
  122.  
  123. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.aif" "c:\documents and settings\%usuario%\escritorio\archivos de sonido"
  124. del /q "c:\documents and settings\%usuario%\escritorio\*.aif"
  125.  
  126. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.aifc" "c:\documents and settings\%usuario%\escritorio\archivos de sonido"
  127. del /q "c:\documents and settings\%usuario%\escritorio\*.aifc"
  128.  
  129. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.aiff" "c:\documents and settings\%usuario%\escritorio\archivos de sonido"
  130. del /q "c:\documents and settings\%usuario%\escritorio\*.aiff"
  131.  
  132. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.amf" "c:\documents and settings\%usuario%\escritorio\archivos de sonido"
  133. del /q "c:\documents and settings\%usuario%\escritorio\*.amf"
  134.  
  135. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.asf" "c:\documents and settings\%usuario%\escritorio\archivos de sonido"
  136. del /q "c:\documents and settings\%usuario%\escritorio\*.asf"
  137.  
  138. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.au" "c:\documents and settings\%usuario%\escritorio\archivos de sonido"
  139. del /q "c:\documents and settings\%usuario%\escritorio\*.au"
  140.  
  141. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.audiocd" "c:\documents and settings\%usuario%\escritorio\archivos de sonido"
  142. del /q "c:\documents and settings\%usuario%\escritorio\*.audiocd"
  143.  
  144. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.cda" "c:\documents and settings\%usuario%\escritorio\archivos de sonido"
  145. del /q "c:\documents and settings\%usuario%\escritorio\*.cda"
  146.  
  147. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.far" "c:\documents and settings\%usuario%\escritorio\archivos de sonido"
  148. del /q "c:\documents and settings\%usuario%\escritorio\*.far"
  149.  
  150. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.it" "c:\documents and settings\%usuario%\escritorio\archivos de sonido"
  151. del /q "c:\documents and settings\%usuario%\escritorio\*.it"
  152.  
  153. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.itz" "c:\documents and settings\%usuario%\escritorio\archivos de sonido"
  154. del /q "c:\documents and settings\%usuario%\escritorio\*.itz"
  155.  
  156. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.lwv" "c:\documents and settings\%usuario%\escritorio\archivos de sonido"
  157. del /q "c:\documents and settings\%usuario%\escritorio\*.lwv"
  158.  
  159. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.midi" "c:\documents and settings\%usuario%\escritorio\archivos de sonido"
  160. del /q "c:\documents and settings\%usuario%\escritorio\*.midi"
  161.  
  162. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.miz" "c:\documents and settings\%usuario%\escritorio\archivos de sonido"
  163. del /q "c:\documents and settings\%usuario%\escritorio\*.miz"
  164.  
  165. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.mp1" "c:\documents and settings\%usuario%\escritorio\archivos de sonido"
  166. del /q "c:\documents and settings\%usuario%\escritorio\*.mp1"
  167.  
  168. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.mp2" "c:\documents and settings\%usuario%\escritorio\archivos de sonido"
  169. del /q "c:\documents and settings\%usuario%\escritorio\*.mp2"
  170.  
  171. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.mp3" "c:\documents and settings\%usuario%\escritorio\archivos de sonido"
  172. del /q "c:\documents and settings\%usuario%\escritorio\*.mp3"
  173.  
  174. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.mtm" "c:\documents and settings\%usuario%\escritorio\archivos de sonido"
  175. del /q "c:\documents and settings\%usuario%\escritorio\*.mtm"
  176.  
  177. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.ogg" "c:\documents and settings\%usuario%\escritorio\archivos de sonido"
  178. del /q "c:\documents and settings\%usuario%\escritorio\*.ogg"
  179.  
  180. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.ogm" "c:\documents and settings\%usuario%\escritorio\archivos de sonido"
  181. del /q "c:\documents and settings\%usuario%\escritorio\*.ogm"
  182.  
  183. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.okt" "c:\documents and settings\%usuario%\escritorio\archivos de sonido"
  184. del /q "c:\documents and settings\%usuario%\escritorio\*.okt"
  185.  
  186. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.ra" "c:\documents and settings\%usuario%\escritorio\archivos de sonido"
  187. del /q "c:\documents and settings\%usuario%\escritorio\*.ra"
  188.  
  189. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.rm" "c:\documents and settings\%usuario%\escritorio\archivos de sonido"
  190. del /q "c:\documents and settings\%usuario%\escritorio\*.rm"
  191.  
  192. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.snd" "c:\documents and settings\%usuario%\escritorio\archivos de sonido"
  193. del /q "c:\documents and settings\%usuario%\escritorio\*.snd"
  194.  
  195. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.au" "c:\documents and settings\%usuario%\escritorio\archivos de sonido"
  196. del /q "c:\documents and settings\%usuario%\escritorio\*.au"
  197.  
  198. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.stm" "c:\documents and settings\%usuario%\escritorio\archivos de sonido"
  199. del /q "c:\documents and settings\%usuario%\escritorio\*.stm"
  200.  
  201. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.stz" "c:\documents and settings\%usuario%\escritorio\archivos de sonido"
  202. del /q "c:\documents and settings\%usuario%\escritorio\*.stz"
  203.  
  204. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.ult" "c:\documents and settings\%usuario%\escritorio\archivos de sonido"
  205. del /q "c:\documents and settings\%usuario%\escritorio\*.ult"
  206.  
  207. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.voc" "c:\documents and settings\%usuario%\escritorio\archivos de sonido"
  208. del /q "c:\documents and settings\%usuario%\escritorio\*.voc"
  209.  
  210. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.wav" "c:\documents and settings\%usuario%\escritorio\archivos de sonido"
  211. del /q "c:\documents and settings\%usuario%\escritorio\*.wav"
  212.  
  213. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.au" "c:\documents and settings\%usuario%\escritorio\archivos de sonido"
  214. del /q "c:\documents and settings\%usuario%\escritorio\*.au"
  215.  
  218. echo                                                    Copiando archivos iso
  221.  
  222. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.iso" "c:\documents and settings\%usuario%\escritorio\archivos de iso"
  223. del /q "c:\documents and settings\%usuario%\escritorio\*.iso"
  224.  
  227. echo                                                 Copiando archivos de video
  230.  
  231. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.avi" "c:\documents and settings\%usuario%\escritorio\archivos de video"
  232. del /q "c:\documents and settings\%usuario%\escritorio\*.avi"
  233.  
  234. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.mpg" "c:\documents and settings\%usuario%\escritorio\archivos de video"
  235. del /q "c:\documents and settings\%usuario%\escritorio\*.mpg"
  236.  
  237. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.mpeg" "c:\documents and settings\%usuario%\escritorio\archivos de video"
  238. del /q "c:\documents and settings\%usuario%\escritorio\*.mpeg"
  239.  
  240. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.wmv" "c:\documents and settings\%usuario%\escritorio\archivos de video"
  241. del /q "c:\documents and settings\%usuario%\escritorio\*.wmv"
  242.  
  243. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.mov" "c:\documents and settings\%usuario%\escritorio\archivos de video"
  244. del /q "c:\documents and settings\%usuario%\escritorio\*.mov"
  245.  
  246. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.mov" "c:\documents and settings\%usuario%\escritorio\archivos de video"
  247. del /q "c:\documents and settings\%usuario%\escritorio\*.mov"
  248.  
  249. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.asf" "c:\documents and settings\%usuario%\escritorio\archivos de video"
  250. del /q "c:\documents and settings\%usuario%\escritorio\*.asf"
  251.  
  252. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.divx" "c:\documents and settings\%usuario%\escritorio\archivos de video"
  253. del /q "c:\documents and settings\%usuario%\escritorio\*.divx"
  254.  
  255. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.mp4" "c:\documents and settings\%usuario%\escritorio\archivos de video"
  256. del /q "c:\documents and settings\%usuario%\escritorio\*.mp4"
  257.  
  258. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.div" "c:\documents and settings\%usuario%\escritorio\archivos de video"
  259. del /q "c:\documents and settings\%usuario%\escritorio\*.div"
  260.  
  261. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.dvd" "c:\documents and settings\%usuario%\escritorio\archivos de video"
  262. del /q "c:\documents and settings\%usuario%\escritorio\*.div"
  263.  
  264. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.ivf" "c:\documents and settings\%usuario%\escritorio\archivos de video"
  265. del /q "c:\documents and settings\%usuario%\escritorio\*.ivf"
  266.  
  267. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.miv" "c:\documents and settings\%usuario%\escritorio\archivos de video"
  268. del /q "c:\documents and settings\%usuario%\escritorio\*.miv"
  269.  
  270. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.mov" "c:\documents and settings\%usuario%\escritorio\archivos de video"
  271. del /q "c:\documents and settings\%usuario%\escritorio\*.mov"
  272.  
  273. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.movie" "c:\documents and settings\%usuario%\escritorio\archivos de video"
  274. del /q "c:\documents and settings\%usuario%\escritorio\*.movie"
  275.  
  276. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.mpa" "c:\documents and settings\%usuario%\escritorio\archivos de video"
  277. del /q "c:\documents and settings\%usuario%\escritorio\*.mpa"
  278.  
  279. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.mpe" "c:\documents and settings\%usuario%\escritorio\archivos de video"
  280. del /q "c:\documents and settings\%usuario%\escritorio\*.mpe"
  281.  
  282. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.mpv2" "c:\documents and settings\%usuario%\escritorio\archivos de video"
  283. del /q "c:\documents and settings\%usuario%\escritorio\*.mpv2"
  284.  
  285. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.qt" "c:\documents and settings\%usuario%\escritorio\archivos de video"
  286. del /q "c:\documents and settings\%usuario%\escritorio\*.qt"
  287.  
  288. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.qtl" "c:\documents and settings\%usuario%\escritorio\archivos de video"
  289. del /q "c:\documents and settings\%usuario%\escritorio\*.qtl"
  290.  
  291. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.wm" "c:\documents and settings\%usuario%\escritorio\archivos de video"
  292. del /q "c:\documents and settings\%usuario%\escritorio\*.wm"
  293.  
  294. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.wav" "c:\documents and settings\%usuario%\escritorio\archivos de video"
  295. del /q "c:\documents and settings\%usuario%\escritorio\*.wav"
  296.  
  299. echo                                                Copiando archivos comprimidos
  302.  
  303. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.rar" "c:\documents and settings\%usuario%\escritorio\archivos comprimidos"
  304. del /q "c:\documents and settings\%usuario%\escritorio\*.rar"
  305.  
  306. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.tar" "c:\documents and settings\%usuario%\escritorio\archivos comprimidos"
  307. del /q "c:\documents and settings\%usuario%\escritorio\*.tar"
  308.  
  309. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.zip" "c:\documents and settings\%usuario%\escritorio\archivos comprimidos"
  310. del /q "c:\documents and settings\%usuario%\escritorio\*.zip"
  311.  
  314. echo                                                 Copiando archivos html
  317. xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.html" "c:\documents and settings\%usuario%\escritorio\archivos html"
  318. del /q "c:\documents and settings\%usuario%\escritorio\*.html"
  319.  
  320.  
  321.  
  322.  
  323. :salir
  324. cls
  328. echo         Gracias por usar el programa Ordena Escritorios
  330. echo         (((((((((((((((((((((((((((((((((((((((((((
  331. echo         ((                   (( Mascando arrob@s ((
  332. echo         ((    xxxxxxxxxxx    ((((((((((((((((((((((
  333. echo         ((   xx___   ___xx   ((
  334. echo         ((  xxx O     O xxx  ((
  335. echo         ((   x           x   ((
  336. echo         ((   x           x   ((
  337. echo         ((   x   (   )   x   ((
  338. echo         ((   x  ______   x   ((
  339. echo         ((     /      \      ((
  340. echo         ((        @          ((
  341. echo         ((     \______/      ((
  342. echo         ((                   ((
  343. echo         (((((((((((((((((((((((
  344.  
  345.  
« Última modificación: 18 Diciembre 2010, 21:18 pm por moikano→@ » En línea
xassiz~


Desconectado Desconectado

Mensajes: 457



Ver Perfil WWW
Re: [Batch] mi primer aporte: Ordenar escritorios
« Respuesta #1 en: 26 Octubre 2010, 16:21 pm »
Lee sobre for. Te ahorrarás millones de líneas de código ;D
En línea
#ka0labs
#byte-inside
#twitter
moikano→@


Desconectado Desconectado

Mensajes: 572


Cultiva tu mente y cuerpo, son tu única propiedad


Ver Perfil WWW
Re: [Batch] mi primer aporte: Ordenar escritorios
« Respuesta #2 en: 26 Octubre 2010, 16:47 pm »
Gracias por contestar Pablomi. Podrias hacerme un ejemplo con los documentos de texto? si no te importa claro.
En línea
xassiz~


Desconectado Desconectado

Mensajes: 457



Ver Perfil WWW
Re: [Batch] mi primer aporte: Ordenar escritorios
« Respuesta #3 en: 26 Octubre 2010, 16:50 pm »
Código
  1. for %%a in ("txt","doc","dic","wtx") do (
  2.     xcopy /i /q "c:\documents and settings\%usuario%\escritorio\*.%%~a" "c:\documents and settings\%usuario%\escritorio\archivos de texto"
  3.     del /q "c:\documents and settings\%usuario%\escritorio\*.%%~a"
  4. )
Espero que lo entiendas y no te limites a copiar código ;)


Puedes leer también acerca de las variables de entorno, como %userprofile%.


Saludos!
En línea
#ka0labs
#byte-inside
#twitter
Fayre

Desconectado Desconectado

Mensajes: 32



Ver Perfil WWW
Re: [Batch] mi primer aporte: Ordenar escritorios
« Respuesta #4 en: 26 Octubre 2010, 16:58 pm »
Y no te olvides de la variable de entorno %systemdrive% que no todo el mundo tiene instalado windows en c: aunque si la mayoría, para ver todas las variables de entorno en windows pon en la consola set saludos.
En línea
moikano→@


Desconectado Desconectado

Mensajes: 572


Cultiva tu mente y cuerpo, son tu única propiedad


Ver Perfil WWW
Re: [Batch] mi primer aporte: Ordenar escritorios
« Respuesta #5 en: 26 Octubre 2010, 17:05 pm »
Ok creo que lo e pillado. Estaba probando pero no hiba bien encaminado. Había escrito esto.
Código
  1. for %%i in ("c:\Documentts and settings\%usuario%\escritorio\*.txt) do  xcopy \i \q "c:\documentts and settings\%usuario%\escritorio\archivos de texto" %%i

Por supuesto no ha funcionado XD.

Ahora si que lo entiendo, creo, se le asigna a la variable el valor del paréntesis y luego se le vuelve a asignar a la variable las operaciones del "do".
La verdad es que en manuales que e visto no lo explican muy bien.
Gracias Fayre y Pablomi ;)

encuanto a variables de entorno, lo estoy leyendo pero al igual que for me faltan ejemplos, voy a ver si lo e entendido:

Si pongo esto
Código
  1. %userprofile% = %variable%
Se me guardara la dirección a la variable y podre utilizarla para cualquier nombre de "documentts and settings" (al menos eso me a parecido al usarla en consola)
Y si pongo
Código
  1. %systemdrive% = %variable%
Se me guardara la unidad donde se encuentra el sistema operativo.

Entonces si no me equivoco seria así:
Código
  1. for %%a in ("txt","doc","dic","wtx") do (
  2.     xcopy /i /q "%userprofile%\escritorio\*.%%~a" "c:\documents and settings\%usuario%\escritorio\archivos de texto"
  3.     del /q "%userprofile%\escritorio\*.%%~a"
  4. )

Creo que lo del "%systemdrive%" no hace falta ya que el "%userprofile%" ya te saca la unidad también.
Ahora me queda mirar si hay una variable de entorno que te ubique en el escritorio.
Gracias de nuevo, subiré pronto el código reformado.  ;-)
« Última modificación: 18 Diciembre 2010, 21:17 pm por moikano→@ » En línea
xassiz~


Desconectado Desconectado

Mensajes: 457



Ver Perfil WWW
Re: [Batch] mi primer aporte: Ordenar escritorios
« Respuesta #6 en: 26 Octubre 2010, 17:19 pm »
Es que hay muchas formas de utilizar un bucle for, aparte de que luego tiene opciones como /L, /D o /F.

La ayuda de la consola es bastante buena:
Código
  1. for /?
  2.  
En línea
#ka0labs
#byte-inside
#twitter
moikano→@


Desconectado Desconectado

Mensajes: 572


Cultiva tu mente y cuerpo, son tu única propiedad


Ver Perfil WWW
Re: [Batch] mi primer aporte: Ordenar escritorios
« Respuesta #7 en: 27 Octubre 2010, 09:16 am »
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. ;-)

Código
  1. @ echo off
  2.  
  3. title Ordena Escritorios
  4.  
  5. color 0d
  6.  
  7. echo                       -----Ordena Escritorios-----
  8.  
  10.  
  11. echo                   Este programa ordenara los archivos 
  12.  
  13. echo                   sueltos que tengas en el escritorio
  14.  
  16.  
  17. echo                            Empezamos? (s/n)
  18.  
  20.  
  21. set /p res=
  22.  
  23. if %res%==s goto :empezemos
  24.  
  25. if %res%==n goto :salir
  26.  
  27.  
  28.  
  29. :empezemos
  30.  
  32.  
  34.  
  35. echo                                                 Copiando archivos texto
  36.  
  38.  
  40.  
  41. for %%a in ("txt","doc","dic","wtx") do (
  42.  
  43.     xcopy /i /q "%userprofile%\escritorio\*.%%~a" "%userprofile%\%usuario%\escritorio\archivos_de_texto"
  44.  
  45.     del /q "%userprofile%\escritorio\*.%%~a"
  46.  
  47. )
  48.  
  50.  
  52.  
  53. echo                                                  Copiando archivos pdf
  54.  
  56.  
  58.  
  59. for %%a in ("pdf") do (
  60.  
  61.     xcopy /i /q "%userprofile%\escritorio\*.%%~a" "%userprofile%\%usuario%\escritorio\archivos_pdf"
  62.  
  63.     del /q "%userprofile%\escritorio\*.%%~a"
  64.  
  65. )
  66.  
  68.  
  70.  
  71. echo                                                  Copiando archivos de imagen
  72.  
  74.  
  76.  
  77. for %%a in ("jpg","bmp","png","gif","gih","gbr","jpe","psd","tga","tif","tiff","xcf") do (
  78.  
  79.     xcopy /i /q "%userprofile%\escritorio\*.%%~a" "%userprofile%\%usuario%\escritorio\archivos_imagen"
  80.  
  81.     del /q "%userprofile%\escritorio\*.%%~a"
  82.  
  83. )
  84.  
  86.  
  88.  
  89. echo                                                 Copiando archivos sonido
  90.  
  92.  
  94.  
  95. 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 (
  96.  
  97.     xcopy /i /q "%userprofile%\escritorio\*.%%~a" "%userprofile%\%usuario%\escritorio\archivos_audio"
  98.  
  99.     del /q "%userprofile%\escritorio\*.%%~a"
  100.  
  101. )
  102.  
  104.  
  106.  
  107. echo                                                    Copiando archivos iso
  108.  
  110.  
  112.  
  113.  
  114.  
  115. for %%a in ("iso") do (
  116.  
  117.     xcopy /i /q "%userprofile%\escritorio\*.%%~a" "%userprofile%\%usuario%\escritorio\archivos_iso"
  118.  
  119.     del /q "%userprofile%\escritorio\*.%%~a"
  120.  
  121. )
  122.  
  124.  
  126.  
  127. echo                                                 Copiando archivos de video
  128.  
  130.  
  132.  
  133. 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 (
  134.  
  135.     xcopy /i /q "%userprofile%\escritorio\*.%%~a" "%userprofile%\%usuario%\escritorio\archivos_video"
  136.  
  137.     del /q "%userprofile%\escritorio\*.%%~a"
  138.  
  139. )
  140.  
  142.  
  144.  
  145. echo                                                Copiando archivos comprimidos
  146.  
  148.  
  150.  
  151. for %%a in ("rar","tar","zip") do (
  152.  
  153.     xcopy /i /q "%userprofile%\escritorio\*.%%~a" "%userprofile%\%usuario%\escritorio\archivos_comprimido"
  154.  
  155.     del /q "%userprofile%\escritorio\*.%%~a"
  156.  
  157. )
  158.  
  160.  
  162.  
  163. echo                                                 Copiando archivos html
  164.  
  166.  
  168.  
  169. for %%a in ("html") do (
  170.  
  171.     xcopy /i /q "%userprofile%\escritorio\*.%%~a" "%userprofile%\%usuario%\escritorio\archivos_html"
  172.  
  173.     del /q "%userprofile%\escritorio\*.%%~a"
  174.  
  175. )
  176.  
  177. :salir
  178.  
  179. cls
  180.  
  182.  
  184.  
  186.  
  187. echo         Gracias por usar el programa Ordena Escritorios
  188.  
  190.  
  191. echo         (((((((((((((((((((((((((((((((((((((((((((
  192.  
  193. echo         ((                   (( Mascando arrob@s ((
  194.  
  195. echo         ((    xxxxxxxxxxx    ((((((((((((((((((((((
  196.  
  197. echo         ((   xx___   ___xx   ((
  198.  
  199. echo         ((  xxx O     O xxx  ((
  200.  
  201. echo         ((   x           x   ((
  202.  
  203. echo         ((   x           x   ((
  204.  
  205. echo         ((   x   (   )   x   ((
  206.  
  207. echo         ((   x  ______   x   ((
  208.  
  209. echo         ((     /      \      ((
  210.  
  211. echo         ((        @          ((
  212.  
  213. echo         ((     \______/      ((
  214.  
  215. echo         ((                   ((
  216.  
  217. echo         (((((((((((((((((((((((
  218.  
  219.  
  220.  
  221.  
  222.  
« Última modificación: 18 Diciembre 2010, 21:16 pm por moikano→@ » En línea
xassiz~


Desconectado Desconectado

Mensajes: 457



Ver Perfil WWW
Re: [Batch] mi primer aporte: Ordenar escritorios
« Respuesta #8 en: 27 Octubre 2010, 14:50 pm »
Bien, ahora podrías comprobar que la ruta de Escritorio existe, en algunos sistemas será Desktop :rolleyes:
En línea
#ka0labs
#byte-inside
#twitter
moikano→@


Desconectado Desconectado

Mensajes: 572


Cultiva tu mente y cuerpo, son tu única propiedad


Ver Perfil WWW
Re: [Batch] mi primer aporte: Ordenar escritorios
« Respuesta #9 en: 28 Octubre 2010, 09:24 am »
Pues lo e estado mirando y no lo e encontrado, bueno, si lo e encontrado pero no funciona.

Por set en consola (no parece que este por ningun lado):

ALLUSERSPROFILE=C:\Documents and Settings\All Users
APPDATA=C:\Documents and Settings\Administrador\Datos de programa
CLIENTNAME=Console
CommonProgramFiles=C:\Archivos de programa\Archivos comunes
COMPUTERNAME=PC01
ComSpec=C:\WINDOWS\system32\cmd.exe
FP_NO_HOST_CHECK=NO
HOMEDRIVE=C:
HOMEPATH=\Documents and Settings\Administrador
LOGONSERVER=\\PC01
NUMBER_OF_PROCESSORS=1
OS=Windows_NT
Path=C:\WINDOWS\system32;C:\WINDOWS;C:\WINDOWS\System32\Wbem
PATHEXT=.COM;.EXE;.BAT;.CMD;.VBS;.VBE;.JS;.JSE;.WSF;.WSH
PROCESSOR_ARCHITECTURE=x86
PROCESSOR_IDENTIFIER=x86 Family 15 Model 107 Stepping 2, AuthenticAMD
PROCESSOR_LEVEL=15
PROCESSOR_REVISION=6b02
ProgramFiles=C:\Archivos de programa
PROMPT=$P$G
SESSIONNAME=Console
SystemDrive=C:
SystemRoot=C:\WINDOWS
TEMP=C:\DOCUME~1\ADMINI~1\CONFIG~1\Temp
TMP=C:\DOCUME~1\ADMINI~1\CONFIG~1\Temp
USERDOMAIN=PC01
USERNAME=Administrador
USERPROFILE=C:\Documents and Settings\Administrador
windir=C:\WINDOWS

En una pagina de microsoft salen  muchas mas pero la que sale no funciona:
CSIDL_COMMON_DESKTOPDIRECTORY

enlace:http://technet.microsoft.com/es-es/library/cc749104%28WS.10%29.aspx
En línea
Páginas: [1] 2 3 Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
pequeño aporte [batch] poner CF bajo una variable ;) « 1 2 »
Scripting 		~[uNd3rc0d3]~ 16 8,921 Último mensaje 26 Febrero 2008, 03:20 am
por MK-Ultra
[Batch] Un pequeño aporte « 1 2 »
Scripting 		najmuddin 13 8,323 Último mensaje 25 Junio 2008, 21:21 pm
por najmuddin
[Batch][Aporte] Base de datos para clientes.
Scripting 		Geormarsch 7 5,669 Último mensaje 7 Noviembre 2011, 22:28 pm
por Geormarsch
[Batch] Aporte, Soy electronico
Scripting 		Geormarsch 5 4,145 Último mensaje 9 Enero 2012, 10:24 am
por leogtz
[BATCH] peticion de script ,leer , ordenar, exportar a otro txt
Scripting 		apuromafo CLS 7 6,290 Último mensaje 15 Julio 2012, 04:02 am
por apuromafo CLS
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines