J'ai une appli qui se connecte à une base access via ADO.
je fais une requête sur une table qui me ramène un enregistrement. J'utilise les champs de cet enregistrement pour remplir des textboxs. Le problème est que quand l'un des champs de l'enregistrement dans la base est vide, tous les champs du recordset qui m'est retourné sont vides. Comment faire ?

 
exellent tu fais du ACCESS via ADO sous VB!
comme moi!
 
par contre je peux pas t'aider.. chez moi quand un champ été vide, ça me faisait planter l'appli..

Bon ben deja je peux me dire que ça pourrait être pire

montre ta requête, ça m'a l'air bien zarb ton truc.

mon code ressemble à peu près à ça :

Un seul des champs retournés par la requête est vide (vérifié dans la bdd), mais toutes mes textbox sont vides....

1) si tu veux faire un test sur la valeur Null, préfère la fonction IsNull.
2) il se peut qu'une erreur interrompt l'exécution de ce code, t'as  essayé l'exécution en pas à pas?
3) je suppose que c'est la requête que tu as essayée directement?

1) Ok
2) Si je ne teste pas le Null, j'ai une erreur au moment d'affecter la valeur. Comme je n'ai plus l'erreur maintenant, je pensais que ça tournait. Je vais essayer.
3) C'est à dire ?

En fait, le Null ne peut être associé qu'à des variables de type Variant (c'est le cas de la propriété Value mais pas de la propriété Text qui est de type String). Si t'essaies quand même: plantage. On ne fait jamais de comparaison avec Null mais on passe par la fonction IsNull (qui prendra la propriété .Value en paramètre), cfr FAQ.
 
Pour la requête, ben l'exécuter directement en mode GUI et voir le résultat de manière plus pratique avant de le faire dans le code

D'accord ,je le note.
La requête oui c'est bien celle là que j'ai passé dans Access.
Bon ; prochain épisode demain.

Remplace :
 
if .Fields(i).Value <> Null Then Text1(i).Text = .Fields(i).Value
 
Par :
 
Text1(i).Text = "" & .Fields(i).Value
 
Et zou
 
Quand VB fait chier, faut être plus con que lui

 
 
   
 
 

 
 
 
pas con!!!  
 

 
bien dit

Bon en fait avec IsNull() ça marche.

y'a encore plus simple :
 
Text1(i).Text = nz( .Fields(i).Value , "" )
 
nz est une fonction qui teste si la valeur est nulle et dans ce cas remplace la valeur Null par ce qu'on lui passe en paramètre (ici : "" )
 
nz sert jutement à éviter ce genre de problème.
 
     4get9

Je connaissais pas, tiens...noté!

nz ==> mot clé introuvable ?

 
nz est une instruction de base d'Access !
 
il se peut qu'elle n'existe pas dans VB
 
A mon avis Nz etait indispensable à Access, bcp de pb sont résolu avec Nz, avec l'habitude on met partout ! :-D
 
pour info Nz peux être très utile,  
exemple : pour un tri de date si on veux que les champs non renseignés soient en dernier il suffit de faire : nz(Champs_Date,"31/12/2089" ) on est pas obligé de mettre "" comme paramètre.

ah ouais clairement c'est du Access, je connaissais même pas
m'étonne que mon chef n'en ait jamais fait mention vu comment il encensce Access
 
edit: au fait le bricolage de MagicBuzz j'aime pas trop parce que tout ce qui a trait aux chaînes de caractères bouffent un temps fou en VB (mon chef en a appris quelque chose )