Bonjour Mes fichiers sont HFCS. Par le code ci dessous, je vérifie l'existence par la fonction, HFichierExiste(), de mes fichiers dans le répertoire "Dossier", mais toujours il m'adit que le fichier <nomfichier> est introuvable. Sachant que mes fichiers sont déjà existe dans le dossier dans le centre . HChangeConnexion("*",MaConnexion) HChangeRep("*",Dossier) HPasse("*",MotPasse) HOuvreConnexion(MaConnexion) HCréationSiInexistant('*',hOuvertureDifférée) sListeFichier = HListeFichier(DossierAnalyse,hLstDétail+hLstTriée) sFichier =ExtraitChaîne(sListeFichier,I,RC) TANTQUE sFichier<>EOT NomFichier= ExtraitChaîne(sFichier,1) SI HFichierExiste(MaConnexion,NomFichier)=Vrai ALORS trace(NomFichier) sinon trace("Introuvable") fin I++ NomFichier = ExtraitChaîne(sListeFichier, I, RC) fin Merci de me donner une piste
Vu que tu fais HCréationSiInexistant('*',hOuvertureDifférée) tu n'as pas besoin de ta procédure avec HFichierExiste après .. windev se charge de tout.