Discussion :

[thiouwz2]

Bonjour,

je travaille sous delphi 7 avec une base de donnée sql server.

je cherche à affecter une valeur NULL dans une requête parametrée

Code :

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

1
2
3
4
5
6
7
8
9
10
 
  with DmMain.ReqInsertDefaut do
  begin
    Active := False;
    if EdIdentifiant.Text <> '' then
      Parameters[0].Value := EdIdentifiant.Text
    else
      Parameters[0].Value := ????;
    Active := True;
  end;

Les '?' représentent l'endroit où je voudrais affecter la valeur NULL.

Est-ce que c'est possible ? Et si oui comment ?

Merci

[Zatoobux]

Salut

Peut etre :

Code :

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

Parameters[0].Value := 'NULL';

Ca fonctionne bien en SQL.

@+

[thiouwz2]

Le problème dans ta solution, c'est que tu affectes la chaine de caractères 'NULL' au paramètre mais pas la valeur NULL.

Mais merci quand même

[MAMMAR]

j'ai vu dans l'aide qu'une methode d' affecter le null et de lui appliquer

Code :

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

1
2
 
clear

Maintenant je ne sais pas si

Code :

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

1
2
 
Parameters[0].clear

fonctionne.
Avis aux amateurs.

A+

[lper]

Le code suivant doit fonctionner :

Code :

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

1
2
 
Parameters[0].Value := null;

[thiouwz2]

MAMMAR:
La fonction clear ne fonctionne pas dans mon cas. Merci de ton aide.

Iper:
Le token 'null' n'est pas reconnu, il doit certainement me manquer une classe que je n'ai pas importer, si tu la connais peux-tu me la donner Merci.

Autres Informations:
J'ai tester avec la constante vaNull dans l'unité Classes, mais cela insére le chiffre 0 au lieu de la valeur null.
Pour détourner le système, j'ai mis un champs Required a True sur mon EditBox. Ce choix solutionne le problème puisqu'il interdit l'insertion de la chaine vide ou de la valeur null, mais cette solution est ennuyeuse car la protection se fait par le logiciel et non le SGBD.

[lper]

Désolé, je ne suis pas sur de ma réponse mais il me semble que c'est réservé au type variant.

[MAMMAR]

tu peux essayer ceci

Code :

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

1
2
3
4
5
6
7
8
9
10
 
with DmMain.ReqInsertDefaut do 
  begin 
    Active := False; 
    if EdIdentifiant.Text <> '' then 
      Params.Parambyname('nom_parametre').asstring := EdIdentifiant.Text 
    else 
      Params.Parambyname('nom_parametre').clear 
    Active := True; 
  end;

A+