Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Creating a directory
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Versions des environnements
Visual FoxPro:
VFP 9 SP1
Divers
Thread ID:
01110310
Message ID:
01110340
Vues:
17
>>Hi everybody,
>>
>>I have the following code:
>>
>>if not directory(thisform.cInputDirectory)
>>			md (thisform.cInputDirectory)
>>		endif
>>		lcDir = thisform.cInputDirectory + "Batch_" + ;
>>				transform(crsBatch_Imports.iBatch_Number)
>>		if not directory(m.lcDir)
>>			md (m.lcDir)
>>		endif
>>
>>The cInputDirectory has a \ at the end.
>>
>>The first portion of the code returns an error "The directory already exists" on md (thisform.cInputDirectory) command.
>>
>>What could be the problem? \ at the end or user rights? If the second, the error message is misleading.
>
>The problem maybe that directory is hidden. If so, use adir instead:
>?adir(atemp,justpath(thisform.cInputDirectory),"DH") && No backslash at the end !

Hi Yuri,

I checked directory() function and it allows to specify flags. But I may still have some problems with the rights, e.g. MD may still fail. So, I just put this piece of code into TRY/CATCH.
If it's not broken, fix it until it is.


My Blog
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform