Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
ADIR() Mixed case please...
Message
 
To
01/11/2000 16:26:50
Jean-Pierre Overbeek
New Limit Database Solutions
Amsterdam, Netherlands
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00436894
Message ID:
00436903
Views:
20
>Hi,
>
>ADIR() returns an array with the files in a directory, but all the filenames are uppercase. Is it possible to get an list of the files in a directory as they are shown in windows explorer (MixedCase)????
>
>TIA
>
>Greetings,
Jean-Pierre,

There are a couple of ways to do this. One way is my Windows Filenames programming that'll return a number of pieces of information regarding the file. It allows for wildcards and paths. The other way is to use the Windows Script Host.
oFSO = CREATEOBJECT('Scripting.FileSystemObject')
oFolder = oFSO.GetFolder("C:\My Documents")
FOR EACH oFile IN oFolder.Files
  ? oFile.Name
NEXT
Unfortunately, the WSH does not allow for filtering the filenames. See the article's Ed Rauh and I have written in the VFUG newsletters (www.vfug.org) beginning with this past September's issue for further information.
George

Ubi caritas et amor, deus ibi est
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform