PC SOFT

FOROS PROFESIONALES
WINDEVWEBDEV y WINDEV Mobile

Inicio → WEBDEV 2024 → En Test OK, en prod marche pas...
En Test OK, en prod marche pas...
Iniciado por paul.gera, 07,may. 2005 01:13 - 4 respuestas
Publicado el 07,mayo 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
Publicado el 09,mayo 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 !
Publicado el 09,mayo 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!
Publicado el 09,mayo 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
Publicado el 11,mayo 2005 - 09:39
Bonjour,

Alors qu'en dites vous ?

Merci

PAUL