Discussion :

[lionel256]

Bonjour,
J'aimerais savoir comment faire ou alors un tuto pour qu'au fur et à mesure que je rentre une lettre les possibilités diminue en fonction de la lettre.

Je ne pense pas que j'ai été fort clair,
Exemple: si j'ai 3 nom Albert, Jean et Virginie si j'appuie sur "A" il n'y ai plus que Albert disponible. Merci d'avance pour l'aide

[boubounne]

Regarde au niveau de l'option OnChange() de ta droplist

[lionel256]

Je n'ai pas cette options la dans les propriétés.

[boubounne]

Desolé mauvais langage ^^

Code :

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

1
2
3
 
 
Private Sub DropList_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cbDossier.TextChanged

[lionel256]

Je met ceci dans mon code et puis je dois mettre qlq chose entre le "sub" et le "end sub"?
Merci

[boubounne]

Ben faut que tu mette le code qui va mettre a jour ta dropdownlist

[lionel256]

Oui mais le problème, c'est que je n'ai pas d'idée du code je ne sais pas comment m'y prendre pour cela.
C'est pour ça que je me disais pour pas emmerder les gens si une personne avait un tuto sur la matière ou me donner un énorme coup de main ...

[boubounne]

Bah, j'ai pas grand chose a faire pour le moment je regarde et je te redi

[lionel256]

Merci beaucoup de ton aide.

[boubounne]

juste comme ca tu rempli ta list avec une requete sql ou avec un tableau, il m'en faut un peu plus sur ton code

[lionel256]

J'ai lié ma "drop list" à une colonne de ma table.

<asp:SqlDataSource ID="SqlACTIVITE" runat="server" ConnectionString="<%$ ConnectionStrings:SiteSqlServer %>"
SelectCommand="SELECT [ACTIVITE] FROM [ESSAI2]"></asp:SqlDataSource>

Je l'ai lié dans le code de ma page ".ascx". Mais dans mon code VB je n'y fais pas mention sauf pour récupérer la valeur avec un "Selectvalue"

Dim nbactivite As String
nbactivite = DpActivite.SelectedValue

Voila j'espère avoir été clair :s

[boubounne]

et bien dans ce cas, dans la fonction que je t'ai donné, tu refait une requête qui ne récupère que les éléments qui t'intéresse...

Code :

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

1
2
3
4
5
6
 
if DropDownList.text.toString <> "" then
"Select * from table where nom like '%" & DropDownList.text.toString & "'"
else
"select * from table"
end if

et tu rerempli ta liste avec le résultat de cette requête. Ca devrais marcher..

[lionel256]

Merci
Pour que cela colle a mon code j'ai écris ceci:

Private Sub DpActivite_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DpActivite.TextChanged

If DpActivite.Text.ToString() <> "" Then
Dim connectionString4 As String = ConfigurationManager.ConnectionStrings.Item("SiteSqlServer").ConnectionString
Dim conn41 As SqlClient.SqlConnection
conn41 = New SqlConnection
conn41.ConnectionString = connectionString4
conn41.Open()
Dim vReq41 As String = "Select * ESSAI2 '%" & DpActivite.Text.ToString() & "'"
Dim comm241 As SqlCommand
comm241 = New SqlCommand
comm241.Connection = conn41
comm241.CommandText = vReq41
comm241.ExecuteNonQuery()
conn41.Close()
Else
Dim connectionString456 As String = ConfigurationManager.ConnectionStrings.Item("SiteSqlServer").ConnectionString
Dim conn123 As SqlClient.SqlConnection
conn123 = New SqlConnection
conn123.ConnectionString = connectionString456
conn123.Open()
Dim vReq415 As String = "select * from ESSAI2"
Dim comm241 As SqlCommand
comm241 = New SqlCommand
comm241.Connection = conn123
comm241.CommandText = vReq415
comm241.ExecuteNonQuery()
conn123.Close()
End If
End Sub

J'ai encore un petit problème je n'arrive pas a écrire dans ma "droplist" et je ne trouve pas l'option :s

[boubounne]

il faut récuperer les résultats de ta requete dans un dataset, et apres, tu fais DropDownList.DataSource = tonDataSet

[boubounne]

pour ton code essaye ca :

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
 
 
Dim connectionString4 As String = ConfigurationManager.ConnectionStrings.Item("SiteSqlServer").ConnectionString
Dim conn As SqlClient.SqlConnection
conn = New SqlConnection
conn.ConnectionString = connectionString
conn.Open()
dim vRep as String
 
If DpActivite.Text.ToString() <> "" Then
 
 
 vReq  = "Select * ESSAI2 '%" & DpActivite.Text.ToString() & "'"
 
Else
 
 vReq  = "select * from ESSAI2"
 
End If
 
Dim comm As SqlCommand
comm = New SqlCommand
comm.Connection = conn
comm.CommandText = vReq
comm.ExecuteNonQuery()
conn.Close()

ca fait moin foulli que ce que tu as....

[lionel256]

La valeur de mon "drop list" je la récupère déjà lorsque j'appuie sur un bouton, je px t'afficher le code si tu vx? ce que je vx faire ici c'est juste pour une question de facilité.

[lionel256]

La valeur de mon "drop list" je la récupère comme ça.


Dim nbactivite As String
nbactivite = DpActivite.SelectedValue
Dim connectionString As String = ConfigurationManager.ConnectionStrings.Item("SiteSqlServer").ConnectionString
Dim conn As SqlClient.SqlConnection
conn = New SqlConnection
conn.ConnectionString = connectionString
conn.Open()

nbactivite = Me.DpActivite.Text
Me.Label1.Text = nbactivite
If nbactivite = "" Then
'message si le text box est vide...
Else
Dim vReq As String = "SELECT ADRESSE,ACTIVITE,Latitude,Longitude,moduleID FROM ESSAI2,ESSAI1 WHERE UPPER(ESSAI2.NOM) LIKE UPPER('" & nbactivite & "%') AND ESSAI1.clef LIKE (" & 3 & ") ;"
Dim comm As SqlCommand
comm = New SqlCommand
comm.Connection = conn
comm.CommandText = vReq

Dim lecteur As SqlDataReader
lecteur = comm.ExecuteReader()
While (lecteur.Read())
Me.Label2.Text = lecteur("ACTIVITE")
Me.Label1.Text = lecteur("ADRESSE")
Me.Label3.Text = lecteur("Latitude")
Me.Label4.Text = lecteur("Longitude")
Me.Label5.Text = lecteur("moduleID")

et puis j'ai une autre requete qui récupère les valeurs. Ce n'est pas possible d'intégrer la fonction à mon code?

[boubounne]

Je ne vois pas du tout ce que tu veux faire ... la methode que je t'ai donné permet de faire en sorte de trier les infos de ta liste selon ce que tu as mis en parametre..

[quentincabo]

Bonjour,
J'ai réalisé la même chose que toi sur une combo box grâce a la propriété autocompletemode et autocompletesource de la combobox. C'est disponible sur VS2005.

[lionel256]

J'avais fait cela sur une "combo box" aussi et j'ai voulu prendre une "combo box" mais je ne pouvais avoir "qu'une drop list" et il n'y a pas cette option là.