Salut à tous,
j'ai l'habitude d'access et quand je veux transposer une requete simple dans VB2005 il n'en veux pas.
Pouvez m'aider à traduire ceci :
SELECT tickets.DATE
FROM tickets
WHERE (((tickets.DATE)=Left(Date(),6) & Right(Date(),2)));
Merci
Manu

RECTIFICATION !!!
il me trouve mon resultat mais me dit avant
Erreur dans la clause WHERE à côté de ')'.
Impossible d'analyser le texte de la requête.

salut,

bon, on va la refaire pour bien se comprendre

j'ai l'habitude d'access et quand je veux transposer une requete simple dans VB2005 il n'en veux pas.
access, la base de donnée, et VB2005 pour l'IDE.
ok donc déjà c'est pas en VBA access? pour être certain..
je pose la question parce qu'en attendant tu as classé en VB6

• Vous êtes ici : Thèmes / Visual Basic 6 / Base de données / SQL / REQUETE SIMPLE AVEC CRITERE DATE DU JOUR

donc on va supposer DOTNET.... (VB2005)

SELECT tickets.DATE
FROM tickets
= Sélection enregistrement(s) du champ DATE (malin le mot ché en nom...) de la table TICKETS, OK

WHERE (((tickets.DATE)=Left(Date(),6) & Right(Date(),2)));
QUAND ......
Left -> n'existe pas en DotNet
Right -> n'existe pas en DotNet
Date() -> n'existe pas en DotNet
Date() -> si VB6 ou VBA, peut ne pas correspondre au format "DD/MM/YYYY" auquel tu t'attends
Left(Date(),6) & Right(Date(),2))) -> SI on avait bien une date "comprise/classique", le retour serait un variant chaine contenant 20/06/08 (pour aujourd'hui).
=> es-tu certain du format/masque attendu?
=> pas DD/MM ou MM/DD ? (ok ce n'est pas le message d'erreur)
=> un variant ou un String pour une Date ?

masque ou pas, un champs date reste un champs date

pour rester avec ta fonction Date() :

"SELECT tickets.DATE " & _
"FROM tickets " & _
"WHERE tickets.DATE = '#" & Date() & "#';"

çà devrait aller un peu mieux ^^
++

---

Prenez un instant pour répondre à ce sondage svp

Héhé plus simple :
"SELECT tickets.DATE " & _
"FROM tickets " & _
"WHERE tickets.DATE = Now()"
_______________________________________________________________________
VB.NETis good ...VB6is better

plus simple oui.... mais incorrect

Ah bon, pourquoi ? (mystifié)
_______________________________________________________________________
VB.NET is good ... VB6 is better

Dim S As String
S = 1 ' pas d'erreur POUR AUTANT

parce qu'une requête attend une syntaxe plus accrue que VB6 ! (pas envie de dé-mystifier ce soir)

Hé pourtant ça fonctionne (testé sous Access 2003)
_______________________________________________________________________
VB.NET is good ... VB6 is better

S = 1 aussi

si çà marche chez toi alors c'est que çà doit être bon...
félicitations

(désolé si je suis un peu sec, je n'ai rien contre toi. pour recadrer, même si ton code fonctionne chez toi, c'est faux.)

j'vais quand même pousser le vice pour dire d'être "limite" un peu plus constructif, mais uniquement pour notre manurelais...

SELECT tickets.DATE
FROM tickets
WHERE (((tickets.DATE)=Left(Date(),6) & Right(Date(),2)));

manu aurait pu enlever ses première et dernière " pour l'exemple, mais pas ceux pour la date....

il envoie dont TEL QUEL des fonctions VB (6 ou .NET) vers ACCESS qui évidemment ne les connait pas

---

Prenez un instant pour répondre à ce sondage svp