Pb d'envoi de requete via un TADOQuery à une BD access

ma requete est celle ci :

Code:

---

1 2 3

SELECT * FROM film WHERE Durée <= #12/30/1899 1:25:0#;

---

je l'ai bien mis dans la propriete de mon TADOQuery la connexion ce fait correctement puisque j'arrive tout a fait a faire toutes mes autres requete !

pour cette requete il me dit :

Code:

---

Objet Parameter défini de manière incorrecte. Des informations incohérentes ou incomplètes ont été fournies.

---

J'ai tester cette requete directement sous ACCESS no pb mais des que je veux la faire executer par l'ADO problème !

je pense que ca vient du format de ma durée mais je ne sais pas comment passé !!! :( quelqu'un aurait-il la solution ???

Merci d'avance :wink:

le plus simple avec les formats datetime c'est d'utiliser un paramètre et de le charger avant de faire la requête.

Code:

---

1 2 3

SELECT * FROM film WHERE Durée <= #12/30/1899 1:25:0#;

---

devient

Code:

---

1 2 3

SELECT * FROM film WHERE Durée <= :LADUREE;

---

et avant de faire ta requête :

Code:

---

MaRequete.ParamByName('LADUREE').AsDateTime := <la date et l'heure>;

---

merci Merlin mais j'ai po reussi j'ai du mal a comprendre ! :roll: en fait j'ai un objet qui genere ma requete dynamiquement et l'une de me methode est :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

procedure class_Requete.modifieDuree(duree, choixDeDuree: string); var signe:string; begin if choixDeDuree = 'au moins' then signe := '>='; if choixDeDuree = 'égal' then signe := '='; if choixDeDuree = 'au plus' then signe := '<='; fnPrincipale.RecherchePrecise.ParamByName('LADUREE').AsDateTime := '12/30/1899 '+duree+':0'; // Self.duree := 'AND film.Durée '+signe+' #12/30/1899 '+duree+':0#'; // Ici ma 1er tentative desesperée Self.duree := 'AND film.Durée '+signe+' :LADUREE'; end;

---

et apres une autre methode envoi et fait executer la requete !!! mais lorsque j'ecris :

Code:

---

fnPrincipale.RecherchePrecise.ParamByName('LADUREE').AsDateTime := '12/30/1899 '+duree+':0';

---

il me dit erreur car il ne connait pas la methode ParamByName de l'objet RecherchePrecise [TADOQuery] !!!

Voilà peux tu me dire où j'ai loupé le coche ?

Well..

Bon, quand tu génères ta requête, il faut aussi générer le paramètre..
DOnc après les signes (=, <= etc) tu dois mettre le param, par exemple :DUREE (les deux points sont importants et sont collés au nom).

Ensuite, tu dois dans la foulée donner la valeur, pour ça il faut bien entendu utiliser les params de l'objet de requête.
Avec un TQUery c'est ParamByName, avec un TADOQuery c'est parameters.ParamValue['LADUREE'] := now; (par exemple).
Vérifie par F1 le nom exact j'ai un petit doute, mais c'est comme ça qu'il faut faire.

Excusez moi du temps qui est passé pas eu le temps de me repenché dessus ! :P
J'ai donc reussi à générré une requete qui ne fait pas planter l'application :bravo:, :p mais elle ne fonctionne toujours pas, cad elle ne me renvoi aucun resultat alors je ne sais pas si c'est ma requete qui ne correspond pas a ma recherche ou ...
Donc ce code fonctionne ;o)

Code:

---

1 2 3

fnPrincipale.RecherchePrecise.Parameters.ParamValues['DUREE'] := duree; qsdduree := 'AND Durée > :DUREE';

---

Mais si j'affiche la requete qui est executer j'ai :

Code:

---

...AND Durée > :DUREE ORDER BY ...

---

Y aurai t'il possibilité de voir la requete sous toute ca forme qui est envoyé à ma base Acces ?