voici la requête que je n'arrive pas à valider sous VB, elle concerne une base access:
 
Code SQL access
SELECT FPROCHE.REF_DVD, FPROCHE.NOM_FICHIER, FPROCHE.THEMES
FROM FPROCHE
WHERE (((FPROCHE.THEMES)="hebdo" ));
 
sql normal:
SELECT REF_DVD, NOM_FICHIER, THEMES
FROM FPROCHE
WHERE THEMES="hebdo";
 
VB: ??
 
Merci
 

c'est bon j'ai trouvé
 
requete = "SELECT * FROM Fproche WHERE THEMES LIKE ""hebdo"""

et comment remplaver l'objet de la requête par une variable qui se rapporte à un e texte box ? (genre moteur de recherche)
 
merci je sais je suis chiant avec mes questions, mais grace à vos réponses et en fouillant dans les archives du forum j'avance progressivement

salut
 
Dim tavariable As String
tavariable = worksheets("TaFeuille" ).TextBox.Value
requete = "Select * FROM Fproche WHERE THEMES LIKE "tavariable""
 
essaie ca

tafeuille c'est quoi au juste ?  
Pour la syntaxe  le LIKE "tavariable"" ne fonctionne pas, et si je fais LIKE ""tavariable""" il ne considère plus la variable mais la chaîne de caractères  

ben c'est ta feuille...

cad ? une text box ? un truc dans le genre ??
 
merci

ha nan, g rien dit. bah kà c'est parceque karoli il t'as filé l'exemple en VBA, sous Excel, donc c'est la feuille d'excel.
 
cherche un peu, franchement, en VB c'est encore plus simple...

look = lookText.Value ? (la text box s'appelle look)
mais apparemment ça coince aussi
 

Salut,
 
Ce ne serait pas qqchose dans le genre :
 
 
Dim tavariable As String  
tavariable = worksheets("TaFeuille" ).TextBox.Value  
requete = "Select * FROM Fproche WHERE THEMES LIKE """ & tavariable & """"  
 

 
pkoi vous vous escrimez à donner du VBA Excel comme exemple ? Y'a pas d'objet "Worksheets" en VB

exact, pourtant c'est bien marqué Access dans le titre, il ne pouvait pas y avoir de méprise possible

Il vaut mieux passer par un recordset à mon avis
 
dim rst as recordset
dim db as database
dim tavariable as string
 
set db = currentdb
set rst = db.openrecordset ("SELECT * FROM Fproche WHERE THEMES LIKE '"& tavariable &"'" )