Recherche avec vb.net

Version imprimable

18/01/2014, 12h07
kkitutaezechiel

Recherche avec vb.net

Bonjour les amis du savoir!
Je ne sais pas comment faire la recherche avec Vb.net connecté avec sql seveur, je voudrais que lorsque le text box du nom de l'article recoit le focus et je commence à taper le nom de l'article, que la liste box commence déjà à rechercher les noms semplable jusqu'à me séléctionner le vrai non... un peu comme ca se fait avec dicos encarta.
Merci!
18/01/2014, 14h57
Pol63

lis un cours vb.net
et un cours sur le langage sql
20/01/2014, 15h35
Lendcap

Bonjour mon cher,
je crois qu'à la place de ton textbox tu devrais plutot créer un combobox et suivre la fenêtre de propriété pour la lier à une source de données . Tu devrais aussi configurer la propriété autocompletemodde à Suggestappend et autocompletesource à listitem si la propriété datasource est definie sur un datatable

Merci bien si cela peut t'aider.

Merci vraiment!
J'ai trouvé maintenant la chose, ça déjà
voici le code:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Private Sub txtRechercherArt_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles txtRechercherArt.TextChanged
        FinCon.Open()
        Try
            RechercheInfo.CommandText = "Select * from tArticle where designArt like '" & Trim(Me.txtRechercherArt.Text) & "%" & "'"
            RechercheInfo.CommandType = CommandType.Text
            RechercheInfo.Connection = FinCon
            Dim dbReader As OleDbDataReader = RechercheInfo.ExecuteReader
            If dbReader.Read = True Then
                txtNumArt.Text = dbReader.Item(0)
                txtDesignArt.Text = dbReader.Item(1)
                txtNumCpte.Text = dbReader.Item(4) & dbReader.Item(3) & dbReader.Item(0)
                dbReader.Close()
            Else
                MsgBox("Aucun article retrouvé !", MsgBoxStyle.Information, "FinAuditing")
            End If
        Catch ex As Exception
            MsgBox(ex.Message.ToString, MsgBoxStyle.Critical, "FinAuditing")
        End Try
        FinCon.Close()
    End Sub

12/04/2014, 14h07
rv26t

Bonjour,

Il faut utiliser les requêtes paramétrées. Voir Tuto ou Faq.