Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Access Code SQL erroné?

Code SQL erroné?

4 réponses
Avatar
sruojlim
Bonjour au groupe
Quelque chose dans le code suivant ne fonctionne pas et malgré mes efforts
et à cause de mes connaissances limitées nonobstant une éducation certaine
d'autre part...bref finalement, je n'arrive pas à mettre le doigt sul bobo!

Pouvez-vous m'aidez?

Peut-etre que je ne suis pas dans le bon newsgroup, peut-etre que je
n'utilise pas la bonne formulation, peut-etre que le code qui suit n'est pas
assez clair mais peut-etre qu'ici-bas il y-a un bon samaritain qui pourrait
apporter un peu d'eau à mon moulin.

Merci à tous

c o d e d e f e c t u e u x.........
_________________________________________________________
DateMoisDernier = Now() - 30
AuteurRecherche = "MonAuteur"
tableBook.CursorType = adOpenKeyset
tableBook.LockType = adLockOptimistic
tableBook.Open _
"SELECT * FROM [Book] WHERE ((([Book].[Auteur]) = " & AuteurRecherce & ")
AND _
" ([Book].[DateAcquisition]) >= DateMoisDernier ) ", db, , , -1
If tableBook.RecordCount >= 1 Then
'Traitement des volumes répertoriés
'...
End If
tableBook.Close
___________________________________________________________


Jean-Marc
Signaler un problème avec ce contenu

4 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Gilbert
Bonjour,
Je pense que ton erreur vient de la date
Essayes avec :

"SELECT * FROM [Book] WHERE ((([Book].[Auteur]) = " & AuteurRecherce & ")
AND _
" ([Book].[DateAcquisition]) >= #" & DateMoisDernier & "# ) "

Attention dans une requête SQL la date doit être au format US (mm/dd/yyyy)
Tu devrais donc utiliser
DateMoisDernier = Format(Now() - 30, "mm/dd/yyyy")

--
Gilbert


"sruojlim" a écrit dans le message de news:
6WKLd.964$
Bonjour au groupe
Quelque chose dans le code suivant ne fonctionne pas et malgré mes efforts
et à cause de mes connaissances limitées nonobstant une éducation certaine
d'autre part...bref finalement, je n'arrive pas à mettre le doigt sul
bobo!

Pouvez-vous m'aidez?

Peut-etre que je ne suis pas dans le bon newsgroup, peut-etre que je
n'utilise pas la bonne formulation, peut-etre que le code qui suit n'est
pas assez clair mais peut-etre qu'ici-bas il y-a un bon samaritain qui
pourrait apporter un peu d'eau à mon moulin.

Merci à tous

c o d e d e f e c t u e u x.........
_________________________________________________________
DateMoisDernier = Now() - 30
AuteurRecherche = "MonAuteur"
tableBook.CursorType = adOpenKeyset
tableBook.LockType = adLockOptimistic
tableBook.Open _
"SELECT * FROM [Book] WHERE ((([Book].[Auteur]) = " & AuteurRecherce &
") AND _
" ([Book].[DateAcquisition]) >= DateMoisDernier ) ", db, , , -1
If tableBook.RecordCount >= 1 Then
'Traitement des volumes répertoriés
'...
End If
tableBook.Close
___________________________________________________________


Jean-Marc



Avatar
Gafish
Bonjour,

Quand tu dis ca ne marche pas, tu as un message d'erreur ? Si oui dis nous,
ca nous aidera
Je vois plusieurs choses ici :

((([Book].[Auteur]) = " & AuteurRecherce & ")

Déja je ne sais pas si c'est une faute de frappe, mais il manque un 'h' à
AuteurRecherche.
Sinon vu que c'est du texte, il faut l'entourer de guillemets simples '
comme suit :

((([Book].[Auteur]) = ' " & AuteurRecherce & " ' )

(en enlevant les espaces que j'ai mis expres pour des questions de
lisibilité entre ' et ")

Arnaud


"sruojlim" a écrit dans le message news:
6WKLd.964$
Bonjour au groupe
Quelque chose dans le code suivant ne fonctionne pas et malgré mes efforts
et à cause de mes connaissances limitées nonobstant une éducation certaine
d'autre part...bref finalement, je n'arrive pas à mettre le doigt sul
bobo!


Pouvez-vous m'aidez?

Peut-etre que je ne suis pas dans le bon newsgroup, peut-etre que je
n'utilise pas la bonne formulation, peut-etre que le code qui suit n'est
pas

assez clair mais peut-etre qu'ici-bas il y-a un bon samaritain qui
pourrait

apporter un peu d'eau à mon moulin.

Merci à tous

c o d e d e f e c t u e u x.........
_________________________________________________________
DateMoisDernier = Now() - 30
AuteurRecherche = "MonAuteur"
tableBook.CursorType = adOpenKeyset
tableBook.LockType = adLockOptimistic
tableBook.Open _
"SELECT * FROM [Book] WHERE ((([Book].[Auteur]) = " & AuteurRecherce &
")

AND _
" ([Book].[DateAcquisition]) >= DateMoisDernier ) ", db, , , -1
If tableBook.RecordCount >= 1 Then
'Traitement des volumes répertoriés
'...
End If
tableBook.Close
___________________________________________________________


Jean-Marc




Avatar
sruojlim
Merci Gafish
Je vais tenter tes suggestions fort intéressantes et si ca ne marche pas
toujours comme souvent c'est bien le cas, j'essaierai de trouver le code SQL
exact dans une requete.

Merci pour tes pistes et ta célérité prodigieuse
jean-marc

"Gafish" a écrit dans le message de news:

Bonjour,

Quand tu dis ca ne marche pas, tu as un message d'erreur ? Si oui dis
nous,
ca nous aidera
Je vois plusieurs choses ici :

((([Book].[Auteur]) = " & AuteurRecherce & ")

Déja je ne sais pas si c'est une faute de frappe, mais il manque un 'h' à
AuteurRecherche.
Sinon vu que c'est du texte, il faut l'entourer de guillemets simples '
comme suit :

((([Book].[Auteur]) = ' " & AuteurRecherce & " ' )

(en enlevant les espaces que j'ai mis expres pour des questions de
lisibilité entre ' et ")

Arnaud


"sruojlim" a écrit dans le message news:
6WKLd.964$
Bonjour au groupe
Quelque chose dans le code suivant ne fonctionne pas et malgré mes
efforts
et à cause de mes connaissances limitées nonobstant une éducation
certaine
d'autre part...bref finalement, je n'arrive pas à mettre le doigt sul
bobo!


Pouvez-vous m'aidez?

Peut-etre que je ne suis pas dans le bon newsgroup, peut-etre que je
n'utilise pas la bonne formulation, peut-etre que le code qui suit n'est
pas

assez clair mais peut-etre qu'ici-bas il y-a un bon samaritain qui
pourrait

apporter un peu d'eau à mon moulin.

Merci à tous

c o d e d e f e c t u e u x.........
_________________________________________________________
DateMoisDernier = Now() - 30
AuteurRecherche = "MonAuteur"
tableBook.CursorType = adOpenKeyset
tableBook.LockType = adLockOptimistic
tableBook.Open _
"SELECT * FROM [Book] WHERE ((([Book].[Auteur]) = " & AuteurRecherce &
")

AND _
" ([Book].[DateAcquisition]) >= DateMoisDernier ) ", db, , , -1
If tableBook.RecordCount >= 1 Then
'Traitement des volumes répertoriés
'...
End If
tableBook.Close
___________________________________________________________


Jean-Marc








Avatar
sruojlim
Merci Gilbert
Quelle efficacité dans la vitesse nucléaire de ton appareil à neurones. Je
tente et retente. Sinon, je me créerai une requête pour découvrir ce que ça
a de l'air en SQL.
Merci


"Gilbert" a écrit dans le message de news:

Bonjour,
Je pense que ton erreur vient de la date
Essayes avec :

"SELECT * FROM [Book] WHERE ((([Book].[Auteur]) = " & AuteurRecherce & ")
AND _
" ([Book].[DateAcquisition]) >= #" & DateMoisDernier & "# ) "

Attention dans une requête SQL la date doit être au format US (mm/dd/yyyy)
Tu devrais donc utiliser
DateMoisDernier = Format(Now() - 30, "mm/dd/yyyy")

--
Gilbert


"sruojlim" a écrit dans le message de news:
6WKLd.964$
Bonjour au groupe
Quelque chose dans le code suivant ne fonctionne pas et malgré mes
efforts et à cause de mes connaissances limitées nonobstant une éducation
certaine d'autre part...bref finalement, je n'arrive pas à mettre le
doigt sul bobo!

Pouvez-vous m'aidez?

Peut-etre que je ne suis pas dans le bon newsgroup, peut-etre que je
n'utilise pas la bonne formulation, peut-etre que le code qui suit n'est
pas assez clair mais peut-etre qu'ici-bas il y-a un bon samaritain qui
pourrait apporter un peu d'eau à mon moulin.

Merci à tous

c o d e d e f e c t u e u x.........
_________________________________________________________
DateMoisDernier = Now() - 30
AuteurRecherche = "MonAuteur"
tableBook.CursorType = adOpenKeyset
tableBook.LockType = adLockOptimistic
tableBook.Open _
"SELECT * FROM [Book] WHERE ((([Book].[Auteur]) = " & AuteurRecherce &
") AND _
" ([Book].[DateAcquisition]) >= DateMoisDernier ) ", db, , , -1
If tableBook.RecordCount >= 1 Then
'Traitement des volumes répertoriés
'...
End If
tableBook.Close
___________________________________________________________


Jean-Marc