Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Using ADir()
Message
De
09/02/2002 07:19:24
Cetin Basoz
Engineerica Inc.
Izmir, Turquie
 
 
À
08/02/2002 16:11:30
Steven Dyke
Safran Seats USA
Texas, États-Unis
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
Divers
Thread ID:
00617679
Message ID:
00617871
Vues:
15
>indwgno = '842239'
> Set Default To &prfiles &&Look in Prerel to get files
> dtt2 = ADir(gnLODModels,AllT(indwgno) + '*.*')
> =Asort(gnLODModels)
> Set Default to &defpath
> dtt3 = Int(ALen(gnLODModels)/5)
> ? dtt3

Steve,
-You don't need to change default
-Macro substition is dangerous where path might contain a space, use name expression instead
indwgno = '842239'
lcPath = addbs(prFiles)
dtt2 = ADir(gnLODModels, lcPath + indwgno + '*.*')
*=Asort(gnLODModels) && Might be
? dtt2
? 'Files listing'
? '-------------'
for ix=1 to dtt2
 ?  lcPath+gnLODModels[ix,1], ;
    gnLODModels[ix,2], ;
    gnLODModels[ix,3], ;
    gnLODModels[ix,4]
endfor
Cetin
Çetin Basöz

The way to Go
Flutter - For mobile, web and desktop.
World's most advanced open source relational database.
.Net for foxheads - Blog (main)
FoxSharp - Blog (mirror)
Welcome to FoxyClasses

LinqPad - C#,VB,F#,SQL,eSQL ... scratchpad
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform