Set objshell = createobject("wscript.shell") Set objFso = createobject("scripting.filesystemobject") 'Declaramos los objetos
Imagenes = objshell.regread("HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders\My Pictures") 'Como no hay una variable de sistema para Mis Imágenes, 'leemos la clave del registro que guarda la ruta para poder obtenerla
objFso.movefile Imagenes & "\*.*","C:\Carpetadestino" 'Movemos todos los archivos que se encuentran dentro de Mis imágenes 'Tener en cuenta que mueve solamente los archivos sueltos
Te lo he comentado para que quede más claro
Pruebalo y me cuentas
Saludos
P.D: Por cierto, este tema debería de estar en Programación general>Scripting
« Última modificación: 07 Junio 2008, 05:48 por Novlucker »
En línea
"Hay dos cosas infinitas: el Universo y la estupidez humana. Y del Universo no estoy seguro."
jaja grax man esto me va a servir y gracais a ti aprendi nuevas cosas! .. pero una cosa buscando en el registro trate de encontrar la ruta de mis archivos recividos pero nada! :S... sabes donde encuentro esa ruta?
Hola,por ahi no todos tenemos las mismas rutas,para accederla sin importar la ruta ,usa un codigo que posteo hace poco cobein y yo puso una lista de las constantes,estas constantes permiten ubicar las carpetas mas importantes del sistema,entre ellas la de mis documentos,my pictures,etc...
saludos.
En línea
Todos somos ignorantes;lo que pasa es que no todos ignoramos las mismas cosas - Albert Einstein
Autor
En línea
.. pero una cosa buscando en el registro trate de encontrar la ruta de mis archivos recividos pero nada! :S... sabes donde encuentro esa ruta?
