Les Allergies
Alimentaires
Posez votre question Signaler

[VB ACCESS] utilisation du like

Tidodo 143Messages postés 22 avril 2007Date d'inscription - Dernière réponse le 14 janv. 2009 à 20:55
Bonjour !
voilà un petit soucis de syntaxe. Pouvez me dire comment j'utilise la fonction like SQL dans VB.
Ca doit etre un truc du genre :
ADODC1.RecordSource=("Select * From concert Where Date_concert like ' " & TextRechercheDate.Texte & " ' ? ")
Mais cette syntaxe ne marche pas !
Please help me ! C'est assez urgent !
Lire la suite 

[VB ACCESS] utilisation du like »

32 réponses
Réponse
+3
moins plus
car si votre date est de type texte voici un bout de code qui fonctionne chez moi sans problème. en VBA
ma table est

trucEtTrac (id entier,nom Text, prenom Text, dateVie Text)


Private Sub Command1_Click()
    Dim rst As New ADODB.Recordset
    
    rst.Open "SELECT * FROM trucEtTrac WHERE dateVie like '%" & Text1.Text & "%'", con, adOpenDynamic
    MsgBox rst(2)
End Sub

Ajouter un commentaire
Réponse
+0
moins plus
Snif :'( Personne pour m'éclairer ?
Ajouter un commentaire
Réponse
+0
moins plus
Salut,

c'est quoi qui ne marche pas :

erreur de syntaxe, pas de résultat, résultat incorrect ?
Ajouter un commentaire
Réponse
+0
moins plus
erreur de syntaxe
Ajouter un commentaire
Réponse
+0
moins plus
A quel moment : compilation, exécution ?

En VBA ou VB ?
Ajouter un commentaire
Réponse
+0
moins plus
Je veux juste la syntaxe SQL sous VB pour l'utilisation du like.
Ajouter un commentaire
Réponse
+0
moins plus
La syntaxe est la même que tu sois en vb ou vba, c'est du sql avec des caractères joker (? = n'importe quel caractère unitaire, * = chaine de n caractères quelconques), ex :

SELECT TOTO FROM TATA WHERE TITI LIKE "toto*";
SELECT TOTO FROM TATA WHERE TITI LIKE "*toto*";
SELECT TOTO FROM TATA WHERE TITI LIKE "*toto";
SELECT TOTO FROM TATA WHERE TITI LIKE "?toto";
Ajouter un commentaire
Réponse
+0
moins plus
Essaie ca, ca devrait marcher : "Select * From concert Where Date_concert like * " & TextRechercheDate.Texte & " ? ")

Après si tu expliquais ce que tu veux faire on pourrait peut etre plus t'aider. j'imagine que TextRecherchedate c'est une textbox.
Ajouter un commentaire
Réponse
+0
moins plus
au fur et à mesure que je tape, je dois avoir des résultats


Private Sub Text1_Change()
Adodc1.RecordSource = "Select * From concert Where Date_concert like * " & Text1.Text & " ? "
Adodc1.Refresh


End Sub


sqlbindparameter not used for all parameter


Tchuss
Ajouter un commentaire
Réponse
+0
moins plus
Il faut mettre un like *" & Text1.Text & "* ", mais ne pas oublier de rafraichir le code à chaque saisie de caractère...
Ajouter un commentaire
Réponse
+0
moins plus
"You have an error in your SQL syntaxe near '* m *' at line 1"

Private Sub Text1_Change()
Adodc1.RecordSource = "Select * From concert Where Date_concert like * " & Text1.Text & " * "
Adodc1.Refresh


End Sub
Ajouter un commentaire
Réponse
+0
moins plus
Rajoute un ' avant la premiere étoile et aprrès la deuxieme ce qui donne :
like'* " & Text1.Text & " *' "
Ajouter un commentaire
Réponse
+0
moins plus
Personne ne t'a dit de mettre un espace entre * et ce que tu cherches :-)

Regarde mes exemples...
Ajouter un commentaire
Réponse
+0
moins plus
Plus d'erreur, mais aucun resultat :(

Ben corrige moi blux puisque tu es si fort !
Ajouter un commentaire
Réponse
+0
moins plus
Tu avais mis des simple-quote pour séparer la chaine de caractères, ils ont disparu...
... like '*" & Text1.Text & "*';" 
--
A+ Blux
 "Les cons, ça ose tout.
C'est même à ça qu'on les reconnait"
Ajouter un commentaire
Réponse
+0
moins plus
L'erreure a été corrigée lorsque tu as rajouté les apostrophes ? vu qu'il n'y a plus d'erreur on peut pas trop d'aider, soit il n'y avait rien dans ta table qui correspondait à ta recherche soit il y a un probleme autre part.
blux- 6 juin 2007 à 17:42
puisque j'ai dit que sous delphi je sais le faire
Désolé, mais je ne l'ai lu nulle part...

La syntaxe sql/vb est celle donnée en 11.
TidodoTidodo - 6 juin 2007 à 20:11
A ui lol dsl !
En 11 ca ne marche pas puisque j'ai une erreur LooL !
blux- 7 juin 2007 à 09:14
Pardon, en 15...
Ajouter un commentaire
Réponse
+0
moins plus
En 14 il dit qu'il n'a plus d'erreur donc je vois pas ou est le probleme
Ajouter un commentaire
Réponse
+0
moins plus
Voilà les screen : http://www.univers-com.fr/CCM/Screen1.JPG

http://www.univers-com.fr/CCM/Screen2.JPG

Voilà le code :


Adodc1.RecordSource = "Select * From concert Where Ville_concert like '*" & Text1.Text & "*';"
Adodc1.Refresh
Ajouter un commentaire
Réponse
+0
moins plus
Ok. donc en fait il n'y a plus d'erreur mais ca ne fonctionne pas..
Pourquoi mets tu ville_concert et pas ville dans ta requete SQL ?
Ajouter un commentaire
Réponse
+0
moins plus
parceque dans la table c ville_concert, en affichage j'ai mis que ville pour que ce soit mieux ...
Ajouter un commentaire
Ce document intitulé « [VB ACCESS] utilisation du like » issu de CommentCaMarche (www.commentcamarche.net) est mis à disposition sous les termes de la licence Creative Commons. Vous pouvez copier, modifier des copies de cette page, dans les conditions fixées par la licence, tant que cette note apparaît clairement.
Dossier à la une
Passage au tout numérique : quel coût pour les particuliers ?
[VB ACCESS] utilisation du like - page 2