Visual Basic - Renombrar archivos

Life is soft - evento anual de software empresarial
   
Vista:

Renombrar archivos

Publicado por Adrian (27 intervenciones) el 15/05/2016 07:00:49
¿Hay alguna forma de no renombrar ciertos archivos? Por ejemplo que se renombren todos los archivos menos los de extensión ".txt"
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
-1
Responder
Imágen de perfil de xve

Renombrar archivos

Publicado por xve (178 intervenciones) el 15/05/2016 20:08:46
No se como lo haes, pero si se puede... excluye los archivo txt de tu búsqueda o consulta.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Andres Leonardo

Renombrar archivos

Publicado por Andres Leonardo (698 intervenciones) el 15/05/2016 20:41:24
Con file scriting fueres hacerlo ... podrias poner la ruta... y que extensiones no quieres renombrar y listo no lo veo complicado ...

solo una cosa... como los queires renombrar0===???
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Renombrar archivos

Publicado por Adrian (27 intervenciones) el 15/05/2016 22:48:06
Gracias Andres y xve, me he fijado que los archivos de imagen de cualquier tipo, se pueden convertir a formato .jpg tan solo poniendo el mismo nombre y la extension .jpg, lo que estoy haciendo es que cuando se busca un archivo de imagen lo renombre a ,jpg, pero los que ya están con extension .jpg, no les haga nada.

Cuando se despliega la imagen en un picture, se despliega el nombre en un textbox, uso un command para renombrarlo.
Estoy usando la instruccion Name "c:\archivo.bmp" As "c:\archivo.jpg"
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Renombrar archivos

Publicado por Adrian (27 intervenciones) el 16/05/2016 04:54:18
Algunos archivos, no todos, perdon
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Andres Leonardo

Renombrar archivos

Publicado por Andres Leonardo (698 intervenciones) el 16/05/2016 18:55:46
Agrega la referencia que te doy

Luego Variables

1
2
3
Dim fs As New FileSystemObject
Dim temporal As Folder
Dim Archivo As File

1
2
3
4
5
6
7
8
9
Set temporal = fs.GetFolder("Aqui va la ruta  c:\ o lo que tu desees")
For Each Archivo In temporal.Files  ' por cada archivo de la carpeta aqui te muestro atributos luego comentas es para que veas 
                  MsgBox Archivo
                    MsgBox Archivo.Type
                    MsgBox Archivo.Name
' aqui pones el renombrar archivo es el nombre del archivo y despues del as el nombre que la vas a dar .. espero te sirva
Name Archivo As "Tu nuevo Nombre.xls"
 
 Next Archivo
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Renombrar archivos

Publicado por Facundo (58 intervenciones) el 16/05/2016 23:39:01
Ojo! Cambiarle la extensión a un archivo (p ej .jpg a uno .bmp) no lo cambia de formato.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar

Renombrar archivos

Publicado por Adrian (27 intervenciones) el 17/05/2016 17:53:49
Gracias Andres y Facundo, ha sido de gran ayuda.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar