batserra
12 de Julio del 2004

Muy buenas,

Tengo un problema con las extensiones de los archivos ,he echo una estructura que pasandole una ruta de un archivo ,se me guarda el nombre ,el path y teoricamente la extension. Pero tengo problemas si hay varias ,o cn espacios...

Hay alguna otra manera de poder guardar la extencion?

Gracias

EnR
12 de Julio del 2004

Hola, podrias explicar un poco mas tu problema?? a ver si alguien puede echarte una mano

sdemingo
12 de Julio del 2004

Hola para quedarte con la extensión de un archivo solo tienes que hacer esto:

imagina que en nombreArchivo tienes foto.jpg

Dim extension as String
extension = extension = Right(nombreArchivo, 3)
MsgBox extension

salu2
sdemingo

FernandoC
12 de Julio del 2004

Lamentablemente las extensiones pueden tener tres caracteres, mas de tres o menos de tres.
Con InStr puedes localizar la última ocurrencia (dentro de una cadena) del punto. A partir de ahi es la extensión.

Pos = Instr(Nombre,".")
Ext=Mid(Nombre,pos+1)

Como a alguien se le uede ocurrir poner puntos en un nombre, te dejo que busques la manera de encontrar el último punto.