Vb6
Bonjour,
s'il te plait je veut savoir comment extraire des donnees entre 2 date
le code est:
Dim t As New Recordset
'-------------controler les champs a saisie
If IsDate(Text1) = False Or Text1.Text = "" Then
MsgBox ("veuiller saisir la période"), vbOKCancel
Text1.SetFocus
End If
t.Open ("select * from facture where date_fac between #01/01/2008#and#31/12/2008#"), b, 1, 2
Set DataGrid1.DataSource = t
ce que je tapez la date il affiche tous les dates
je veut par exemple extraire les donnees de la période entre01/01/2008 et 01/02/2008
c'est urgent
coordialement
s'il te plait je veut savoir comment extraire des donnees entre 2 date
le code est:
Dim t As New Recordset
'-------------controler les champs a saisie
If IsDate(Text1) = False Or Text1.Text = "" Then
MsgBox ("veuiller saisir la période"), vbOKCancel
Text1.SetFocus
End If
t.Open ("select * from facture where date_fac between #01/01/2008#and#31/12/2008#"), b, 1, 2
Set DataGrid1.DataSource = t
ce que je tapez la date il affiche tous les dates
je veut par exemple extraire les donnees de la période entre01/01/2008 et 01/02/2008
c'est urgent
coordialement
Configuration: Windows XP Internet Explorer 7.0
6 réponses
-
Contributeurje pense que je comprend, à la place de CVDate essaye avec CSrtr
-
oui deja fais
mais il affiche seulement qui commence par le jour 11 -
des dates
par exemple periode du 01/02/2008 et 11/05/2008
c ca ce que je veut
merci -
Contributeurtu rentre quoi dans le textbox ?
-
dans ce contexte il affice seulement qui commence a le jour 11
-
Contributeurbonjour,
essaye avec...
t.Open ("select * from facture where date_fac between #01/01/2008#and#" & CVDate(texte1.text)) & "#"), b, 1, 2
A+
