Holas, mi problema es que tengo una aplicacion en VB.NET y ahora la quiero hacer igual pero en ASP.NET, solo consiste en un combo que hace funcionar a una grilla, pero mi problema es que no carga la grilla, les mando el codigo haber si alguien me puede ayudar...
Dim strconn As String = "Server=SISTEMAS1;" & "DataBase=Ventas2000;" & "Integrated Security=SSPI"
Dim cnx As New SqlConnection(strconn)
Dim dts As New DataSet
Dim miada1 As SqlDataAdapter
Dim miada2 As SqlDataAdapter
Dim vsql As String
Dim entro As String
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'Introducir aquí el código de usuario para inicializar la página
vsql = "Select cod_cli, raz_soc_cli from tb_cliente ORDER BY raz_soc_cli "
miada1 = New SqlDataAdapter(vsql, cnx)
miada1.Fill(dts, "Clientes")
cbocliente.DataSource = dts.Tables(0)
cbocliente.DataTextField = dts.Tables(0).Columns(1).ToString
cbocliente.DataValueField = dts.Tables(0).Columns(0).ToString
cbocliente.DataBind()
dts.Tables.Add("Facturas")
entro = "S"
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
dts.Tables("Facturas").Clear()
Llenagrid()
End Sub
Private Sub Llenagrid()
vsql = "exec Sp_FactClientes '" & cbocliente.SelectedValue & "'"
miada2 = New SqlDataAdapter(vsql, cnx)
miada2.Fill(dts, "Facturas")
dtgfacturas.DataSource = dts.Tables(1).DefaultView
dtgfacturas.DataBind()
End Sub
Private Sub cbocliente_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cbocliente.SelectedIndexChanged
If entro = "S" Then
dts.Tables("Facturas").Clear()
Llenagrid()
End If
End Sub
End Class
NOTA : DE ESTO SOLO FUNCIONA EL COMBO Y DE LA GRILLA SOLO SALE LA CABECERA. HELP ME...........
