Discussion :

[cdlr27]

Bonjour à tous.

A la fermeture de mon application, je recopie tous les fichiers (tables) dans un répertoire de sauvegarde.
J'ai un souci avec un fichier des fichiers qui refuse (presque tout le temps) d'être copié.

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
bResultat = HFerme("*")
SI bResultat ALORS
 
	//	SauveDonnees(gsRepSauve)
	sFichier = ComplèteRep(gsRepAppli)+"*.FIC"
	sRecherche = fRep(sFichier,frFichier)
	TANTQUE sRecherche <> ""
		bResCopie = fCopieFichier(ComplèteRep(gsRepAppli) + sRecherche, sRepTemp, frJauge)
		SI bResCopie ALORS
			sRecherche = fRep("",frFichier)
		SINON
			Erreur(ErreurInfo(errMessage))
		FIN	//	SI nCopieFic
	FIN	//	TANTQUE sRecherche <>
 
SINON
	Erreur("Problème à la fermeture des fichiers " + HErreur(hErrEnCours))
FIN

C'est la fonction fCopieFichier qui me retourne un message d'erreur. c'est le 7éme fichier du projet.

Erreur pendant la copie du fichier D:\Mes projets\Bergere_a\Exe\Produit.FIC vers D:\Mes projets\Bergere_a\Exe\temp\Produit.FIC. Vérifiez que vous disposez des droits nécessaires et qu'il n'y a pas des fichiers ouverts et bloqués.

Une idée sur le sujet !!

[Nicolas_Jeanneau]

Bonjour,

et si tu mets un multitache pour patienter quelques secondes pour voir si c'est un délai de fermeture de fichier ?

à bientôt,

Nicolas

[wimbish]

Bonjour,
On a connu des problèmes de copie que l'on a contourné en utilisant les api :
Tu peux essayer ça :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
//Je supprime l'éventuelle copie déjà existante du fichier
nResultdll = AppelDLL32("kernel32","DeleteFileA", &lpNewFileName)
//Copie
Result_dll = AppelDLL32("kernel32","CopyFileA" , &lpExistingFileName, &lpNewFileName, Faux)

[lepatantpato]

Plusieurs pistes possibles :

- Entre le moment où tu fermes tous les fichiers (en 1) et la copie en 8, le fichier PRODUIT est peut-être réouvert et bloqué par un accès concurrent.
- Teste en mode administrateur ton appli
- Et, cas qui m’est déjà arrivé : ce message d’erreur intervient si le disque dur est plein !
- En dernier lieu, tu peux vider le répertoire Temp avant de copier tous les fichiers. Car c’est peut-être le fichier Produit.fic dans temp (de la sauvegarde précédente qui pose un problème).
Tiens-nous au courant !
Lépatantpato