Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Copy a file to an Empty Folder
Message
 
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Environment versions
Visual FoxPro:
VFP 8 SP1
OS:
Windows XP SP1
Network:
Windows XP
Database:
Visual FoxPro
Miscellaneous
Thread ID:
01101321
Message ID:
01101383
Views:
9
Hi Friends,

Thank you for all the answers but i created the function below that work ok
*--------------------------------------------------------
  Function GetDOSPath(cWinPath) && Return a valid DOS PATH
*--------------------------------------------------------
 LOCAL nBuffer 
 LOCAL cReturn
 LOCAL nReturn

 DECLARE INTEGER GetShortPathName IN kernel32; 
         STRING  lpszLongPath  ,; 
         STRING  @lpszShortPath,; 
         INTEGER cchBuffer 

 nBuffer  = 255
 cReturn = SPACE(nBuffer)
 nReturn = GetShortPathName( cCaminho, @cReturn, nBuffer)        
 
 RETURN LEFT( cReturn, nReturn)
Thanks again,

[]´s

Dionísio
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform