Discussion :

[Marc_27]

Bonjour à tous.

J'essaye de remplir l'AutoCompleteCustomSource de deux zones de texte de mon formulaire, mais le problème est-ce que l'AutoCompleteCustomSource de la deuxième textbox reste egale au de la première!


Voilàmon 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
strSQL = "SELECT DISTINCT T_Huissiers.Huissier_nom " & _
                 "FROM T_Huissiers " & _
                 "ORDER BY T_Huissiers.Huissier_nom"
        ObjetConnection = New SqlConnection()
        ObjetConnection.ConnectionString = PCEConn
        ObjetConnection.Open()
        ObjetCommand = New SqlCommand(strSQL)
        ObjetDataAdapter = New SqlDataAdapter(ObjetCommand)
        ObjetCommand.Connection() = ObjetConnection
        ObjetDataAdapter.Fill(ObjetDataSet, "T_Huissiers")
        ObjetDataTable = ObjetDataSet.Tables("T_Huissiers")
        For i = 0 To ObjetDataTable.Rows.Count - 1
            RowNumber = i
            txtHuissierIntitule.AutoCompleteCustomSource.Add(ObjetDataTable.Rows(RowNumber).Item(0).ToString)
        Next
        ObjetConnection = Nothing
        ObjetCommand = Nothing
        ObjetDataAdapter = Nothing
        'prenchimento do autocomplete huissier titre
        strSQL = "SELECT DISTINCT T_Huissiers.Huissier_titre " & _
                 "FROM T_Huissiers " & _
                 "ORDER BY T_Huissiers.Huissier_titre"
        ObjetConnection = New SqlConnection()
        ObjetConnection.ConnectionString = PCEConn
        ObjetConnection.Open()
        ObjetCommand = New SqlCommand(strSQL)
        MsgBox(strSQL)
        ObjetDataAdapter = New SqlDataAdapter(ObjetCommand)
        ObjetCommand.Connection() = ObjetConnection
        ObjetDataAdapter.Fill(ObjetDataSet, "T_Huissiers")
        ObjetDataTable = ObjetDataSet.Tables("T_Huissiers")
        For i = 0 To ObjetDataTable.Rows.Count - 1
            RowNumber = i
            txtHuissierTitre.AutoCompleteCustomSource.Add(ObjetDataTable.Rows(RowNumber).Item(0).ToString)
            MsgBox(txtHuissierTitre.AutoCompleteCustomSource.Item(i))
        Next
        ObjetConnection = Nothing
        ObjetCommand = Nothing
        ObjetDataAdapter = Nothing

Quelqu'un aurait quelque idée?
Merci d'avance

[olsimare]

Bonjour.

Ajoute un ObjetDataSet = Nothing entre les deux.

Je pense que tel que tu le fais, le 2éme Fill utilise le mappage issue du premier et de ce fait ne charge rien de plus (le nom de la table est la même et elle existe déjà dans le jeu de tables du dataset).

Ceci étant dit, évite de mettre du code d'accés à la base "un peu n'importe où". Je te conseillerai au minimum de créer un classe "Huissier" pour encapsuler les accés...

Cdt.

[tomlev]

Ajoute un ObjetDataSet = Nothing entre les deux.

Euh... si tu fais ça tu vas avoir une belle NullReferenceException...
Il suffirait de faire un Clear sur la DataTable T_Huissiers

Mais de toutes façons, je ne comprends pas cette manie que tout le monde a de vouloir utiliser des DataSets partout, de préférence là où il n'y en a pas besoin .

Dans un cas comme ça, c'est parfaitement inutile, un DataReader aurait très bien fait l'affaire, avec un code beaucoup plus court et plus performant :

Code :

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

1
2
3
4
5
6
7
8
9
strSQL = "SELECT DISTINCT T_Huissiers.Huissier_nom " & _
                 "FROM T_Huissiers " & _
                 "ORDER BY T_Huissiers.Huissier_nom"
ObjetCommand = New SqlCommand(strSQL)
ObjetCommand.Connection() = ObjetConnection
ObjetDataReader = ObjetCommand.ExecuteReader()
While ObjetDataReader.Read()
    txtHuissierIntitule.AutoCompleteCustomSource.Add(ObjetDataReader.GetString(0))
End While

Et pareil pour la 2e textbox, avec la 2e requete... c'est quand même plus simple je trouve

[olsimare]

Bonjour.

Exact Tom, autant pour moi, en même temps aprés il suffisait de faire un new !

Bon, moi ce qui me choque le plus c'est des ordres sql qui traînent un peu partout.

A+ Tom.
Cdt.

[Marc_27]

Merci olsimare et tomlev.

J'ai eu que me dédier à un autre projet pour le moment (en vb aussi ), mais lorsque je reviens à celle le je pense que je vais aller pour la méthode du Data Reader.

Je vous remercie encore une fois et surement à la prochaine!