Discussion :

[toxicoakatox]

Bonjour,

je travail avec delphi et une table paradox
et je veux mettre une requet sql derière un boutton
pour afficher dans un dbgrid tous les enregistrement
du mois courant.
merci

[SergioMaster]

Bienvenu sur le forum

une des règles de base pour pouvoir répondre à une question c'est d'avoir les informations nécessaires !

sans boule de cristal comment peut t-on répondre a une question pareille ?
c'est bien beau d'avoir un table Paradox (moi j'en ai des tonnes, mais pas une seule avec des dates ) .

sérieusement sans indiquer la description de la table comment veux-tu raisonnablement obtenir une réponse ? et c'est pas le urgent qui y changera quoique ce soit ! il me semble qu'il existe une fonction extract , voila la seule piste que je puisse donnée dans l'etat actuel des choses

[Zizou7]

Mon cher ami, fait une requete parametrée qui sur un objet Tquery.
Dans ta requete SQL que tu écriras le Select de tous les champs dont tu as besoin. Sur la date tu mets les paramatres.
Exemple: Date between :ddatemin and :ddatemax;
Tu écrits ensuite derrière le bouton le code d'exécution.
Là où tu n'as pas compris tu me demanderas.
Merci.
On ne peut expliquer que ce qu'on connaît.
Zizou7

[toxicoakatox]

bonjour
c une table avec plusieurs champs Nom, Prenom, Note et enfin Dateajout que j'ai declarer date
donc je veux afficher tous les user qu'on a ajouter pendant le mois courant
Merci

ps:S.V.P si vous ne savez connaissez pas la réponse évitez des commentaires inutiles Merci!!

[SergioMaster]

en évitant tout commentaires inutiles

Code :

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

SELECT DISTINCT NOM,PRENOM FROM LATABLE WHERE EXTRACT(MONTH FROM DATEAJOUT)=:MOIS

[toxicoakatox]

Merci de ta reponse mais j'ai essayer comme ca et ca n'a pas marcher

Code :

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

1
2
3
4
5
Qtache.Close;
Qtache.Sql.Clear;
Qtache.Sql.Add('Select DISTINCT * from histo');
Qtache.Sql.Add('Where Extract (Month from Dateajout):='+emois.text); //et j'ai essayer sans les ":" et ca n'a pas marcher aussi
Qtache.Open;

[NABIL74]

salut,

Essaye ça :

Code :

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

1
2
3
4
5
6
Qtache.Close;
Qtache.SQL.Clear;
Qtache.SQL.Add('select * from histo');
Qtache.SQL.Add ('where extract(month from Dateajout)= '''+emois.text+'''');
Qtache.Open;
// "Edit1" aura la valeur "10" (à titre d'exemple) ce qui correspond au mois d'OCTOBRE

NABIL74

[youhibadelphi]

salut nabil
pourquoi pas utilser un filtre entre deux date?

[toxicoakatox]

merci NABIL74 mais ca ne marche pas

[anapurna]

salut

il manque un espace entre histo et where

Code :

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

1
2
3
4
Qtache.Close;
Qtache.SQL.Clear;
Qtache.SQL.Add(format('SELECT DISTINCT * FROM LATABLE WHERE EXTRACT(MONTH FROM DATEAJOUT)=%d ',[mois]));
Qtache.Open;

@+ Phil

[toxicoakatox]

merci anapurna
mais ça ne marche pas c énervant!!!!!!!!!!!

[Aka Guymelef]

Ce serait bien de savoir qu'est-ce qui ne marche pas. Quel est le message d'erreur ?

[toxicoakatox]

re

Code :

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

1
2
3
4
5
6
7
procedure Tfgesttache.BtdemandeeClick(Sender: TObject);
begin
Qtache.Close;
Qtache.SQL.Clear;
Qtache.SQL.Add('SELECT * FROM histo WHERE extract(MONTH FROM Date)='+emois.text);
Qtache.Open;
end;

et voici le message d'erreur

[Aka Guymelef]

Le nom de colonne Date doit provoquer un conflit avec un mot réservé, change le nom de la colonne Date dans la table.

[toxicoakatox]

re
un grand merciiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiii a toi Aka Guymelef c été ca mon soucis
et un merci aussi au autres qui on essayer de trouver la solution et big up a vous tous

[NABIL74]

salut,

Content pour toi toxicoakatox !

Le code que je t'ai filé marche. je viens de le tester avec la BD : "DBDEMOS":

Code :

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

1
2
3
4
5
Qtache.Close;
Qtache.SQL.Clear;
Qtache.SQL.Add('select * from clients');
Qtache.SQL.Add ('where extract(month from DATE_OPEN)= '''+emois.text+'''');
Qtache.Open;

Bonne chance

Nabil74