essanousy
Messages postés2Date d'inscriptionjeudi 12 juin 2014StatutMembreDernière intervention23 juin 2014 17 juin 2014 à 18:13
ma suggestion :
Dim adapt As New SqlDataAdapter("SELECT Nom1 FROM Table1 union SELECT Nom2 FROM Table2", MyConn)
hervethebest
Messages postés7Date d'inscriptionmercredi 15 novembre 2000StatutMembreDernière intervention 2 juillet 2012 2 juil. 2012 à 07:23
salut,
à ta place j' aurais plutôt factoriser la fonction comme ci dessous :
Protected Sub AjouterInfos(ByVal requete_sql as String)
Dim s As Integer
Dim adapt As New SqlDataAdapter(requete_sql, MyConn)
Dim dataset As New DataSet
adapt.Fill(dataset, "Table")
With dataset.Tables("Table")
For s = 0 To .Rows.Count - 1
if (DropDownList1.Items.FindByText(value) is null) then
DropDownList1.Items.Add(.Rows(s).Item("Nom"))
endif
Next
End With
End Sub
A noter le if (DropDownList1.Items.FindByValue(value) is not null) then
pour tester si l' element est deja present dans le dropdownlist.
j' ai traduit directement à partir d' un code en c# alors j' espère que ca va ...
21 janv. 2015 à 15:18
17 juin 2014 à 18:13
2 juil. 2012 à 07:23
à ta place j' aurais plutôt factoriser la fonction comme ci dessous :
Protected Sub AjouterInfos(ByVal requete_sql as String)
Dim s As Integer
Dim adapt As New SqlDataAdapter(requete_sql, MyConn)
Dim dataset As New DataSet
adapt.Fill(dataset, "Table")
With dataset.Tables("Table")
For s = 0 To .Rows.Count - 1
if (DropDownList1.Items.FindByText(value) is null) then
DropDownList1.Items.Add(.Rows(s).Item("Nom"))
endif
Next
End With
End Sub
A noter le if (DropDownList1.Items.FindByValue(value) is not null) then
pour tester si l' element est deja present dans le dropdownlist.
j' ai traduit directement à partir d' un code en c# alors j' espère que ca va ...