Bonjour
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31 NomC est une chaîne ListeFichier est une chaîne ListeFichier = HListeFichier(hLstDétail) POUR TOUTE CHAÎNE sNomFichier DE ListeFichier SEPAREE PAR RC fi est une chaîne = ExtraitChaîne(sNomFichier,1,TAB+TAB) NomC = {fi}..Répertoire+"\"+... {fi}..NomPhysique+... {fi}..Extension SAI_pfffff=SAI_pfffff+RC+NomC sFi2 est une chaîne = ExtraitChaîne(sNomFichier,2,TAB+TAB) fi= ExtraitChaîne(sFi2,1,TAB) SI fi<>"" ALORS NomC = {fi}..Répertoire+"\"+... {fi}..Nom+... {fi}..Extension FIN SAI_pfffff=SAI_pfffff+RC+NomC fi= ExtraitChaîne(sFi2,2,TAB) SI fi<>"" ALORS NomC = {fi,indFichier}..Répertoire+"\"+... {fi,indFichier}..NomPhysique+... {fi,indFichier}..Extension FIN SAI_pfffff=SAI_pfffff+RC+NomC FIN
J’essaie de recupérer dans une liste les xxx.Fic et xxx.NDXet xxx.Memo de ma base de donnes mais je n'ai que les xxx.FIC, auriez vous une piste a suivre ( je cherche a selectionner certains fichier pour la sauvegarde ( sauvegarde sélective) et Merci d'avance!!
Partager