Discussion :

[GCAccess]

Bonjour,

Dans mon formulaire, j'ai un combobox que je charge à l'aide d'une requête SQL:

Code sql :

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

SELECT*Ref, Client FROM TblClients ORDER BY Client

À cette liste de clients, je voudrais ajouter une ligne qui s'affiche tout en haut, du genre "Nouveau" sur laquelle l'utilisateur doit cliquer si le client n'est pas dans la liste.

Je pensais faire une requête UNION de ce type:

Code sql :

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

SELECT Ref, Client FROM TblClients UNION SELECT "", "Nouveau" FROM TblClients ORDER BY Client

mais ça ne fonctionne pas. Il y une erreur dans la partie "FROM" mais je ne sais pas quoi mettre puisque cette ligne ne provient justement pas d'un tableau en particulier.
Je ne suis d'ailleurs pas sûr que ce soit le meilleur moyen d'arriver à ce que je veux.
Il faut aussi que je puisse détecter facilement quand cette fameuse ligne sera sélectionnée par l'utilisateur pour ouvrir le formulaire d'ajout d'un client.

Qu'en pensez-vous ?

Merci beaucoup

Guillaume

[calagan99]

Bonjour,

Sur le principe, ce n'est pas à la requête de traiter cette problématique.
L'approche que j'utiliserais serait la suivante :
- le résultat de ta requête doit être stocké dans un objet (DataTable, List<Object>) auquel est bindée ta Combobox.
Tu peux alors ajouter une élément "générique" à cet objet. Il suffit de l'insérer en première position.

[-N4w4k-]

Bonjour,

Ne pourrais tu pas ajouter l'élément "Nouveau" au résultat de ta requête au lieu de l'ajouter dans ta requête?

Pour détecter la sélection d'un item de ta combobox, utilise l'évènement SelectedValueChanged (ou SelectedIndexChanged).

[Pol63]

le mieux est en effet de rajouter l'item après l'exécution de la requête

il faudrait aussi nous dire comment tu remplis le combobox

sinon par la requête ca donnerait ca :

Code :

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

1
2
3
SELECT Ref, Client FROM TblClients 
UNION SELECT NULL, 'Nouveau'
ORDER BY Client

Avec union il faut que les colonnes aient le même type sur chaque select
pour la ref si c'est un entier, tu peux mettre -1 à la palce de null

le "nouveau" sera repérable dans selecteditem grace à -1 ou null

[GCAccess]

Merci à tous pour toutes ces pistes.

Voici comment je remplis mon combobox :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
        conn = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data Source = D:\Data\bd.mdb;")
        Dim selStr As String = "SELECT Ref, Client FROM TblClients ORDER BY Client"
        da1 = New OleDbDataAdapter(selStr, conn)
        Dim ds1 As New DataSet()
        conn.Open()
        da1.Fill(ds1, "CboClient")
        conn.Close()
 
        Dim dt1 As DataTable = ds1.Tables("CboClient")
        Me.CboClient.DataSource = dt1
        Me.CboClient.ValueMember = "Ref"
        Me.CboClient.DisplayMember = "Client"
        Me.CboClient.SelectedIndex = -1

J'avoue bien humblement ne pas savoir comment ajouter l'item au résultat de la requête ou à la datatable...

Merci encore pour votre aide

[Sankasssss]

Bonsoir,

Voici la solution :

Code :

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

1
2
3
4
       Dim row as DataRow = ds1.Tables("CboClient").NewRow()
       row("Ref") = 0
       row("Client") = "Nouveau"
       ds1.Tables("CboClient").Rows.Add(row)

Voir MSDN pour DataTable.NewRow et les cours / tuto sur dvp

[GCAccess]

Merci pour votre aide, j'apprends plein de trucs grâce à vous !

@ Pol63: en appliquant ta requête SQL, j'avais encore une erreur sur le From, par contre en trifouillant un peu, je suis arrivé à une requête qui marche bien :

Code :

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

SELECT Ref, Client FROM TblClients UNION SELECT NULL as Ref, ""***NOUVEAU*CLIENT***"" as Client FROM TblClients ORDER BY Client"

(j'ai mis ces astérisques autour de "nouveau client" simplement pour détacher cette entrée des autres mais aussi pour qu'elle se retrouve en première position)

Ça fonctionne bien comme ça, même pour repérer lorsque cet item est sélectionné avec

Code :

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

  If Me.CboClient.SelectedIndex = 0 Then

Le problème est donc pour ainsi dire résolu, mais comme vous êtes à peu près tous d'accord pour dire que ce n'est pas la méthode la plus "propre" pour faire ça, j'aimerais aussi essayer avec l'autre méthode :

@Sankasssss : merci pour ton aide, le code fonctionne comme je le veux, à un détail près : l'entrée "nouveau" se retrouve tout en bas de la liste. Comment je peux faire pour qu'elle se trouve au début (je ne peux pas jouer avec le tri alphabétique, puisqu'elle n'est pas prise en compte dans la requête).

Autre petit souci : si j'utilise le même code que ci-dessus pour détecter la sélection de cette ligne, rien ne se passe, pourtant l'indice sélectionné est bien "0" là aussi ? Je comprends pas.

Merci encore pour votre aide !*

Guillaume