SQL avec le select

Bonjour à tous,
Voilà j'ai essayé de faire un petit truc simple pour commencé et j'ai juste créer un bouton dans un formulaire et lorsqu'on clique dessus cela devrait lancer une requête SQL, j'ai donc créé une variable de type string et ensuite cette variable va recevoir ma requête (avec un SELECT) puis j'ai lancé la commande DoCmd.RunSQL nomVariable mais ça n'a pas marché et j'ai essayé de faire un Delete à la place du select et c'était bon, tout ça été juste pour faire des tests alors pouvez-vous me dire comment fait-on avec le SELECT, je ne comprends vraiment pas.
Merci pour vos réponses.

Bonjour,

Le select ne fonctionne pas avec DoCmd.RunSQL (voir l'aide).
tu peux utiliser des recordset.

A+

Bonjour,

DoCmd.RunSQL ne permet d'éxécuter que des requêtes action (INSERT,UPDATE,DELETE)
On ne peut donc pas afficher une requête SELECT avec cette méthode.

Pour afficher le résultat d'une requête SELECT on affecte le SQL à une requête existante ou on crée une nouvelle requête avec DAO.
Voir ici dans la faq

Une fois qu'on a créé la requête ou modifié son SQL on l'affiche avec DoCmd.OpenQuery

A+

En fait DoCmd.OpenQuery c'est quand on a déjà créé une requête, mais je ne voulais pas faire de cette manière, est-ce qu'il y a que cette façon de faire pour un select.

Private Sub btrequete_Click()
Dim SQL As String
SQL = "Select * From DATEE"
'ça ne marche pas avec un select
DoCmd.RunSQL SQL
End Sub

J'ai regardé le lien mais je ne sais toujours pas comment faire marcher ma requête. :help:

Bonjour,

Quel est le but de la manoeuvre ?

Pour afficher un select tu peux mettre à jour la source d'un sous formulaire par exmple ...
Si tu veux passer par un OpenQuery, tu peux créer la requete avec ton SQL temporairement (voir du coré de CreateQueryDef)

A+

Pour l'instant j'essaye de faire juste ça car en faite mon but c'est qu'après un utilisateur entre une date dans un textbox et après je cherche les éléments voulus par rapport à cette date mais si je n'arrive même pas à faire un simple select alors ce n'est même pas la peine d'aller plus loin.

J'ai cherché un peu et je suis tombé sur des RecordSet alors je tente d'utiliser ça.

Merci tout de même

Les recordset ne s'affichent pas non plus.
Une instruction SQL a besoin d'un support (Requête, Formulaire, Liste, ...) pour être affichée.

essaie un truc simple.
Mets une liste sur ton formulaire (zone de liste).
Admettons qu'elle s'appelle lstResultat.
Quand tu cliques sur ton bouton au lieu de faire DoCmd.RunSQL nomVariable fais

Code:

---

1 2	Me.lstResultat.RowSource = nomVariable Me.lstResultat.Requery

---

Bon courage

Le plus simple est la solution données plus haut :

Affecter le sql à la propriété RecordSource d'un formulaire existant ;)

En fait j'ai mis une zone liste sur mon formulaire et un bonton avec le code que tu m'avais passé qui se déclenche lorsqu'on clique sur le bouton.
mavariable est-ce que c'est en fait ma requête sql ?? car j'ai écris ça:
Evénement click du bouton
Dim sql As String
sql = "Select ID, nom, dateAnnif From ANNIF"

Me.lstResultat.RowSource = sql
Me.lstResultat.Requery

Et il n'y apparaît que l'ID dans ma zone liste.
Ce que tu voulais me dire c'est qu'il fallait un contrôle pour recevoir ma requête ??

Merci quand même.
A ++

Bonsoir,

oui c'est ce que je voulais dire.

Tu peux jouer sur le nombre de colonnes et leurs largeurs dans les propriétés de la liste.
Nbre de colonnes : 3
Largeurs colonnes : 1cm;4cm;2cm
En-têtes colonnes : Oui (pour afficher les noms des champs)

En vba

Code:

---

1 2 3

Me.lstResultat.ColumnCount=3 Me.lstResultat.ColumnWidths="1cm;4cm;2cm" Me.lstResultat.ColumnHeads=True

---

Je trouve la zone de liste intéressante quand la requête change et peut avoir des noms de colonnes qui changent.

Si la requête est toujours la même et a toujours les mêmes colonnes,
alors comme le disent Tofalu et __MacGiver__, un sous formulaire est mieux.
Tu peux le mettre en mode d'affichage 'Feuille de données'

Même principe pour affecter le SQL

Code:

---

1 2	Me.SousFormulaire.Form.RecordSource = sql Me.SousFormulaire.Form.Requery

---

A+