Résultat d'une requeteRésolu

Question

je veux ecrire dans un fichier txt le r&#233;sultat de ma requete mais j'ai un probl&#232;me avec la valeur 'null'.
Voici mon code :
    If RecOracle.Fields(IndBoucle) = Null Then
              FIC.write ("Null" + ";")
     Else
              FIC.write (RecOracle.Fields(IndBoucle) + ";")
     End If

Ce code ne marche pas si quelqu'un &#224; une id&#233;e. Merci d'avance.

Microsux · Accepted Answer

Bizarre.
J'ai teste vite fait d'ecrire dans un fichier txt le resultat renvoye par la fonction date() et ca ne pose pas de probleme.
A tout hasard essaie FIC.write (cstr(RecOracle.Fields(IndBoucle) )+ ";") mais meme,si le type n'etait pas valide tu aurais une erreur de compilation.
Es-tu sur que ton champs RecOracle.Fields(IndBoucle) contient bien une valeur?Car si il est vide (pas null, vide) c'est normal qu'il n'y aie rien dans le fichier et cela sans generer d'erreur.
Sinon je vois po..

PtitGrumo · Answer

Tien voila ca devrai marcher 

If isNull(RecOracle.Fields(IndBoucle)) Then
              FIC.write ("Null" + ";")
Else
              FIC.write (RecOracle.Fields(IndBoucle) + ";")
End If

Voila sinon ca aussi ca marche et ca tien en une seul ligne

FIC.write (IIf(isNull(RecOracle.Fields(IndBoucle)), "Null" , cStr(RecOracle.Fields(IndBoucle)))+ ";")

++

PtitGrumo

SOCGEN77 · Answer

Merci,
j'ai un autre probl&#232;me mais cette fois si avec une date.

FIC.write (RecOracle.Fields(IndBoucle) + ";") = renvoi (31/12/2005)

merci d'avance

Microsux · Answer

elle fait quoi ta fonction renvoi?

SOCGEN77 · Answer

j'ai un autre probl&#232;me mais cette fois si avec une date.

FIC.write (RecOracle.Fields(IndBoucle) + ";")

il ne veut pas ecrire dans mon fichier une date

Merci &#224; tous

Résultat d'une requete

5 réponses

Discussions similaires