Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Short DOS names
Message
From
09/02/1999 23:13:26
 
 
General information
Forum:
Visual FoxPro
Category:
Other
Title:
Miscellaneous
Thread ID:
00179850
Message ID:
00185824
Views:
26
Thanks, Ed, for this routine. I had occassion to need it today, and it's perfect.

>
>LPARAMETER cPathToConvert
>DECLARE INTEGER GetShortPathName IN Win32API ;
>  STRING  @cLongPath, ;
>  STRING  @cShortPathBuff, ;
>  INTEGER nBuffSize
>LOCAL cBuf, nBufSize, nShortSize
>cBuf= space(511)
>nBufSize = 511
>nShortSize = GetShortPathName(cPathToConvert,@cBuf,@nBufSize)
>IF nShortSize > 0
>	RETURN LEFT(cBuf,nShortSize)
>ELSE
>	RETURN ''
>ENDIF
>
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform