Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
ADIR() Mixed case please...
Message
 
À
01/11/2000 16:26:50
Jean-Pierre Overbeek
New Limit Database Solutions
Amsterdam, Pays-Bas
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Divers
Thread ID:
00436894
Message ID:
00436903
Vues:
21
>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
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform