Discussion :

[Jean-Luc80]

Bonjour
Pour faire une recherche par réalisateur j'ai créé un form dont voici le code

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
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
Imports System.Data.OleDb
Imports Microsoft.VisualBasic
Public Class InterroRéalisateur
 
    Private Sub InterroRéalisateur_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim conn_string As String
        Dim req_str As String
        Dim dttable As New DataTable
        conn_string = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Access\DvdData.mdb"
        req_str = "Select Réalisateur from Vidéo Group by Réalisateur"
 
        Using conn As New OleDb.OleDbConnection(conn_string)
            Dim cmd As New OleDb.OleDbCommand(req_str, conn)
 
            conn.Open()
 
            Dim dt_reader As OleDb.OleDbDataReader = cmd.ExecuteReader
            dttable.Load(dt_reader)
 
 
            With ComboBoxRéalisateur
                .DataSource = dttable
                .DisplayMember = "Réalisateur"
                .ValueMember = "Réalisateur"
            End With
            TextBoxRéalisateur.Text = ComboBoxRéalisateur.SelectedValue.ToString
            dt_reader.Close()
            conn.Close()
        End Using
    End Sub
 
    Private Sub BtnFermer_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnFermer.Click
        Close()
    End Sub
 
    Private Sub ComboBoxRéalisateur_SelectionChangeCommitted(ByVal sender As Object, ByVal e As System.EventArgs) Handles ComboBoxRéalisateur.SelectionChangeCommitted
        TextBoxRéalisateur.Text = ComboBoxRéalisateur.SelectedValue.ToString
        RésultatRéalisateur.Show()
    End Sub
End Class

Le problème est que quand je choisis dans la liste un réalisateur avec un prénom composé (par exemple Jean-Pierre Jeunet) il prend n'importe lequel commençant par Jean
Si je choisis un réalisateur qui s'appelle Jean dupont il fait la même chose
Comment résoudre ce problème ?
Merci de votre aide

[shayw]

Bonjour

essaie
au lieu de

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

TextBoxRéalisateur.Text = ComboBoxRéalisateur.SelectedValue.ToString

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

TextBoxRéalisateur.Text = ComboBoxRéalisateur.SelectedItem.ToString

[Jean-Luc80]

Bonjour
Merci pour ta réponse mais si je fais ça dans mon champ TextBoxRéalisateur il me met systématiquement "System.Data.DataRowView" !!

[Invité]

Bonjour

A priori tu utilises TextBoxRéalisateur.Text pour l'utiliser dans la form RésultatRéalisateur

Que fait le code de celle-ci pour afficher les données du réalisateur ? Ce que tu décris, c'est comme si tu avais un Like.

En complément, tout les caractères accentuées sont à proscrire.

Philippe

[Jean-Luc80]

Bonjour
C'est dès le formulaire de choix qui contient la combobox que ça ne va pas
Je vois bien qu'au choix d'un prénom composé (Jean-Paul) le champ ne correspond pas à ce que j'ai sélectionné dans la liste.
Et du moment que je choisis un réalisateur dont le prénom est Jean (par exemple Jean Machin) le champ texte se remplit avec n'importe quel réalisateur qui contient Jean dans son prénom (Composé ou non)

[Rainui]

Bonjour,
Vous pouvez remplacer :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

TextBoxRéalisateur.Text = ComboBoxRéalisateur.SelectedValue.ToString

par :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

TextBoxRéalisateur.DataBindings.Add("Text",ComboBoxRéalisateur,"SelectedValue")

Par contre je changerais la requête sur la table Vidéos par une requête qui renvoie Réalisateur Distinct pour ne pas me retrouver avec 1000 Jean- ... ou Pierre s'il ont fait 1000 films...