[Access 2003]
Bonjour,
je voudrais éxecuter une requete selection avec un parametre récuperé d'une combo, si qqun à une idée.
![]()
[Access 2003]
Bonjour,
je voudrais éxecuter une requete selection avec un parametre récuperé d'une combo, si qqun à une idée.
![]()
Bonjour
Il te suffit de mettre la valeur de la combo comme valeur de paramètre dans ta clause WHERE.
Il nous faudrait ta requête (le code SQL), comment tu veux la lancer, enfin bref, c'est simple, mais il faut plus d'infos.
Starec
Merci de répondre Starec,
Effectivement j'ai pas donné toutes les informations, car moi je voudrais connaitre les différentes solutions possibles (DAO,ADO, VBA) toutefois voila
la procedure que j'ai essayé/
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19 Private Sub Modifiable12_Change() Dim sSQL As String, Rst As DAO.Recordset, param As String param = Modifiable12.Value ' Ouverture de la base de données sSQL = "SELECT materiels.NMAT, materiels.[N° POLICE]," & _ "materiels.CONTRAT, materiels.[DATE EFFET]," & _ "materiels.DÉSIGNATIO, materiels.Assureur, " & _ "materiels.Statut, Clients.NOM" & _ "FROM Clients INNER JOIN (contrats INNER JOIN materiels" & _ "ON contrats.CONTRAT = materiels.CONTRAT)" & _ "ON Clients.CODE_CLIEN = contrats.CODE_CLIEN" & _ "WHERE (((materiels.Assureur)=" & "xparam))" ' Ouverture du recordset Set Rst = db.OpenRecordset(sSQL, dbOpenForwardOnly, dbReadOnly) ' ' Fermeture du Recordset Rst.Close End Sub
Bonjour,
Tu peux juste écrire :
Remarque :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10 ' Ouverture de la base de données sSQL = "SELECT materiels.NMAT, materiels.[N° POLICE]," & _ "materiels.CONTRAT, materiels.[DATE EFFET]," & _ "materiels.DÉSIGNATIO, materiels.Assureur, " & _ "materiels.Statut, Clients.NOM" & _ "FROM Clients INNER JOIN (contrats INNER JOIN materiels" & _ "ON contrats.CONTRAT = materiels.CONTRAT)" & _ "ON Clients.CODE_CLIEN = contrats.CODE_CLIEN" & _ "WHERE materiels.Assureur =" & Modifiable12
si la valeur retournée par ta combo est du texte, il faudra modifier la clause WHERE comme ceci:
"WHERE materiels.Assureur ='" & Modifiable12 & "'"[/CODE]
SVP,
J'ai une erreur de syntaxe dans cette requete:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 sSQL = "SELECT materiels.NMAT, materiels.[N° POLICE]," & _ "materiels.CONTRAT, materiels.[DATE EFFET]," & _ "materiels.DÉSIGNATIO, materiels.Assureur, " & _ "materiels.Statut, Clients.NOM" & _ "FROM Clients INNER JOIN (contrats INNER JOIN materiels" & _ "ON contrats.CONTRAT = materiels.CONTRAT)" & _ "ON Clients.CODE_CLIEN = contrats.CODE_CLIEN " & _ "WHERE (((materiels.Assureur)= " & Modifiable12.Value & " ))"
Bonjour,
Il manquerait des espaces après le "INNER JOIN materiels", après "materiels.CONTRAT)" et après "Clients.NOM"
D'autre part, les parenthèses de la clause WHERE sont inutiles
si Modifiable12 est du texte n'est-ce plutôt :"WHERE (((materiels.Assureur)= " & Modifiable12.Value & " ))"
Code : Sélectionner tout - Visualiser dans une fenêtre à part WHERE (((materiels.Assureur)= """ & Modifiable12.Value & """ ))"
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.
Partager