syntax vb pour modifier la valeur d'un champs texte

:resolu::resolu:Bonjour à tous, alors voilà je travail sur une base ms-access j'ai actuellement un champs rempli par une requête. Ce que je voudrai faire si possible, c'est de modifier le contenu de ce champs si la requête revient null.

en gros lancer une deuxième requête si la première est null et attribuer le resultat de cette dernière dans mon champs.

j'espère que ma question est assez clair....

Merci d'avance.

bye

Re bonjour alors j'ai trouvé quelque chose en lisant des FAQ mais je ne sais pas trop coment adapter la syntax....

If Monchamps.text = "0" Then
Monchamps.text = Ma2èmerequête MON CHAMPS

COMMENT INDIQUER LE NOM DE LA REQUETE ?

MERCI D'avance

alors voilà 'ai une syntax mais elle ne semble pas fonctionner....

avez vous une idée?

If Texte205 = "" then
Texte205 = Texte207


donc je me dis dans ma petite tête de débutant en vb que si le champs Texte205 est null alors il prend la valeur du champs Texte207 mais çà ne fonctionne pas....

merci d'avance

Je ne suis pas sur de la réponse mais essaye

Code:

---

1 2 3 4

If (Me.Texte205 = "" )then Me.Texte205 = Me.Texte207.Value End If

---

En théorie ca devrait marcher. Si ça ne marche pas, essaye de passer par une variable intermediaire du genre:

Code:

---

1 2 3 4 5 6

dim Var as String If (Me.Texte205 = "" )then Var = Me.Texte207 Me.Texte205 = Var End If

---

Essaie avec ...

Code:

---

1 2	If IsNull(Texte205) then Texte205 = Texte207

---

Petite suggestion ....

Pour facilité l'entretient futur de votre application, vous devriez donner des noms significatifs à vos contrôles.
;)

D'ailleurs pour être sûr qu'un champs est vide tu peux faire:

Code:

---

1 2 3 4

If IsNull(Me.Texte205) Then Ton traitement End If

---

Edit: Rofl devancé sur mon edit :D

bon alors déjà merci pour vos réponses.

ensuite effectivement c'est pas le top de laisser des champs nommés Texte205 ou autre mais là c juste pour le test.

je viens d'essayer en suivant la syntax suivante:

If (Me.Texte205 = "" )then
Me.Texte205 = Me.Texte207.Value
End If

mais çà ne fonctionne pas.

je teste la suite.

merci encore

la syntax avec la variable ne fonctionne pas non plus....

je précise aussi que actuellement le champs Texte207 est un champs indépendant et qu'il est rempli par une valeur par défaut "test"

Bonjour !
Est-ce que la requête qui alimente ton control se trouve dans la source (Propriété | onglet "Données" | Source) ?

actuellement non puisqu'il s'agit d'un champs indépendant pour faire le test mais après oui.

parcontre je viens d'avance un peu. c'est avec le If qu'il semble y avoir un pb car si je fais

Me.texte205 = Me.Texte207.value

çà fonctionne. mais si je fais

If Me.Text205 = Null Then
Me.Texte205 = Me.Texte207.value
End If

et çà ne fonctionne pas.

alors la syntax qui fonctionne pour moi est la suivante:


If IsNull (Me.Text205) Then
Me.Text205 = Me.Texte207.value
End If


Voilà.

merci encore pour votre aide car en faisant un mix de toutes vos syntax et bien çà fonctionne!!

merci

Vu que tu as ta réponse, il serait approprié que tu cliques sur le bouton :resolu: ;)

voilà c'est fait.

merci