Discussion :

[VBBBA]

bonjour a tous

jai un pti soucis avec une ligne de code

voici la ptite bete

Code :

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

1
2
 
Set r = CurrentDb.OpenRecordset("SELECT FROM [Bases_Pb_Backup] WHERE [Nom Base] =" & TextBase)

TextBase étant une souce d'un formulaire
et le message d'erreur est ( runtime error 3141)
ca beugue....de l'aide svp

[lyxthe]

euh logiquement faut lui dire ce que tu Selectione parce qu'il peut pas le deviner. enfin je crois. En eseperant ne pas dire de bétises Donc Select qqchose From ...:p

[nath-0-0]

Code :

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

1
2
 
Set r = CurrentDb.OpenRecordset("SELECT FROM [Bases_Pb_Backup] WHERE [Nom Base] ='" & TextBase &"'")

c'est peu lisible , mais faudrait que tu entoures ton texte d'apostrophes...

[guigui11]

euh logiquement faut lui dire ce que tu Selectione parce qu'il peut pas le deviner. enfin je crois. En eseperant ne pas dire de bétises Donc Select qqchose From ...:p

En effet si tu veux que ta requête te retourne des valeurs alors spécifie lui un champ pour critère de sélection (ex : SELECT * FROM TaTable)

[VBBBA]

Code :

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

1
2
 
 Set r = CurrentDb.OpenRecordset("SELECT FROM [Bases_Pb_Backup] WHERE [Nom Base] =" & TextBase)

voila le code corrigé mais ca ne marche toujours pas

le but etant que je selectionne la ligne de la table [Bases_Pb_Backup]

qui a pour valeur TextBase dans le champ [Nom Base]

[Pitou5464]

Code :

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

= '" & textbase & "'"

a la fin si textbase est un control style une zone de texte

sinon

Code :

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

= 'textbase'

si textbase est un texte en parametre

[guigui11]

Essaye ceci :

Code :

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

Set r = CurrentDb.OpenRecordset("SELECT * FROM [Bases_Pb_Backup] WHERE [Nom Base] ='" & TextBase &"'")

[lyxthe]

Et ben met Select Nom_Base From......etc...

[VBBBA]

Ca marche. Merci les Gars. Vraiment un grand merci