PC SOFT

FORUMS PROFESSIONNELS
WINDEVWEBDEV et WINDEV Mobile

Accueil → WEBDEV 2024 → En Test OK, en prod marche pas...
En Test OK, en prod marche pas...
Débuté par Paul, 07 mai 2005 01:13 - 4 réponses
Posté le 07 mai 2005 - 01:13
Bonsoir,

Le code suivant marche très bien en test mais pas un prod...
Quelqu'un voit il pourquoi ???

nIdFic est un entier
sMaChaîne est une chaîne

// Ouverture du fichier
nIdFic = fOuvre(fRepEnCours()+"\SOS\test.txt", foLectureEcriture)
SI nIdFic=-1 ALORS
Erreur("L'ouverture du fichier a échoué", ErreurInfo())
SINON
// Première ligne
sMaChaîne = fLitLigne(nIdFic)
FicTest.Nom=ExtraitChaîne(sMaChaîne,2,TAB,DepuisDébut)
HAjoute(FicTest)
TANTQUE sMaChaîne<>EOT
// Ligne suivante
sMaChaîne = fLitLigne(nIdFic)
FicTest.Nom=ExtraitChaîne(sMaChaîne,2,TAB,DepuisDébut)
HAjoute(FicTest)
FIN

// Fermeture du fichier
fFerme(nIdFic)
FIN
Posté le 09 mai 2005 - 12:45
bjr, il semble que ton code soit parfaitement juste, seulement c'est quoi ton pb ? details le plus :)

P.S :
personnellement je n'utilise pas la fonction fLitLigne() car si le fichier est mal concu elle ne trouve pas la fin de la ligne (RC).

donc j'utilise la fonction flit() et je fourni le nombre d'octets a lire. bien sur chaque lignes de mes fichiers textes font la meme taille ce qui ne pose plus aucun pb. dans ton cas je ne sais pas si c'est tjs la meme taille mais au cas ou !
Posté le 09 mai 2005 - 15:55
Salut,

En fait, il enregistre la première ligne convenablement... mais la deuxième
s'inscrit mal... et les autres lignes pas du tout!
Posté le 09 mai 2005 - 20:18
Le fichier txt se présente comme ca (pour le test)

[Design] [ChiffreNumérique]
UN 1
DEUX 2
TROIS 3
QUATRE 4

Et quand j'exécute le code sur le serveur, seule la première ligne
s'enregistre ; la seconde est "-" dans la Design.

Vous voyez ce que je veux dire ?

Paul
Posté le 11 mai 2005 - 09:39
Bonjour,

Alors qu'en dites vous ?

Merci

PAUL