Discussion :

[formidable78]

Bonjour à tous,

J'ai un petit souci avec le code ci-dessous.
La ligne avec la commande openrecordset ne veut pas s'éxécuter et je ne vois pas pourquoi !!! J'ai un message d'erreur qui dit erreur de syntaxe dans la clause from alors que cette ligne fonctionne dans une autre base que j'ai déjà créé.

Quelqu'un a-t-il un avis sur la question ???

Merci beaucoup pour votre aide

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
 
Private Sub Form_Open(Cancel As Integer)
 
DimRstOld As DAO.Recordset
Dim Filtre As String
 
Filtre = Forms![F-Menu]!adresse_offre.Value 'on filtre l'enregistrement que l'on veut modifier
 
Set Db = CurrentDb
 
Set RstOld = Db.OpenRecordset("SELECT * FROM T-Offres WHERE adresse =" & Chr(34) & Filtre & Chr(34), dbOpenDynaset)

[marot_r]

essaye :

Code :

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

Set RstOld = Db.OpenRecordset("SELECT * FROM T-Offres WHERE adresse =""" & Filtre & """", dbOpenDynaset)

A+

[formidable78]

Bonjour Marot,


Malheureusement cette ligne ne fonctionne pas non plus.

ce qui est bizarre, c'est que même quand je fais une selection toute simple (comme ci-dessous) ça ne fonctionne pas non plus.

Penses-tu que cela puisse être un problème de DAO ou autre comme j'ai déjà dans des postes ??

Code :

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

1
2
3
 
 
Set RstOld = Db.OpenRecordset("SELECT * FROM T-Offres, dbOpenDynaset)

[loufab]

Bonjour Marot,


Malheureusement cette ligne ne fonctionne pas non plus.

ce qui est bizarre, c'est que même quand je fais une selection toute simple (comme ci-dessous) ça ne fonctionne pas non plus.

Penses-tu que cela puisse être un problème de DAO ou autre comme j'ai déjà dans des postes ??

Code :

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

1
2
3
 
 
Set RstOld = Db.OpenRecordset("SELECT * FROM T-Offres, dbOpenDynaset)

Bonjour,

Il te manque une double cote après Offres et avant la virgule.

Cordialement,

[formidable78]

Effectivement, il manquait bien une double cote, mais même après cette correction, l'instruction ne fonctionne toujours pas

Je ne vois vraiment pas ce qui ne fonctionne pas....

Loifab, penses-tu que cela puisse être lié à la définition des variables ou aux bibliothèques ou autes....????

Je ne sais pas dans quelle direction chercher.

[marot_r]

Je m'apperçois que tu n'as pas typé ta variable DB.

Essaye en ajoutant :

Code :

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

dim db as dao.database

nomralement CurrentDB est une DAO.Database mais il se peut que Access se croise les yeux.

A+

[Jack78960]

salut à tous,
essaie

Code :

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

Set RstOld = Db.OpenRecordset("SELECT * FROM [T-Offres] WHERE adresse =" & Chr(34) & Filtre & Chr(34), dbOpenDynaset)

le - peut géner la clause from : dans le doute, on protège les caractères spéciaux par []

[formidable78]

Salut Jack,

Nickel, merci pour ta réponse ça fonctionne !!! Youpi !!!

Un grand merci