Lecture d'un fichier texte incompréhensible
Bonjour,
je teste un composant forms (6i ) dont l'une des fonctions est la lecture d'un fichier .dat avec une seule ligne comportant un littéral alpha-numérique. Ce dernier sert à valoriser le titre d'une fenêtre...
Mon problème :
- quelque soit la valeur de ce littéral, le titre de la fenêtre est toujours affiché avec une même valeur : par exemple, je mets "azerty" dans le .dat, le titre de la fenêtre est "wxcvbn" !
- si le fichier .dat n'existe pas (par exemple, je le renome), le titre de la fenêtre est toujours affiché avec la valeur "wxcvbn" alors que l'erreur devrait être gérée d'après le code !!
Code:
1 2 3 4 5 6 7 8 9
|
BEGIN
in_file := TEXT_IO.fopen('c:\unfic.dat', 'r');
EXCEPTION
WHEN NO_DATA_FOUND THEN
message('Erreur sur les données du fichier ''c:\unfic.dat'''); pause;
WHEN OTHERS THEN
message('erreur 2 ' || ' code : ' || TO_CHAR(sqlcode) || ' ' || sqlerrm); pause;
END; |
:weird:
Si vous avez une idée, je suis preneur...Merci.