LIKE et access

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : LIKE et access

Mariooo

Bonjour !! :hello:

Je ne m'explique pas une fantaisie que me fait Access.
Je génère une requête, à travers VBA certes, mais une requête SQL quand même. Elle a cette tête :

Set rst = CurrentDb.OpenRecordset("SELECT CodeEtudiant, Nom FROM TableEtudiants WHERE CodeEtudiant LIKE '" & code_etudiant & "*'" )

Je but de la manoeuvre étant de récupérer tous les étudiants dont le code commence par la chaine de caractères code_etudiant (en général deux ou trois caractères)
Mon problème : la requete ne semble renvoyer toujours qu'un seul élément, puisque un RecordCount me renvoit toujours 1 !

Le problème vient-il de la syntaxe de la requête ?

En attendant je potasse le problème, merci pour votre aide :jap:

---------------
Dyslexics have more fnu.

Publicité

Harkonnen

Modérateur
Un modo pour les bannir tous

2 choses :
- le wildcard à utiliser en ADO n'est pas "*" mais "%" pour remplacer n'importe quel caractère,
- tape plutot le code suivant :

Code :

SQL = "SELECT CodeEtudiant, Nom FROM TableEtudiants WHERE CodeEtudiant LIKE '" & code_etudiant & "%'"
Set rst = CurrentDb.OpenRecordset(SQL)

Message édité par Harkonnen le 06-05-2005 à 10:56:10

---------------
J'ai un string dans l'array (Paris Hilton)

Mariooo

Ben sous Access j'ai bien l'impression que le wildcard est "*" (erreur sinon)
Autrement définir la requête dans une chaine à part ne change rien

---------------
Dyslexics have more fnu.

Mariooo

Peut-être vous donner le code entier aidera à la résolution de mon problème :

Code :

Set rst = CurrentDb.OpenRecordset("SELECT CodeEtudiant, Nom FROM TableEtudiants WHERE CodeEtudiant LIKE '" & code_etudiant & "*'" )
nb_enreg = rst.RecordCount
If nb_enreg = 0 Then
MsgBox "Pas d'étudiant ayant ce code"
ctl.SetFocus
Exit Sub
End If
tablo = rst.GetRows(nb_enreg)
'affectation du tableau à la liste
ctlListeEtudiants.RowSourceType = "Value List"
For i = 0 To (nb_enreg - 1)
ctlListeEtudiants.AddItem (tablo(0, i) & " " & tablo(1, i))
Next i

Mais là je ne suis plus dans la bonne catégorie... Désolée

---------------
Dyslexics have more fnu.

Mariooo

Ok problème résolu...
Cela n'avait rien à voir avec la requête, c'était mon RecordCount qui clochait.
Pour qu'un RecordCount renvoit autre chose que 1, il faut lui avoir fait parcourir d'abord tous les enregistrements du recordset...
Donc hop, un petit MoveLast et le tour est joué !

Code final-qui-marche pour ceux que ça intéresse

Code :

'Compte le nombre de résultats en vu de l'affectation au tableau
Set rst = CurrentDb.OpenRecordset("SELECT CodeEtudiant, Nom FROM TableEtudiants WHERE CodeEtudiant LIKE '" & code_etudiant & "*'" )
rst.MoveLast
nb_enreg = rst.RecordCount
If nb_enreg = 0 Then
MsgBox "Pas d'étudiant ayant ce code"
ctl.SetFocus
Exit Sub
End If
'réouverture obligatoire du recordset
Set rst = CurrentDb.OpenRecordset("SELECT CodeEtudiant, Nom FROM TableEtudiants WHERE CodeEtudiant LIKE '" & code_etudiant & "*'" )
tablo = rst.GetRows(nb_enreg)
'affectation du tableau à la liste
ctlListeEtudiants.RowSourceType = "Value List"
For i = 0 To (nb_enreg - 1)
ctlListeEtudiants.AddItem (tablo(0, i) & " " & tablo(1, i))
Next i

Message édité par Mariooo le 06-05-2005 à 12:33:37

---------------
Dyslexics have more fnu.

Harkonnen

Modérateur
Un modo pour les bannir tous

Mariooo a écrit :

Peut-être vous donner le code entier aidera à la résolution de mon problème :

t'as oublié le MoveLast après le RecordCount

edit: [:benou_grilled]

Message édité par Harkonnen le 06-05-2005 à 12:50:15

---------------
J'ai un string dans l'array (Paris Hilton)

Mariooo

Merci ça m'aurait donné un bon coup de pouce

---------------
Dyslexics have more fnu.

FORUM HardWare.fr

Programmation

SQL/NoSQL

LIKE et access

Sujets relatifs
Requete SLQ/php avec LIKE	Access - VBA - Propriétés d'un MSGraph.Chart.8
requete access vers mysql	Probleme Access à MySQL
Access: Comment éliminer des doublons ?	Ouvrir un fichier Excel via Access
ACCESS: Requete suppression HELP!	Problème de connexion Access
instruction like en SQL avec Access	prbleme avec un like en SQL sous Access
Plus de sujets relatifs à : LIKE et access

Page générée en 0.062 secondes