Discussion :

[totoff80]

Code :

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

1
2
3
4
5
6
7
8
9
10
 
var
F,D:string;
i : integer;
begin
D:=datetostr(Dt_du.Date); //Dt_Du:DateTimePicker1
F:=datetostr(dt_au.Date) ;//dt_au:DateTimePicker2
ADoQuery1.filter:='JM_Date>='''+D+'''and EC_Jour>= LIKE ''' + Edit3.Text + '%''and JM_Date<='''+F+'''and EC_Jour<= LIKE ''' + Edit16.Text + '%''';
ADoQuery1.filtered:=True;
ADoQuery1.First;

[zemeilleurofgreg]

between

[totoff80]

A quel moment mettre le between

[zemeilleurofgreg]

Code :

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

select * from table where champdate between date1 and date2

[totoff80]

Code :

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

1
2
3
4
 
ADOQuery1.Active := false ;
ADOQuery1.SQL.Text :='select * from dbo_F_ECRITUREC where JM_date between Dt_du and dt_au';
ADOQuery1.Active := true ;

ça ne marche pas

[zemeilleurofgreg]

qu'est ce que tu as comme message ?
utilises tu un format date pour le between ?

[ShaiLeTroll]

Code :

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

1
2
3
4
 
ADOQuery1.Active := false ;
ADOQuery1.SQL.Text :='select * from dbo_F_ECRITUREC where JM_date between Dt_du and dt_au';
ADOQuery1.Active := true ;

ça ne marche pas

Ben, c'est curieux dans ton exemple de code, tu avais bien fait tes concats de chaine (...'''+D+''' ...), et regresse dans ce dernier exemple comme si tu avais oublié tes bases ... mais sinon paramètres ...

Code :

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

1
2
3
4
5
6
 
ADOQuery1.Active := false ;
ADOQuery1.SQL.Text :='select * from dbo_F_ECRITUREC where JM_date between :dt_du and :dt_au';
ADOQuery1.ParamByName('dt_du').AsDateTime := Dt_du.Date;
ADOQuery1.ParamByName('dt_au').AsDateTime := Dt_au.Date;
ADOQuery1.Active := true ;

[totoff80]

"erreur" identificateur non declarer ParamByName

[freud]

Bonjour,

Il te manque Parameters :

Code :

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

1
2
 
ADOQuery1.Parameters.ParamByName

Et il te manque les deux points des parametres dans ta chaine:

Code :

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

1
2
 
'select * from dbo_F_ECRITUREC where JM_date between Dt_du and dt_au';

Code :

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

1
2
3
4
5
6
7
 
ADOQuery1.Active := false ;
ADOQuery1.Connection:=ADOConnection1;
ADOQuery1.SQL.Text:='select * from dbo_F_ECRITUREC where JM_date between :Dt_du and :dt_au';
ADOQuery1.Parameters.ParamByName('Dt_du').value:= Dt_du.Date;
ADOQuery1.Parameters.ParamByName('dt_au').value:= Dt_au.Date;
ADOQuery1.Active := true ;

[ShaiLeTroll]

"erreur" identificateur non declarer ParamByName

Avant de poster, pense toujours à faire
Fouille dedans, j'ai pour ma part passer des heures à fouiller dedans, à chercher la petite bête (eh oui, l'aide est parfois incomplète ou mal traduite), ...

[zemeilleurofgreg]

Fouille dedans, j'ai pour ma part passer des heures à fouiller dedans, à chercher la petite bête (eh oui, l'aide est parfois incomplète ou mal traduite), ...

comme le dit ShaiLeTroll, l'aide est parfois imcomplète mais elle peut servir à poser de meilleures questions sur ce forum !!

[totoff80]

"Type de données incompatible dans l'expression du critère"