
combobox con procedimiento almacenado y en capas
Publicado por Elizabeth (7 intervenciones) el 11/06/2015 18:08:24
Hola amigos
tengo una tabla llamada unidad_de_medida con los campos id_unidad y descipcion con un procedimiento almacenado
create procedure llenar_combo
as
SELECT * FROM Unidad_de_medida
nose si esta bien
estoy programando en capas y este es el codigo de mi DAO
este codigo es de mi entidad
y esta en mi form
y este código no me funciona no se como hacer para que me traigan los datos de mi unidad de medida en un combobox en ventana producto porfa si alguien puede ayudarme
desde gracias
tengo una tabla llamada unidad_de_medida con los campos id_unidad y descipcion con un procedimiento almacenado
create procedure llenar_combo
as
SELECT * FROM Unidad_de_medida
nose si esta bien
estoy programando en capas y este es el codigo de mi DAO
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Public Function llenarComboProducto(ByVal codigo As String) As Producto
Dim lista As New List(Of Producto)
Dim lector As SqlDataReader
Dim objProducto As Producto
objProducto = New Producto
Dim objProducto1 As New Producto
cmdProducto = New SqlCommand("llenar_combo", objConexion.obtenerconexion)
If objConexion.obtenerconexion.State = ConnectionState.Open Then
objConexion.obtenerconexion.Close()
Else
objConexion.obtenerconexion.Open()
End If
lector = cmdProducto.ExecuteReader
If lector.Read Then
objProducto.id_unidad = lector(0)
objProducto.descripcion = lector(1)
End If
Return objProducto
End Function
este codigo es de mi entidad
1
2
3
Public Function llenarComboProducto() As Producto
Return objProductoDAO.llenarComboProducto
End Function
y esta en mi form
1
2
3
4
5
6
7
8
9
10
Sub Llenar_Combo()
Dim producto1 As New Producto
Dim objProducto = New List(Of Producto)
Dim objProductoNE = New ProductoNE
objProducto = objProductoNE.listarProducto
CboGrupo.DataSource = Nothing
CboGrupo.DataSource = objProducto
CboGrupo.DisplayMember = "descripcion"
CboGrupo.ValueMember = "id_unidad"
end sub
y este código no me funciona no se como hacer para que me traigan los datos de mi unidad de medida en un combobox en ventana producto porfa si alguien puede ayudarme
desde gracias
Valora esta pregunta


0