WDForge.org - Forums

Re: UTILISATION MACRO DE SUBSTITUTION SOUS WINDEV

Sujet: Re: UTILISATION MACRO DE SUBSTITUTION SOUS WINDEV
par drcharly93 sur 23/6/2009 14:17:23

Citation :

exemple : fichier saisi // fichier existant
Période = "0109" // janvier 2009
store 'saisi'+periode+'.dbf' to saisi
copy file sais.dbf to &saisi

Bonjour
Traduction en WLangage

Periode est une chaine
sCheminOrigine est une chaine
sCheminDest est une chaine

Periode = "0109"
sCheminOrigine = fRepExe() + ["\"] + "Donnees\sais.fic"
sCheminDest = "c:\donnees\saisi" + periode + ".fic" 
Si HCopieFichier( "", sCheminOrigine, "", sChemindest) Alors
 Info("Copie réalisée avec succès.")
Sinon
 Erreur("Un problème est intervenue pendant la copie!",  Erreur( HErreur())
Fin

En espérant vous avoir aidé