requête SQL avec paramètre en vb avec base de donnée SQL srv

Salut

SVP, aidez moi à utiliser mon parametre dans ma requête sql suivante:

Code:

---

1 2 3

"SELECT Utilisateur, Profil, DateConnection AS [Date de Connexion], HeureConnection AS [Heure de Connexion]" _ & " From T_Journal WHERE (DateConnection > CONVERT(DATETIME, '" & DTPDebut.Value & "', 102) AND DateConnection < CONVERT(DATETIME, '" & DTPFin.Value & "', 102))" _ & " ORDER BY DateConnection DESC , HeureConnection DESC"

---

Ps: je suis en vb6.0 et la base de donnée en sql serveur.
DTPFin.Value ==contenu d'un Data picker.


merci d'avance

[ Balise CODE ajoutée par ridan ]
[ Pensez-y à l’avenir. Merci :wink: ]

Slt dialydany, est ce que tu peux etre un peu plus explicite car la je n ai pas compris grand chose :?

Essaye ça :

Code:

---

1 2 3

"SELECT Utilisateur, Profil, DateConnection AS [Date de Connexion], HeureConnection AS [Heure de Connexion]" _ & " From T_Journal WHERE (DateConnection > ' " & CONVERT(DATETIME, DTPDebut.Value , 102) & "' AND DateConnection < '"& CONVERT(DATETIME, DTPFin.Value , 102) &"' )" _ & " ORDER BY DateConnection DESC , HeureConnection DESC"

---

voici ce que j'avais fait et qui fonctionnait .

Code:

---

1 2 3 4

Set RS = New ADODB.Recordset ' RS.Open "SELECT Utilisateur, Profil, DateConnection AS [Date de Connexion], HeureConnection AS [Heure de Connexion]" _ ' & " From T_Journal WHERE (((DateConnection >= # " & DTPDebut.Value & " # ) And (DateConnection <= #" & DTPFin.Value & " # ) ))" _ ' & " ORDER BY DateConnection DESC , HeureConnection DESC", DataEnv1.CnnA, adOpenDynamic, adLockPessimistic

---

mais c'était avec une base de donnée Access.

Mais quand j'ai attaqué la base SQL serveur il rejet les "#". mon problème c'est que je ne sais pas comment faire pourque la requête marche. Merci encore une fois de votre aide.

CONVERT n'est pas une méthode VB, c'est une méthode SQL et je te conseille ce code pour que ta reqûete fonctionne quelques soient les paramètres de Windows et la langue de ton SQL Server (103: dd/mm/yyyy)

Code:

---

1 2 3 4 5

s = "SELECT Utilisateur, Profil, DateConnection AS [Date de Connexion], HeureConnection AS [Heure de Connexion]" & _ " From T_Journal" & _ " WHERE (DateConnection > CONVERT(DATETIME,'" & Format(DTPDebut.Value, "dd/mm/yyyy") & "', 103)" & _ " AND DateConnection < CONVERT(DATETIME,'" & Format(DTPFin.Value, "dd/mm/yyyy") & "' , 103) )" & _ " ORDER BY DateConnection DESC , HeureConnection DESC"

---

merci beaucoup.

ça fonctionne cinq sus cinq.

merci encore une fois.