Foros del Web » Programación para mayores de 30 ;) » .NET »

AutoPostBack

Estas en el tema de AutoPostBack en el foro de .NET en Foros del Web. Hola amigos! Alguien puede explicarme por que no se dispara el evento lstasesores_SelectedIndexChanged de mi control dropdrowlist si este tiene la propiedad de AutoPostBack en ...
  #1 (permalink)  
Antiguo 06/06/2006, 22:26
 
Fecha de Ingreso: mayo-2005
Mensajes: 274
Antigüedad: 19 años
Puntos: 0
AutoPostBack

Hola amigos! Alguien puede explicarme por que no se dispara el evento lstasesores_SelectedIndexChanged de mi control dropdrowlist si este tiene la propiedad de AutoPostBack en true.

Observen el sig. codigo

Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
If Not Page.IsPostBack Then
CargarAsesores()
End If
End Sub

Public Function CargarAsesores()

Dim MyConnection As String
MyConnection = CStr(Application("SqlConnection"))

Dim Conn As New SqlConnection(MyConnection)
Dim cmdAsesores As New SqlCommand("MostrarAsesores", Conn)
cmdAsesores.CommandType = CommandType.StoredProcedure

Conn.Open()
lstasesores.Items.Clear()
Dim drAsesores As SqlDataReader
drAsesores = cmdAsesores.ExecuteReader
Do While drAsesores.Read
Dim Agregar As New ListItem
Agregar.Text = drAsesores("APELLIDO") & "," & " " & _
drAsesores("NOMBRE")
Agregar.Value = drAsesores("ID_ASESOR").GetType.ToString
lstasesores.Items.Add(Agregar)
Loop
drAsesores.Close()
Conn.Close()

End Function

Private Sub lstasesores_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lstasesores.SelectedIndexChanged

Dim conn As String
conn = CStr(Application("SqlConnection"))

Dim con As New SqlConnection(conn)
Dim cmdMostrar As New SqlCommand("SeleccionarAsesor", con)
cmdMostrar.CommandType = CommandType.StoredProcedure

Dim parameterIdAsesor As New SqlParameter("@IdAsesor", SqlDbType.UniqueIdentifier, 16)
parameterIdAsesor.Direction = ParameterDirection.Input
parameterIdAsesor.Value = lstasesores.SelectedItem.Value.ToString
cmdMostrar.Parameters.Add(parameterIdAsesor)

con.Open()

Dim drMostrar As SqlDataReader
drMostrar = cmdMostrar.ExecuteReader
drMostrar.Read()
txtnombres.Text = drMostrar("NOMBRE")
txtapellidos.Text = drMostrar("APELLIDO")
txtprofesion.Text = drMostrar("PROFESION")
txtarea.Text = drMostrar("AREA")
txtresumen.Text = drMostrar("RESUMEN_CURRICULAR")
txttelefono.Text = drMostrar("TELF_OFICINA")
txtemail.Text = drMostrar("EMAIL")
drMostrar.Close()

con.Close()

pnlinvestigador.Visible = True

End Sub

Lo he corrido por linea, pero de igual manera no determino la causa del problema. Agradezco la ayuda que puedan proporcionarme

Gracias!
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 11:12.