« 1 (2) 3 »


Re: Faire des sauvegardes à partir d'un menu
salut,

si je comprend bien ta demande, tu veux récupérer l'extension d'un fichier.
pour ca il existe la fction fextraitchemin(nomfichier, fextension)
Argona

Contribution le : 18/02/2004 13:52
Créer un fichier PDF de la contribution Imprimer


Re: Faire des sauvegardes à partir d'un menu
Utilisateur WDF
Inscrit:
15/01/2004 11:33
De Etoile (26)
Post(s): 70
Merci Argona, j'allais encore me casser la tête pour rien.

Sinon, je voudrais savoir comment faire pour qu'à partir d'un bouton comment ouvrir une sorte de fenêtre où l'utilisateur choisie l'emplacement où sera enregistré le dossier.

Et autre chose, je n'arrive pas à écrire mon code pour que le programme passe en revue tout les fichiers du dossier et qu'il ne prenne que les Hyper Files. En gros, j'aimerai écrire le code suivant :

TANT QUE Ce n'est pas la fin du dossier
PRENDRE le nom du fichier
SI c'est un hyper file ALORS
fcopierfichier(.......blalabla)
FINSI
FINTANQUE

Le début et la fin c'est obn j'arrive à le faire. Il n'y a que ça qui me pose problème...

Contribution le : 19/02/2004 14:08
Créer un fichier PDF de la contribution Imprimer


Re: Faire des sauvegardes à partir d'un menu
Animateur WDF
Inscrit:
26/06/2002 16:24
De wdforge.org
Post(s): 2822
AngelMJ,
Vous êtes lancé dans un traitement laborieux de votre problème !
- En début de projet veillez à ce que la gestion du REP soit active (HGereRep(vrai)).
- récupérez votre répertoire de données (pour localiser le REP) : (avant toute commande Hxxx)
GLOBAL
gcRepDonnées est une chaine = CompleteRep(UNFICHIERDELANALYSE..repertoire)

- Votre traitement sera un parcours du REP :
prévoir de renseigner gProjetNom avec le nom de l'exe/projet de manière à reconstituer le nom du fichier REP (ExeInfo ou ProjetInfo).
eRep est un entier = fOuvre(gcREPDonnées+gProjetNom+".REP",foLecture)
SI eRep=-1 ALORS 
   ErreurInfo(errMessage)
   RETOUR
FIN
slig est une chaîne = fLitLigne(eRep)
Sablier()
// parcours le .REP à la recherche des fichier physiques du projet...
TANTQUE slig<>EOT ET slig<>""
	// ignore la ligne analyse
	SI Position(slig,"LOCALIZATION")<>0 ALORS
		// le troisième membre de la ligne est le nom physique !!! 
		info(ExtraitChaîne(slig,3))
		// ICI lancer la copie du fichier fcopiefichier en reconstruisant la destination par modification de la partie Disque/répertoire du nom obtenu avec le répertoire sélectionné via fRepSelecteur lancé plus tôt 
	FIN
	//Fichier suivant
	slig = fLitLigne(eRep)
FIN
Sablier(Faux)
fFerme(eRep)


Pour que l'utilisateur sélection la destination : voir du coté de l'assistant de fRepSélecteur pour récupérer un répertoire... et fExtraitChemin pour reconstituer les nom de fichier cibles avant fCopieFichier

Normalement, on est ok


Contribution le : 19/02/2004 15:03
_________________
R&B
Contact, CV.
Créer un fichier PDF de la contribution Imprimer


Re: Faire des sauvegardes à partir d'un menu
Utilisateur WDF
Inscrit:
15/01/2004 11:33
De Etoile (26)
Post(s): 70
Donc si je comprends bien, le code ici présent me permet de parcourir un répertoire et d'en extraire seulement les fichiers Hyper File?

Merci beaucoup Romu ^^. Je vais le compléter avec le code que j'ai déjà établi qui est :

-Recupérer l'endroit où créer le répertoire
-Nommer moi même le fichier

Donc je vais essayer d'établir moi même le tout et je vouis recontact en cas de problème.

Merci

Contribution le : 19/02/2004 15:53
Créer un fichier PDF de la contribution Imprimer


Re: Faire des sauvegardes à partir d'un menu
salut

sache que la fction fSélecteur permet d'ouvrir 1 fenetre de sélection de fichier (ou de repertoire et renvoi le chemin sous forme de chaine. facilement exploitable ensuite avec fextraitchemin ^^

Contribution le : 20/02/2004 14:41
Créer un fichier PDF de la contribution Imprimer


Re: Faire des sauvegardes à partir d'un menu
Utilisateur WDF
Inscrit:
15/01/2004 11:33
De Etoile (26)
Post(s): 70
Fsélecteur()? Moi j'utilise FRepSélecteur et ça marche bien pour le moment...

Bon je verrais par la suite...

Sinon Romu... j'ai étudié ton code et je n'en compris pas toutes les lignes. je vais te montrer les trucs que je n'ai pas bien compris. Merci d'avance ^^

eRep est un entier = fOuvre(gcREPDonnées+gProjetNom+".REP",foLecture)


Quel est le but de cette ligne? Que doit contenir la variable gProjetNom? J'ai bien compris que c'est le nom du projet mais il y a un moyen de le récupérer directement?

slig est une chaîne = fLitLigne(eRep)


Ca je ne vois pas du tout ce que ça représente ^^'

Si j'arrive mieux à comprendre ces lignes, j'arriverai mieux à comprendre ta démarche...

Contribution le : 23/02/2004 14:23
Créer un fichier PDF de la contribution Imprimer


Re: Faire des sauvegardes à partir d'un menu
Animateur WDF
Inscrit:
26/06/2002 16:24
De wdforge.org
Post(s): 2822
Bonjour AngleMJ,

Désolé pour les cafouillages de ce matin : problème résolu.

Ma démarche est fort simple. Tu veux copier les données de ton projet en un autre répertoire...

Tu obtiens ce répertoire via fRepSelecteur. On verra plus tard pour conserver cette valeur (.INI).

Le moteur HyperFile gère les relation fichiers logiques (analyse) / fichiers physiques (disque) via l'activation de la gestion du REP (hGereRep). Cette gestion produit un fichier texte dans le répertoire des données : .REP

C'est pouquoi j'ouvre ce dernier en lecture (fOuvre) avec les fonction fxxx pour le parcourir (fLitLigne) ligne à ligne et y récupérer ma liste de fichiers physiques (les fichiers à copier).

J'ai montré comment connaitre le répertoire des données gcRepDonnées qui varie selon les installation (normale et réseau). Il manquait le nom du projet gcNomProjet disponoble via infoProjet(pjNom).
Ce code utilise des globales projet d'où le nom de ces variables.




Contribution le : 23/02/2004 15:47
_________________
R&B
Contact, CV.
Créer un fichier PDF de la contribution Imprimer


Re: Faire des sauvegardes à partir d'un menu
Utilisateur WDF
Inscrit:
15/01/2004 11:33
De Etoile (26)
Post(s): 70
C'est AngelMJ pas AngleMJ ^_^ Enfin c'est pas grave :p

J'ai beau chercher dans l'aide, je ne trouve pas la fonction InfoProjet(). Je comprends bien ta démarche qui est de vouloir récupérer le nom du projet mais cette fonction n'existe pas ^^'

Par la suite, je vais essayer d'adapter ton code à mon projet et je te présenterai mon résultat dans tous les cas.

Quelques minutes plus tard...

Autant pour moi, ce n'est pas Infoprojet mais projetInfo :p

Bon je te tiens au courant de l'avancement de mon code.


Contribution le : 24/02/2004 09:27
Créer un fichier PDF de la contribution Imprimer


Re: Faire des sauvegardes à partir d'un menu
Utilisateur WDF
Inscrit:
15/01/2004 11:33
De Etoile (26)
Post(s): 70
Bon bon... ben ouais...eRep me renvoie toujours zéro. Donc voilà mon code tel que je les établi :

PROCEDURE Archivages()

//Tout d'abord on prend le chemin de l'emplacement où
//l'utilisateur souhaite créer le dossier d'archivage
Répertoire est une chaîne = fRepSélecteur("C:\", "Choisir un répertoire",...
"Sélectionnez le répertoire dans lequel vous désirez mettre votre dossier d'archivage : ")
//Si il n'y a rien de choisi, on arrête tout
SI Répertoire="" ALORS
  RETOUR
FIN
//Le nom du dossier prend la date
NomRep est une chaîne =DateDuJour()
Info("Le dossier d'archivage portera le nom : "+NomRep)
//On complète le nom du répertoire avec le nom d'archivage
Répertoire=Répertoire+"\"+NomRep
gProjetNom est une chaîne = ProjetInfo(piNomProjet)
//On permet de gérer le REP
HGèreREP(Vrai)
//On ferme tous les fichiers
HFerme("*")
eRep est un entier = fOuvre(gcRepDonnées+gProjetNom+".REP",foLecture)
SI eRep=-1 ALORS 
	ErreurInfo(errMessage)
	HOuvre("*")
	RETOUR
FIN
slig est une chaîne = fLitLigne(eRep)
Sablier()
// parcours le .REP à la recherche des fichier physiques du projet...
TANTQUE slig<>EOT ET slig<>""
	// ignore la ligne analyse
	SI Position(slig,"LOCALIZATION")<>0 ALORS
		// le troisième membre de la ligne est le nom physique !!! 
		Info(ExtraitChaîne(slig,3))
		fCopieFichier(eRep,Répertoire)
		// ICI lancer la copie du fichier fcopiefichier en reconstruisant la destination par modification
		//de la partie Disque/répertoire du nom obtenu avec le répertoire sélectionné via fRepSelecteur lancé
		//plus tôt 
	FIN
	//Fichier suivant
	slig = fLitLigne(eRep)
FIN
Sablier(Faux)
fFerme(eRep)
HOuvre("*")


Voilà j'attends tes impressions

Contribution le : 24/02/2004 09:58
Créer un fichier PDF de la contribution Imprimer


Re: Faire des sauvegardes à partir d'un menu
Animateur WDF
Inscrit:
26/06/2002 16:24
De wdforge.org
Post(s): 2822
Bonjour,

S'il n'y a plus que cela pour te bloquer... passe le nom de fichier en dur et tu sera tranquille :
eRep est un entier = fOuvre(gcRepDonnées+"NOMDEMONPROJET.REP",foLecture)

Contribution le : 24/02/2004 10:40
_________________
R&B
Contact, CV.
Créer un fichier PDF de la contribution Imprimer


Re: Faire des sauvegardes à partir d'un menu
Utilisateur WDF
Inscrit:
15/01/2004 11:33
De Etoile (26)
Post(s): 70
Le problème en doit pas venir de là car même en dur, eRep renvoie toujours -1 donc impossible de tester le reste du code.

Sinon il y a une erreur de synthaxe dans fCopieFichier() aussi donc j'ai du me tromper quelque part.

Le truc que je me dis c'est : c'est peut être normal qu'il me renvoie -1 car je ne vosi pas de fichier .REP dans mon dossier Exe.

Est ce que tu penses que le soucis vient de là? Sinon à quoi est du mon problème?

Merci encore pour ton aide.

Contribution le : 24/02/2004 10:53
Créer un fichier PDF de la contribution Imprimer


Re: Faire des sauvegardes à partir d'un menu
Animateur WDF
Inscrit:
02/03/2003 04:07
De Noisy le grand(93)
Post(s): 2745
Salut,
Je m'exuse d'intervenir dans ce fil de discussion, mais je ne comprends pas depuis le début pourquoi ce compliquer à lire le fichier Wdd alors qu'il existe une fonction du WLanguage qui le fait déjà!

La fonction HlisteFichier(hLstDétail) permet de renvoyer la liste des fichiers sous la forme
+TAB++TAB++TAB+

Ne serait-ce pas plus simple?

Contribution le : 24/02/2004 11:36
_________________
@A+
Contact (privé)......
email : drcharly@wdforge.org
[DrCharly93]
Créer un fichier PDF de la contribution Imprimer


Re: Faire des sauvegardes à partir d'un menu
Utilisateur WDF
Inscrit:
15/01/2004 11:33
De Etoile (26)
Post(s): 70
Ben... disons que comme je n'ai pas de grosses connaissances en WinDev d'un point de vue personnel, si quelqu'un me donne des façons de faire, je vais essayer de la suivre pour aboutir à un résultat. Je ne chercherai spas sur le coup à faire d'une autre méthode, sauf si j'arrive à assimiler le principe du code.

Ce que tu me proposes là Doc :

La fonction HlisteFichier(hLstDétail) permet de renvoyer la liste des fichiers sous la forme
<Nom Fichier1>+TAB+<Abreviation>+TAB+<Libellé>+TAB+<Nom phisique sur le disque>


Cela doit être placé ou doit remplacer quelle partie de mon code?

Contribution le : 24/02/2004 11:42
Créer un fichier PDF de la contribution Imprimer


Re: Faire des sauvegardes à partir d'un menu
ok, tu ne connais pas bien windev, mais le meilleur moyen d'apprendre c'est pas de recopier betement ce qu'on te dit.
cherche un peu. l'aide c'est fait pour ca. le guide d'auto formation peut t'aider a comprendre le fctionnement général de windev. l'aide te documentera sur l'utilisation des fonctions, te donneras la liste des fonctions permettant de gérer par prog tel ou tel objet.
la vu ta démarche, je me demande meme pourquoi tu veux programmer une appli...
tu veut pas qu'on te ponde tt le code et qu'on te l'installe chez les clients aussi? si c'est le cas passe par une société spécialisée.

cordialement

argona

Contribution le : 24/02/2004 13:36
Créer un fichier PDF de la contribution Imprimer


Re: Faire des sauvegardes à partir d'un menu
Utilisateur WDF
Inscrit:
15/01/2004 11:33
De Etoile (26)
Post(s): 70
Je suis désolé Argona si je fais passer cette impression. Ce n'était pas du tout mon but.

Bon c'est pas grave, je vais me débrouillé.

Citation :
la vu ta démarche, je me demande meme pourquoi tu veux programmer une appli...


C'est le verbe devoir qui faut utiliser à la place du verbe vouloir...

Citation :
tu veut pas qu'on te ponde tt le code et qu'on te l'installe chez les clients aussi? si c'est le cas passe par une société spécialisée.


je n'ai jamais demandé ça mais si c'est l'impression que je donne, je préfère continuer tout seul pour ne pas passer pour un fénéant à vos yeux.

merci pour l'aide que vous avez apporter depuis le début. je vous souhaite bonne continuation.

Contribution le : 24/02/2004 13:48
Créer un fichier PDF de la contribution Imprimer


Re: Faire des sauvegardes à partir d'un menu

Inscrit:
08/10/2003 15:30
De Montfort sur Argens (83)
Post(s): 209
Argona,

Si je puis me permettre, je te trouve un peu dur dans ton post. Je pense sincèrement sans prendre aucun parti que l'ambiance doit rester conviviale, même si tu dois dire quelquechose à quelqu'un, je pense qu'il y a des façons plus correctes de le faire.
Par ailleurs, ce genre de réponse agressive peut véhiculer une mauvaise image par la suite du site. Une règle d'or "Un client mécontent, c'est dix clients mécontents" (même si ici on ne gère pas des clients, le précepte reste le même).

Effectivement, peut-être qu'AngelMJ aurait du consulter un peu plus l'aide en ligne, cela dit si des personnes désirent lui donner un coup de main, je ne vois pas en quoi cela peut te poser problème.

Voilà, c'est tout ce que je voulais dire, je pense que Romu donneras son avis sur la question, mais il est vrai qu'il est préférable de parcourir un forum où tout les posts sont conviviaux, plutôt qu'un forum où chacun y va de sa petite agression.

En espérant, ne pas t'avoir froissé, je te souhaite ainsi qu'à toutes et à tous une excellente après-midi.

Contribution le : 24/02/2004 14:04
_________________
Cordialement,
Thernius
-------------------------------------------
Itanéa.com, réalisations de logiciels & créations webs......
Créer un fichier PDF de la contribution Imprimer


Re: Faire des sauvegardes à partir d'un menu
Animateur WDF
Inscrit:
02/03/2003 04:07
De Noisy le grand(93)
Post(s): 2745
Voici un bout de code simple qui te permet de faire une sauvegarde sans se soucier de connaitre ou sont stockés les fichiers ni quel est l'extension du fichier

Seuls les fichiers de données sont sauvegardés, pas les indexes, Ceux ci sont à reconstruire lors de la restauration si nécessaire avec les fonctions de réindexation.

Cette fonction attend en paramètre le répertoire source de la sauvegrade, et rtournera vrai si la sauvegarde s'est déroulement correctement ou faux si il y a eu un problème.

Un répertoire nommé créé si nécessaire contiendra les fichiers sauvegardés.

Des commentaire y sont joint pour que tu puisse mieux comprendre le fonctionnement de cette procedure.
PROCEDURE SauvegardeFichiers(pCheminBaseSauvegarde est une chaîne)
sListeFichier est une chaîne
sUnFichier est une chaîne
sProjetNom est une chaîne
i est un entier
sDate est une chaîne
sNomSauvegarde est une chaîne
sRepertoireDonnees est une chaîne
sFichierNom est une chaîne
sFichierSource est une chaîne
sFichierDestination est une chaîne

//Si une erreur intervient 
QUAND EXCEPTION
	Erreur(ErreurInfo(),HErreurInfo())
	//Pour dire que la sauvegarde ne s"est pas terminée correctement
	RENVOYER Faux
FIN

//On recupère le nom du projet
sProjetNom = ProjetInfo(piNomProjet)
//On récupère la liste des fichiers de l'analyse 
sListeFichier = HListeFichier(hLstDétail)
sDate = DateSys()

SI Droite(pCheminBaseSauvegarde,1) <> "\" ALORS
	pCheminBaseSauvegarde += "\"
FIN

// *** Creation du répertoire journalier ***
SI fRep(pCheminBaseSauvegarde+sProjetNom+sDate,frRépertoire)= "" ALORS
	SI PAS fRepCrée(pCheminBaseSauvegarde+sProjetNom+sDate) ALORS
		Erreur(ErreurInfo())
		//Sauvegarde terminée prématurément
		RENVOYER Faux
	FIN
FIN

//Boucle sur les fichiers
BOUCLE
	i++
	//On récupère les infos d'un fichier
	sUnFichier = ExtraitChaîne(sListeFichier,i,RC)
	//On sort si il n'y a plus de fichier à traiter
	SI sUnFichier= EOT ALORS SORTIR
	//On récipère le nom Physique du fichier en 3ieme position
	sFichierNom = ExtraitChaîne(sUnFichier,3)
	//On récupère sont répertoire
	sRepertoireDonnees = {sFichierNom}..Répertoire
	//Chemin complet du fichier à sauvegarder
	sFichierSource = {sFichierNom}..Répertoire+"\"+sFichierNom+{sFichierNom}..Extension
	//Chemin Complet du fichier a creer
	sFichierDestination = pCheminBaseSauvegarde+sProjetNom+sDate+"\"+sFichierNom+{sFichierNom}..Extension
	//On ferme le Fichier au cas ou
	SI PAS HFerme(sFichierNom) ALORS
		Erreur(HErreurInfo())
		//Tous les fichiers n'était pas fermés
		//Le fichier ne peut pas etre fermé alors on quitte la sauvegarde
		RENVOYER Faux
	FIN
	//On copie le fichier
	fCopieFichier(sFichierSource,sFichierDestination,frJauge)
FIN
//La sauvegarde s'est terminée correctement
RENVOYER Vrai

Contribution le : 24/02/2004 14:19
_________________
@A+
Contact (privé)......
email : drcharly@wdforge.org
[DrCharly93]
Créer un fichier PDF de la contribution Imprimer


Re: Faire des sauvegardes à partir d'un menu
Animateur WDF
Inscrit:
26/06/2002 16:24
De wdforge.org
Post(s): 2822
Un grand merci DrCharly pour avoir pris le temps de la correction de ce code... AngelMj, je te pense enfin sur la bonne voie.
Merci Thernius pour tempérer l'ambiance.

Agorna, je comprend parfaitement ce que tu a voulu exprimer. Il est vrai qu'on est dans un cas limite d'Assistance Directe et donc un peu hors propos dans ce forum. Ce traitement est exceptionnel et AngelMJ le sait. Il existe a coté des discussion privées plus apropriées mais là, plusieurs solutions étaient en concurence... on peut s'y perdre.
Tant que l'on reste sur une discussion, rien de grave, une fois fini, je peux me permettre de lui demnader de monter un dossier (doc word) en remplacement de la discussion... (c'est pas une blaque AngelMJ !) Ainsi tout le monde s'y retrouvera.

Contribution le : 24/02/2004 14:48
_________________
R&B
Contact, CV.
Créer un fichier PDF de la contribution Imprimer


Re: Faire des sauvegardes à partir d'un menu
désolée d'avoir été aussi directe AngelJm,

je trouve seulement que ta démarche n'est pas adaptée.
vu que tu commence juste a utiliser l'outil, la meilleure méthode est de d'abord essayer de manipuler l'outil avant de te lancer dans la prog de ton appli.
je le sais car j'ai débuté également et a l'époque il n'existait pas de forum windev. j'ai pas mal galéré pour comprendre les concepts et manipuler correctement l'outil.
1 ) commence par le guide de formation, il est super bien fait et te donneras déja une id du fonctionnement.*
2 ) j'ai fait un rapport de stage la dessus, si tu veux ca t'aideras p-e. je peu te le refiler ca me dérange pas. il t'aideras d'autant + si comme moi tu connais dautre langages de prog. tu pourras mieux situer ^^

hlistefichier Renvoie la liste des fichiers de l'analyse en cours ou d'une analyse spécifique reconnue par le moteur Hyper File.
donc tu peut l'utiliser a la place de parcourir le fichier '.rep' qui contient cette liste également. ca t'évite d'avoir a connaitre impérativement le chemin du fichier '.rep' vu que hlistefichier gere tout automatiquement ^^

cordialement ^^





bon courage ^^

Contribution le : 24/02/2004 15:22
Créer un fichier PDF de la contribution Imprimer


Re: Faire des sauvegardes à partir d'un menu
Utilisateur WDF
Inscrit:
15/01/2004 11:33
De Etoile (26)
Post(s): 70
Ne t'inquiètes pas Argona. Je peux tout à fait le comprendre. Je sais que ce que je demande est quand même assez "complexe" pour un débutant.

si tu veux, je suis en stage et on me demande de réaliser cette archivage. Donc je suis limité dans le temps, d'où ma demande certes un peu excessive. De plus, je risque sans doute de ne plus me servir de WinDev par la suite (car je l'ai dans l'entreprise je travaille mais pas chez moi ni à mon bahut). merci pour ta proposition de ton rapport, mais je ne pense pas que ce soit utile.

Romu, tu veux que je fasse un dossier là dessus? ben écoute, moi cela ne me pose pas de problème maintenant que je l'ai compris mais c'est quand même DrCharly qui a trouvé la réponse. Moi je n'ai fait que l'adapter à mon cas.


Bon voilà, DrCharly, j'ai adapté ton code au mien. Tout à bien marché... jusqu'à un moment où il y a une erreur sur un fichier (sur tout mon dossier, seuls 4 dossiers se sont copiées correctement).

La démarche est donc correct. J'aimerai bien savoir ce qui cause l'erreur car c'est l'exeption qui s'enclenche (la fenêtre d'erreur est vide).

Voici mon code tel qu'il marche avec l'endroit où l'erreur s'enclenche en gros caractères. Elle marche 4 fois pui sça bloque :

PROCEDURE Archivages()

//Variables locales
sUnFichier est une chaîne
sFichierNom est une chaîne
sFichierSource est une chaîne
sFichierDestination est une chaîne
sRepertoireDonnees est une chaîne
i est un entier
//Si une erreur intervient 
QUAND EXCEPTION
	Erreur("Une erreur est intervenu lors de l'archivage des fichiers.","L'opération a été annulée.")
	//Pour dire que la sauvegarde ne s"est pas terminée correctement
	retour
//FIN
//Tout d'abord on prend le chemin de l'emplacement où
//l'utilisateur souhaite créer le dossier d'archivage
Répertoire est une chaîne = fRepSélecteur("C:\", "Choisir un répertoire",...
"Sélectionnez le répertoire dans lequel vous désirez mettre votre dossier d'archivage : ")
//Si il n'y a rien de choisi, on arrête tout
SI Répertoire="" ALORS
  RETOUR
FIN
//Le nom du dossier prend la date
NomRep est une chaîne =DateDuJour()
Info("Le dossier d'archivage portera le nom : "+NomRep)
//On complète le nom du répertoire avec le nom d'archivage
Répertoire=Répertoire+"\"+NomRep
//On récupère le nom du projet
gProjetNom est une chaîne = ProjetInfo(piNomProjet)
//On récupère la liste des fichiers
sListeFichier est une chaîne = HListeFichier(hLstDétail)
//Création du répertoire journalier
SI fRep(Répertoire,frRépertoire)= "" ALORS
	SI PAS fRepCrée(Répertoire) ALORS
		Erreur(ErreurInfo())
		//Sauvegarde terminée prématurément
		RETOUR
	FIN
FIN
//On change le curseur
Sablier()
//Boucle sur les fichiers
BOUCLE
	i++
	//On récupère les infos d'un fichier
	sUnFichier = ExtraitChaîne(sListeFichier,i,RC)
	//On sort si il n'y a plus de fichier à traiter
	SI sUnFichier= EOT ALORS SORTIR
	//On récupère le nom Physique du fichier en 3ème position
	sFichierNom = ExtraitChaîne(sUnFichier,3)
	//On récupère son répertoire
        //L'ERREUR S'ENCLENCHE ICI 
	SREPERTOIRESDONNEES = {SFICHIERNOM}..REPERTOIRE
	//Chemin complet du fichier à sauvegarder
	sFichierSource = {sFichierNom}..Répertoire+"\"+sFichierNom+{sFichierNom}..Extension
	//Chemin Complet du fichier a creer
	sFichierDestination = Répertoire+"\"+sFichierNom+{sFichierNom}..Extension
	//On ferme le Fichier au cas ou
	SI PAS HFerme(sFichierNom) ALORS
		Erreur(HErreurInfo())
		//Tous les fichiers n'était pas fermés
		//Le fichier ne peut pas etre fermé alors on quitte la sauvegarde
	FIN
	//On copie le fichier
	fCopieFichier(sFichierSource,sFichierDestination,frJauge)
FIN
Sablier(Faux)
Info("La sauvegarde des fichiers s'est correctement effectuée.")


J'ai bien enlevé ce qu etu m'as dis mais l'erreur ne vient pas de là. Cependant, il faudra bien sortir de cette boucle un jour... je cherche pendant ce temps une fonction me permettant de savoir combien il y a de fichiers (enfin si ça existe :p).

Contribution le : 24/02/2004 15:39
Créer un fichier PDF de la contribution Imprimer



 Haut   Précédent   Suivant
« 1 (2) 3 »




Enregistrer votre réponse
CompteNom   Mot de passe   Authentification
Message:


Vous ne pouvez pas débuter de nouveaux sujets.
Vous pouvez voir les sujets.
Vous ne pouvez pas répondre aux contributions.
Vous ne pouvez pas éditer vos contributions.
Vous ne pouvez pas effacez vos contributions.
Vous ne pouvez pas ajouter de nouveaux sondages.
Vous ne pouvez pas voter en sondage.
Vous ne pouvez pas attacher des fichiers à vos contributions.
Vous ne pouvez pas poster sans approbation.

[Recherche avancée]


Connexion
Menu
Chercher WDForge
Chercher Web
Partenaires
Visualiser tous les Partenaires...
WinDev, WebDev, WinDev Mobile et HyperFile sont des marques déposées par PCSoft. |  Voter |  Legal |  Contact |   XOOPS 2.0.13.2