Microsoft.ACE.OLEDB.12.0 con nombre de archivo mayor a 8 caracteres

[[AgustinOrtu]]

El problema esta en la implementacion de los driver. Son antiguos y solo pueden ver hasta archivos con nombres de 8 caracteres, estan implementados para MS-DOS 16 y en ese SO los archivos llegan hasta los 8 caracteres. Evidentemente cuando quiere buscar el archivo corta el string hasta el 8vo caracter y ese archivo seguro que no existe

En alguno de los link de por ahi se sugiere que otra posible solucion es la de cortar el nombre del archivo y agregar un ~ al final. Creo que habia que recortarlo hasta 6 o 7 caracteres, no recuerdo. Ej NombreLargo.txt --> Nombre~

[Casimiro Notevi]

¿No había una función que devolvía el nombre corto de un nombre largo?

[ecfisa]

Empezado por Casimiro Notevi

¿No había una función que devolvía el nombre corto de un nombre largo?

Si, estas en lo correcto. La funcion es GetShortPathName

Código Delphi [-]
// uses Windows;

function ShortPathName( const FileName: string ): string;
var
  ShortName: array[0..MAX_PATH] of char;
begin
  GetShortPathName( PChar( FileName ), @ShortName, Length( ShortName ) );
  Result := ShortName;
end;

Saludos

[aromigaret]

Dec, te comento que funciona si pongo un nombre de archivo hasta 8 caracteres.
Eficsa, probé la función que me indicas, pero me devuelve cualquier carácter. Que puedo estar haciendo mal?
Gracias.

[aromigaret]

Eficsa, ya encontré el error de la función, yo ponía mal el directorio donde se encontraba el archivo. Pero ahora, el procedimiento almacenado que tengo en SQL server, no me admite el carácter '~'.
Alguna idea ?

[[AgustinOrtu]]

Pero no se supone que con la función obtenes el nombre completo sin el ~?