Imports WPerSalud.Common
Public Class PerInt_Afiliados
Inherits System.Web.UI.Page
#Region " Código generado por el Diseñador de Web Forms "
'El Diseñador de Web Forms requiere esta llamada.
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
End Sub
Protected WithEvents TxtFecha1 As System.Web.UI.WebControls.TextBox
Protected WithEvents TxtFecha2 As System.Web.UI.WebControls.TextBox
Protected WithEvents BtnListado As System.Web.UI.WebControls.Button
Protected WithEvents BtnReporte As System.Web.UI.WebControls.Button
Protected WithEvents GrdListadoAfl As System.Web.UI.WebControls.DataGrid
'NOTA: el Diseñador de Web Forms necesita la siguiente declaración del marcador de posición.
'No se debe eliminar o mover.
Private designerPlaceholderDeclaration As System.Object
Private Sub Page_Init(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Init
'CODEGEN: el Diseñador de Web Forms requiere esta llamada de método
'No la modifique con el editor de código.
InitializeComponent()
End Sub
#End Region
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
End Sub
Private Sub BtnListado_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnListado.Click
SubCargarDatos()
End Sub
Private Sub SubCargarDatos()
'GrdListadoAfl.Visible = True
Try
Dim DSTemp As DataSet = DatosRetornarDataSet("sp_Int_AportesAfiliados", TxtFecha1.Text, TxtFecha2.Text)
Dim TmpDT As DataTable = DSTemp.Tables(1)
CtrlsCargarGridDataGrid(GrdListadoAfl, 0, TmpDT)
TmpDT.Dispose()
DSTemp.Dispose()
Catch ex As Exception
Response.Write("error ***")
End Try
End Sub
Private Sub BtnReporte_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnReporte.Click
Response.Redirect("http://localhost/Reports/Pages/Report.aspx?ItemPath=%2fReport7")
End Sub
End Class
---------
Hola me ha pasado algo muy extraño, había hecho este simple formulario donde ingresan la fecha y al hacer click en listado genera un listado que se aprecia en un datagrid, funcionaba bien hasta hace unas horas que lo probé pero me metí en el "diseñador" y quize sacar el datagrid de la tabla donde estaba lo puse fuera de la tabla y borré la tabla, al cargar de nuevo la página el datagrid ya no funciona pero todo el procedimiento almacenado se generar perfectamente, saben a q se puede deber esta falla?
No puedo ver el datagrid, volví a ponerlo en una tabla y no funciona, me parece raro otras veces me ha pasado q no carga el datagrid y después de unas horas está funcionando creo q eso va pasar esta vez porq no veo error en el código todo está normal.
Agradecería sus comentarios
