>PROCEDURE ShortPathName
>PARAMETERS pLongPath
>
>* Uses WINAPI to get DOS8.3 type name
>
>DECLARE INTEGER GetShortPathName IN kernel32;
> STRING @ lpszLongPath,;
> STRING @ lpszShortPath,;
> INTEGER cchBuffer
>
>LOCAL lclBuffer, lLen
>
> lclBuffer=SPACE(250)+CHR(0)
> lLen=GetShortPathname(pLongPath+CHR(0), ;
> @lclBuffer,250)
>
>RETURN left(lclBuffer,lLen)
Excellent - I never thought I'd need it - but the need just arrived - Thanx
Edgar L. Bolton, B.S. B.B.A.