Discussion :

[sabweb]

Bonjour,
Nouvelle sur le forum, je bloque sur une appli pour la boite dans laquelle je fais mon stage, je m'explique :

Cette appli est destinée aux clients pour qu'ils consultent les plans (pdf) des pièces détachées de leur véhicule.
Le responsable veut le moins de choses à faire possible par le BE, juste "balancer" les fichiers dans un dossier pour un ensemble de numéros chassis.
Et mon problème se situe là :
Je récupère les 4 derniers caractères du numéro de chassis qui permettent l'identification du véhicule et je dois les comparer aux noms des dossiers dans lesquels se trouvent les pdf et qui peuvent avoir comme nom : 0001 - 0004 ou 0005, c'est à dire soit un ensemble de numéro de chassis soit un chassis uniquement. Et je n'arrive pas à trouver comment faire (et si c'est possible !) pour comparer ma variable récupérée et mes noms de dossier...
Merci d'avance de votre aide.
sabweb

[mogwai162]

ben pour avoir des noms de dossier tu peux utiliser la fonction frep.

[klbsjpolp]

Regarde les expressions régulières, elles te permettraient de classer les type de répertoire pour que l'extraction des données soit plus facile. Après il ne te restera plus qu'à enregistrer dans ta structure de données.

[sabweb]

Merci à tous !
j'ai réussi à faire ce que je voulais avec toutes les infos et d'autres !
mon code donne cela :

//Récupération du premier chemin de répertoire existant
gsNomDossierLu = SansEspace(ExtraitChaîne(gsListeDossiersLus,rangPremier,RC,DepuisDébut))
//Extraction du nom du répertoire dans le premier chemin de répertoire existant
gsChassisLu = SansEspace(ExtraitChaîne(gsNomDossierLu,1,"\",DepuisFin))
//Récupération du second chemin de répertoire existant
gsNomDossierLu2 = SansEspace(ExtraitChaîne(gsListeDossiersLus,rangSuivant, RC, DepuisDébut))
//Extraction du nom du répertoire dans le second chemin de répertoire existant
gsChassisLu2 = SansEspace(ExtraitChaîne(gsNomDossierLu2,1, "\", DepuisFin))

//Test pour savoir dans quel répertoire aller
BOUCLE
// Si mon numéro de dossier est inférieur ou égal ET second numéro de dossier est supérieur ou égal au numChassis client alors
SI gsChassisLu <= gsNumChassis ET gsChassisLu2 >= gsNumChassis ALORS
//Si mon second numéro de dossier est supérieur à mon NumChassis client alors je vais dans mon premier numéro de dossier
SI gsChassisLu2 > gsNumChassis ALORS
// Je vais sur mon 4ème plan de fenêtre
FEN_RECH_PIECE..Plan = 4
// et j'ouvre le pdf correspondant dans le dossier correspondant
HTM_AffichagePDF = gsNomDossierLu + "\" + gsNomPDF
//Et je mets mon booléen a vrai pour sortir de ma boucle
TestDossierTrouvé = Vrai
//Sinon je vais dans mon second numéro de dossier
SINON
// Je vais sur mon 4ème plan de fenêtre
FEN_RECH_PIECE..Plan = 4
// et j'ouvre le pdf correspondant dans le dossier correspondant
HTM_AffichagePDF = gsNomDossierLu2 + "\" + gsNomPDF
//Et je mets mon booléen a vrai pour sortir de ma boucle
TestDossierTrouvé = Vrai
FIN
//Sinon je change de numéro de dossier
SINON
//Le second dossier du traitement devient le premier par un échange
gsNomDossierLu <=> gsNomDossierLu2
gsChassisLu <=> gsChassisLu2
//Je récupère le chemin suivant du répertoire existant
gsNomDossierLu2 = SansEspace(ExtraitChaîne(gsListeDossiersLus,rangSuivant, RC, DepuisDébut))
//J'extrait le nom du répertoir dans le chemin suivant du répertoire existant
gsChassisLu2 = SansEspace(ExtraitChaîne(gsNomDossierLu2,1, "\", DepuisFin))
//Si le numéro de répertoire est égal à la fin du fichier
SI gsChassisLu2 = EOT ALORS
//Je met mon dernier numéro de répertoire à 9999 pour qu'il soit toujours plus grand
gsChassisLu2 = "9999"
FIN
FIN

A FAIRE TANTQUE TestDossierTrouvé = Faux


Et je clôture la discussion puisque mon problème est résolu !