Observa mi caso y funciona muy bien!!!!
<%@ Page Language="vb" AutoEventWireup="True" Codebehind="NuevoAlumno.aspx.vb" Inherits="Reparacion.NuevoAlumno"%>
<%@ Import Namespace=system.data.sqlclient%>
<%@ Import Namespace=system.data %>
<%@ Import Namespace=System.IO %>
<SCRIPT language="VB" runat="server">
Dim conn As New SqlClient.SqlConnection
Function JalaDistritos(Dp as String,Pv as String) As datatable
Dim dtDistrito as new DataTable
Try
conn.ConnectionString = "integrated security=SSPI;data source=localhost;persist security info=False;initial catalog=reparacion"
conn.Open()
Dim sqldaDistrito As New SqlDataAdapter("select nombre,idDistrito from distrito where Distrito.Iddepartamento='" & Dp & "' and Distrito.idprovincia='" & Pv & "'" , Conn)
sqldaDistrito.Fill(dtDistrito)
Catch ex As Exception
lblNombre.text=""
Finally
conn.Close()
End Try
Return dtDistrito
End Function
Function JalaProvincias(Dp as string) As datatable
Dim dtProvincia as new DataTable
Try
conn.ConnectionString = "integrated security=SSPI;data source=localhost;persist security info=False;initial catalog=reparacion"
conn.Open()
Dim sqldaProvincia As New SqlDataAdapter("select nombre,idProvincia from provincia where provincia.iddepartamento='" & Dp & "'", Conn)
sqldaProvincia.Fill(dtProvincia)
Catch ex As Exception
lblNombre.text=""
Finally
conn.Close()
End Try
Return dtProvincia
End Function
Function JalaDepartamentos() As datatable
Dim dtDepartamento as new DataTable
Try
conn.ConnectionString = "integrated security=SSPI;data source=localhost;persist security info=False;initial catalog=reparacion"
conn.Open()
Dim sqldaDepartamento As New SqlDataAdapter("select nombre,idDepartamento from departamento", Conn)
sqldaDepartamento.Fill(dtDepartamento)
Catch ex As Exception
lblNombre.text=""
Finally
conn.Close()
End Try
Return dtDepartamento
End Function
Sub Page_Load(sender As Object, e As EventArgs)
if Not IsPostBack Then
LstDistrito.DataSource = JalaDistritos("01","01")
LstDistrito.DataTextField = "nombre"
LstDistrito.DataValueField = "idDistrito"
LstDistrito.DataBind()
LstDepartamentoNacimiento.DataSource = JalaDepartamentos()
LstDepartamentoNacimiento.DataTextField = "nombre"
LstDepartamentoNacimiento.DataValueField = "idDepartamento"
LstDepartamentoNacimiento.DataBind()
LstProvinciaNacimiento.DataSource = JalaProvincias("01")
LstProvinciaNacimiento.DataTextField = "nombre"
LstProvinciaNacimiento.DataValueField = "idProvincia"
LstProvinciaNacimiento.DataBind()
LstDistritoNacimiento.DataSource = JalaDistritos("01","01")
LstDistritoNacimiento.DataTextField = "nombre"
LstDistritoNacimiento.DataValueField = "idDistrito"
LstDistritoNacimiento.DataBind()
end if
End Sub
Sub LstDepartamentoNacimientoIndex_Changed(sender As Object, e As EventArgs)
LstProvinciaNacimiento.DataSource = JalaProvincias(LstDepartamentoNacimiento.SelectedI tem.Value)
LstProvinciaNacimiento.DataTextField = "nombre"
LstProvinciaNacimiento.DataValueField = "idProvincia"
LstProvinciaNacimiento.DataBind()
LstDistritoNacimiento.DataSource = JalaDistritos(LstDepartamentoNacimiento.SelectedIt em.Value,LstProvinciaNacimiento.SelectedItem.Value )
LstDistritoNacimiento.DataTextField = "nombre"
LstDistritoNacimiento.DataValueField = "idDistrito"
LstDistritoNacimiento.DataBind()
End Sub
Sub LstProvinciaNacimientoIndex_Changed(sender As Object, e As EventArgs)
LstDistritoNacimiento.DataSource = JalaDistritos(LstDepartamentoNacimiento.SelectedIt em.Value,LstProvinciaNacimiento.SelectedItem.Value )
LstDistritoNacimiento.DataTextField = "nombre"
LstDistritoNacimiento.DataValueField = "idDistrito"
LstDistritoNacimiento.DataBind()
End Sub
</SCRIPT>
</HEAD>
<body MS_POSITIONING="GridLayout">
<form id="Form1" method="post" encType="multipart/form-data" runat="server">
<asp:dropdownlist id="LstDistrito" style="Z-INDEX: 111; LEFT: 152px; POSITION: absolute; TOP: 272px" runat="server" Height="24px" Width="168px" AutoPostBack="true" OnSelectedIndexChanged="LstDistritoIndex_Changed"> </asp:dropdownlist>
<asp:dropdownlist id="LstDepartamentoNacimiento" style="Z-INDEX: 116; LEFT: 264px; POSITION: absolute; TOP: 336px" runat="server" Height="32px" Width="144px" AutoPostBack="true" OnSelectedIndexChanged="LstDepartamentoNacimientoI ndex_Changed"></asp:dropdownlist>
<asp:dropdownlist id="LstProvinciaNacimiento" style="Z-INDEX: 117; LEFT: 496px; POSITION: absolute; TOP: 336px" runat="server" Height="32px" Width="160px" AutoPostBack="true" OnSelectedIndexChanged="LstProvinciaNacimientoInde x_Changed"></asp:dropdownlist>
<asp:dropdownlist id="LstDistritoNacimiento" style="Z-INDEX: 118; LEFT: 736px; POSITION: absolute; TOP: 336px" runat="server" Height="24px" Width="168px" AutoPostBack="true"></asp:dropdownlist>
</form>
</body>
</HTML>
ojala q lo haya depurado bien.. pero si me funciona!!! y todo en el mismo aspx...
con el parametro de un combo pasa al otro y lo muestra y este a otro a su vez
ojala te sirva...
Dcastro.