Query sur une date dont le champ est text ( access ) en asp

**hysteresis** · 25/10/2005, 11h07

Bonjour les people !!

Comment allez vous en cet automne pluvieux ??

Ptite question : J'aimerais faire une requete sur une date dans ma page asp, le problème est que le champs date dans ma table access est de type Text et que j'ai un peu de mal a faire un tri ascendant et une selection sur une année bien précise !!!

J'ai du mettre mon champs date en type text car l'insert et l'update via asp ne fonctionne pas sinon .... quelqu'un a t il une idée sur le comment faire un tri sur mon champs date de format ( JJ/MM/AAAA ) ???

Par exemple classé par année ??

Merchiii

**pc75** · 25/10/2005, 11h31

Bonjour,

Tu peux déjà transformer ton champ texte en format date

Code :

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

1
2
 
MaDate = format(LaDate("dd/mm/yyyy")

Ensuite, tu peux utiliser les fonctions suivantes

Code :

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

1
2
3
4
 
Annee = Year(MaDate)
Mois = Month(MaDate)
Jour = Day(MaDate)

**hysteresis** · 25/10/2005, 13h27

en asp ca ce traduit comment ??

le truc c'est que j'aimerais faire un select * from matable where ...ORDER BY date ..mais il me classe mes date selon les jours croissant !! et non les année ??

**pc75** · 25/10/2005, 13h53

Re,

Et avec un ORDER BY Year(MaDate) ?

**hysteresis** · 27/10/2005, 10h36

Merci Year(date) fonctionne mais j'ai un message d'erreur : type mismatch dans ma requete sql ??

( Mon champs date dans ma table access est de type " text " )

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
 
 
Annee = Request.form("annee")
Annee = cint(Annee)
 
Fonctionselect = Trim(Request ("Choix"))
 
 
 
DIM oRS
Set oRS = Server.CreateObject("ADODB.RecordSet")
oRS.Open "SELECT tblPers.IDMatricule, tblPers.NOM, tblPers.Prenom, tblPers.Departement, tblEncodage.IDFormation, tblEncodage.Date, tblFormation.Formation FROM tblFormation INNER JOIN (tblPers INNER JOIN tblEncodage ON tblPers.IDMatricule = tblEncodage.IDMatricule) ON tblFormation.IDFormation = tblEncodage.IDFormation WHERE tblpers.Sortie is Null AND [Formation] LIKE '" &Fonctionselect & "' AND Year([Date])= "&Annee ,Connexion
%>

**pc75** · 27/10/2005, 10h56

Re,

Change cette partie :

Code :

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

1
2
 
..... AND cStr(Year([Date]))= .....

**hysteresis** · 27/10/2005, 11h00

Invalid use of Null

**pc75** · 27/10/2005, 11h56

Re,

Trois choses :

1 Tu as un champ nommé Date => ce ne serait pas un mot réservé ?

2 Si ton champ Date est de type texte, il manque des quotes

Code :

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

1
2
 
AND Year([Date])= '" & Annee & "'"

3 Que te donne ça ?

Code :

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

1
2
3
4
 
txtSQL = "SELECT tblPers.IDMatricule, tblPers.NOM, tblPers.Prenom, tblPers.Departement, tblEncodage.IDFormation, tblEncodage.Date, tblFormation.Formation FROM tblFormation INNER JOIN (tblPers INNER JOIN tblEncodage ON tblPers.IDMatricule = tblEncodage.IDMatricule) ON tblFormation.IDFormation = tblEncodage.IDFormation WHERE tblpers.Sortie is Null AND [Formation] LIKE '" &Fonctionselect & "' AND Year([Date])= '" & Annee & "'"
 
Response.Write txtSQL

A+

**hysteresis** · 27/10/2005, 12h01

Microsoft OLE DB Provider for ODBC Drivers (0x80040E07)
[Microsoft][ODBC Microsoft Access Driver] Data type mismatch in criteria expression.
/BDF/index.asp, line 67

J'ai changé le nom de mon champs date en ddate mais rien ne fait...marche po

**Immobilis** · 27/10/2005, 12h04

Salut,
Il existe aussi la fonction CDATE() qui converti une chaine en date si elle est bien formée.
http://www.w3schools.com/Vbscript/func_cdate.asp

A+