Discussion :

[xeron33]

Bonjour à tous,
J'aurais besoin d'affecter une valeur vide pour un champ numérique, j'ai essayé avec Nz mais je n'y arrive pas.
J'ai réglé le problème en partie avec

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
c2SQL = "UPDATE Tab_Seance SET Tab_Seance.bilan_ID = null WHERE (((Tab_Seance.bilan_ID)=0));"

Mais si quelqu'un sait comment faire avec Nz ou autre fonctions Merci de me renseigner

[EricDgn]

Bonjour,

Le libellé de la requête est correct. Le problème vient du champ bilan_ID.

Si bilan_ID est une clé NuméroAuto, il ne peut prendre la valeur Null.

Si bilan_ID est un nombre, il faut vérifier que dans la table il n'y est pas indiqué "Null interdit".

Cordialement.

[xeron33]

Merci pour ta réponse, bilan_ID est une clé étrangère d'une table Bilan donc pas NuméroAuto, en fait le problème vient que si je ne créé pas de Bilan je veux que dans la table Séance bilan_ID soit vide pas nul, pas 0 car 0 ne fonctionne pas car Clé primaire bilan_ID dans la table Bilan (NumAuto),mais vide, comme j'ai dis la requête

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

c2SQL = "UPDATE Tab_Seance SET Tab_Seance.bilan_ID = null WHERE (((Tab_Seance.bilan_ID)=0));"

fait l'affaire mais je voudrais savoir comment le faire avec une fonction comme Nz car je n'y suis pas arrivé... Est ce possible ? Car l'affectation

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

WDER_Cle_Bilan = Null

ne fonctionne pas.
Voilà si tu as une idée MERCI

[EricDgn]

Bonjour

La partie bilan_ID = NULL n'est certainement pas le problème. C'est admis si le champ bilan_ID peut prendre la valeur NULL.

Ce qui pose problème est le WHERE bilan_ID=0 car théoriquement il n'y a dans la table Bilan pas de ID=0 (la numérotation automatique commençant par 1). Aussi, comment ce bilan_ID a-t-il été mis à 0 ? Normalement cela entraine une erreur de le mettre à 0 s'il est lié à l'ID de la table Bilan.

Cordialement.

[xeron33]

Aussi, comment ce bilan_ID a-t-il été mis à 0 ? Normalement cela entraine une erreur de le mettre à 0 s'il est lié à l'ID de la table Bilan.

***********************************
Bonjour et merci pour ton aide
Pour répondre à ta question, bilan_ID est mis à 0 quand je fais pas de bilan :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
Dim WDER_Cle_Bilan As Long
c2SQL = "insert into [Tab_Seance]([Nom_Seance],[Patient_ID],[Bilan_ID]) values ('" & WNom_Seance & "'" & "," & WCle_Patient & "," & WDER_Cle_Bilan & ");"
  DoCmd.RunSQL c2SQL
  c2SQL = "UPDATE Tab_Seance SET Tab_Seance.bilan_ID = null WHERE (((Tab_Seance.bilan_ID)=0));"
  DoCmd.RunSQL c2SQL

WDER_Cle_Bilan est mis par défault à 0 et aucune ligne n'est insérée dans la table Bilan
Si tu as des infos notament sur Nz MERCI
Volià A+

[EricDgn]

Bonjour,

En fait dans le cas présent si une variable, en l'occurrence WDER_Cle_Bilan, n'a pas été initialisée, celle-ci n'est pas "null" mais "vide" (empty). Ceci devrait donc fonctionner:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Dim WDER_Cle_Bilan As Long
 
Debug.Print IsMissing(WDER_Cle_Bilan), IsNull(WDER_Cle_Bilan), IsEmpty(WDER_Cle_Bilan), WDER_Cle_Bilan  = Empty
 
c2SQL = "INSERT INTO Tab_Seance (Nom_Seance, Patient_ID, Bilan_ID)" & _
       " VALUES ( '" & WNom_Seance & "', " & WCle_Patient & ", " & _
       IIF(WDER_Cle_Bilan=Empty, "NULL", "WDER_Cle_Bilan" & ");"
 
debug.print c2SQL
 
DoCmd.RunSQL c2SQL

les Debug.Print n'étant là qu'à titre temporaire, juste pour voir ce qui se passe.

Bonne continuation.