Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Test extension
Message
 
À
26/05/2011 04:14:31
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
Divers
Thread ID:
01511789
Message ID:
01511938
Vues:
108
>>>>Is there a way to test the extension of data entered.
>>>>Here i ask if the operator wants to name the file but if the extension txt is not typed
>>>>i would like the program to add it automatically. Any siggestons would be appreciated
>>>>thanks K
>>>>
>>>>
>>>>@ 0,1 say "Re-Name File:  " get fln
>>>>READ
>>>>fln = rtrim(fln)
>>>>COPY FILE m.txt to c:\vaniermu\&fln
>>>>
>>>
>>>Why you're writing DOS-style code?
>>>
>>>Take a look at JUSTEXT() and FORCEEXT() functions in help.
>>>
>>>fln = putfile('Rename File:',,'txt')
>>>
>>>if empty(justext(fln))
>>>   fln = forceext(fln, 'txt')
>>>endif
>>>
>>>copy file m.txt to ('c:\Vaniermu\' + justfname(m.fln))
>>
>>
>>mmmm not much success with that one Naomi - errors. thanks anyway K
>
>And you couldn't be bothered to work out why ?
fln = putfile('Rename File:','','txt')
not that at all viv. If the experts get it wrong, there is no hope for me. K
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform