Discussion :

[levasseur62]

bonjour,

je crois que tout est dans le titre j'utilise mysql et je voudrais extraire le jour,mois,années de la colonne "DATEDEBUTPREV" dans ma table réservation qui est de type "DATE",je fais ceci mais il m'affiche toujours le même chiffre "30" et non la date, voici mon code

Code :

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

1
2
3
4
5
6
7
8
9
10
11
sql3 = "
Dim db As DAO.Database
Set db = OpenDatabase("", dbDriverComplete, False, "ODBC;DSN=MYSQL;UID=root;PWD=;Database=campingabl")
Dim sql1, sql2, sql3, sql4, sql5 As String
Dim rs1, rs2, rs3, rs4, rs5 As DAO.Recordset
Dim cp As String
Dim cpt, n, v As Integer
 
SELECT Day(DATEDEBUTPREV) FROM réservation WHERE (NUMRES) = " & 3 & " "
Set rs3 = db.OpenRecordset(sql3)
MsgBox Day(DATEDEBUTPREV)

Merci

[ProgElecT]

Drole de code
Cela devrait plutôt ressembler à

Code :

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

1
2
3
4
5
6
7
8
9
10
11
Dim sql1 As String, sql2 As String, sql3 As String, sql4 As String, sql5 As String
Dim rs1 As DAO.Recordset, rs2 As DAO.Recordset, rs3 As DAO.Recordset, rs4 As DAO.Recordset, rs5 As DAO.Recordset
Dim cp As String
Dim cpt As Integer, n As Integer, v As Integer
Dim db As DAO.Database
 
Set db = OpenDatabase("", dbDriverComplete, False, "ODBC;DSN=MYSQL;UID=root;PWD=;Database=campingabl")
 
sql3 = "SELECT Day(DATEDEBUTPREV) FROM réservation WHERE (NUMRES) = " & 3 & " "
Set rs3 = db.OpenRecordset(sql3)
MsgBox Day(DATEDEBUTPREV)

bien que la requête Sql3 ne me semble pas des plus orthodoxe.

Code :

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

sql3 = "SELECT " & Day(DATEDEBUTPREV) & " FROM réservation WHERE NUMRES = " & 3 ' ?????

DATEDEBUTPREV et NUMRES sont ils des champs de la table réservation ?

[levasseur62]

Oui tu as raison pour le code j'ai oublié de le relire

DATEDEBUTPREV et NUMRES sont bien dans la table réservation,

lorsque je veux extraitre le jour de DATEDEBUTPREVU j'ai toujours le numéro 30 qui ressort alors que dans ma tables réservation il n'y a pas de numéro 30,
idem lorsque je veux extraire l'année il m'affiche "1899"

[levasseur62]

il n'existe pas une autre possibilité d'extraire le jour d'une autre maniére?

[ProgElecT]

j'ai bien compris que DATEDEBUTPREV était le champ Date dans ta table, mais à quoi correspond NUMRES dans cette même table?
Select permet de ne recuperer que les champs souhaités, WHERE permet de ne sélectionner que les enregistrements suivant une/des conditions.
Peut être que

Code :

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

sql3 = "SELECT DATEDEBUTPREV FROM réservation WHERE Day(DATEDEBUTPREV) = 3"

est ce que tu cherches, il te sera renvoyé tous les enregistrements dont le jour est égal au troisième jour d'un mois quelconque.

[levasseur62]

NUMRES est le numéro de réservation ;

je souhaite récupérer le jour de la colonne DATERESERV ou le numéro de réservation est 3 tout ceci se passe dans une seule table.

ex: dans mas tables réservation il ya numeroderéservation = 3 .... et datereserv=2011-10-09 , je voudrais récupérer juste le jours du champs datereser qui est "09"

[SfJ5Rpw8]

de quel type est ton champ : datereserv ..? j'ai l'impression qu'il n'est pas de type date mais de type chaine ....

[levasseur62]

Mon champs est bien de type date :/ ,j'utilise phpmyadmin et j'ai ceci

DATERES date Oui NULL

[ProgElecT]

Donc le Select doit être fait sur datereserv, le where sur numeroderéservation = 3.
Par la suite tu extrais le jour

Code :

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

 jour =  Day(rs3!DATERESERV)

[levasseur62]

bien vu , la solution est :

Code :

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

1
2
3
4
5
6
Set db = OpenDatabase("", dbDriverComplete, False, "ODBC;DSN=MYSQL;UID=root;PWD=;Database=campingabl")
 
sql3 = "SELECT DATERES FROM réservation WHERE (NUMRES) = " & 3 & " "
 
Set rs3 = db.OpenRecordset(sql3)
Text1 = Year(rs3!DATERES)

Merci