Wrox Home  
Search P2P Archive for: Go

  Return to Index  

aspx_espanol thread: Problemas al utilizar paging con variables


Message #1 by "Antonio Garcia Gonzalez" <antonio_garcia@d...> on Wed, 28 Aug 2002 11:11:59
Hola
Tengo una pagina en la cual debo visualizar multiples registros y neceisto 
la opcion paging. El problema es que la primera pagina se ve correctamente 
con las variables seleccionas para buscar en la base de datos e incluso se 
ve el numero de paginas, pero al dar a la siguiente pagina devuelve los 
datos sin tener en cuenta el valor de la variable y baja todos los 
registros. Creo que el problema es que no se como volver a cargar las 
variables cuando utilizo

     sub DataGrid1_PageIndexChanged(obj as Object, e as 
DataGridPageChangedEventArgs)
      DataGrid1.CurrentPageIndex = e.NewPageIndex
      binDataGrid
  	 end Sub

espero vuestra ayuda. Aqui os muestro el codigo completo de la pagina

=====================================

<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.SqlClient" %>
<html>
<script language="VB" runat="server">

   sub Page_Load(obj as Object, e as EventArgs) 
   if not ispostback then
   binDataGrid
   end if
   end sub
   
   sub binDataGrid
   
        'Realizar Conexion
      dim myConnection as new SqlConnection
("Server=LOCALHOST;database=TELEFONO;uid=webrecom;password=oftecjagg") 
        
		
		' RECOGIDA DE VARIABLES Y ESTABLECER OPCIONES DE BUSQUEDA
		
		 Dim nombre As String = CStr(Request.Params("nombre"))
    	 dim v_nombre As String
			If nombre = "" Then
		 	v_nombre = "nombre <> 'LIBRE'" 
			Else
			v_nombre = "nombre LIKE '%"& nombre &"%'"
		End If
		
		Dim u_windows As String = CStr(Request.Params("u_windows"))
    	 dim v_u_windows As String
			If u_windows = "" Then
		 	v_u_windows = "" 
			Else
			v_u_windows = " AND id_windows = '"& u_windows &"'"
		End If
		
 
	      dim myCommand as new SqlDataAdapter("select id_windows, 
plataforma, nombre, extension, funcion, campana1, campana2 from AGENTES 
WHERE "& v_nombre &" ORDER BY id_windows", myConnection)

		
	
		
      'Llenar el dataset
      dim ds as DataSet = new DataSet()
      myCommand.Fill(ds, "AGENTES")
	  

	 
      'select data view and bind to server control
      DataGrid1.DataSource = ds.Tables("AGENTES").DefaultView
      DataGrid1.DataBind()
   end sub
   
     sub DataGrid1_PageIndexChanged(obj as Object, e as 
DataGridPageChangedEventArgs)
      DataGrid1.CurrentPageIndex = e.NewPageIndex
      binDataGrid
  	 end Sub
	 
      sub DataGrid1_ItemCommand(obj as object, e as _
      DataGridCommandEventArgs)
      DataGrid1.SelectedIndex = e.Item.ItemIndex
      DataBind()
   end Sub
   

   
   </script>

<html>
<head>
<title>Documento sin t&iacute;tulo</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>

<body background="../IMAGENES/fondo.jpg" leftmargin="0" topmargin="0" 
marginwidth="0" marginheight="0">
<table width="620" border="0" cellpadding="0" cellspacing="0">
  <tr>
    <td align="left"><img src="../IMAGENES/banner.jpg" width="620" 
height="84" align="top"></td>
  </tr>
</table>
<table width="620" height="1200" border="0" cellpadding="0" 
cellspacing="0">
  <tr>
    <td align="center" valign="top"> 
      <form runat="server">
        <font color="#CCCCCC">
        <asp:Label id="CABECERA" runat="server" 
         BorderWidth="1px" BorderStyle="Solid" BorderColor="Tan"
         Font-NameFont-Names="Arial" Font-Size="10pt"
         Height="17px" Width="610" BackColor="#0066CC"
         ForeColor="white" Font-Bold="true"
         Text="DIRECTORIO DE AGENTES"/></font> <font color="#CCCCCC" 
face="Arial">
        <asp:DataGrid id="DataGrid1" runat="server"
	      BorderWidth="1px" BorderStyle="Solid" BorderColor="Tan"
	      GridLines="Vertical"
	      cellpadding="2"
	      cellspacing="0"
	      width="610"
	      Font-NameFont-Names="Arial"
	      Font-Size="8pt"
	      Fore-color="Darkslateblue"
	      ShowFooter="True"
	      HeaderStyle-BackColor="#006699" 
	      HeaderStyle-ForeColor="White"
	      HeaderStyle-FontName="Verdana"
	      HeaderStyle-Font-Size="9pt"
	      HeaderStyle-Font-Bold="true"
	      FooterStyle-BackColor="#006699"
	      ItemStyle-BackColor="#ffffff"
	      ItemStyle-Forecolor="Darkslateblue"
	      AlternatingItemStyle-Backcolor="Beige"
	      AutoGenerateColumns="false"
		  AllowPaging="True"
	      PageSize=10
	      PagerStyle-Mode=NumericPages
	      PagerStyle-PageButtonCount = 5	      
	      OnPageIndexChanged="DataGrid1_PageIndexChanged"> 
          <Columns>
          <asp:BoundColumn HeaderText="Centro"
	                  DataField="plataforma"/> 
          <asp:BoundColumn HeaderText="Usuario"
	                  DataField="id_windows"/> 
          <asp:BoundColumn HeaderText="Nombre"
	                  DataField="nombre"/> 
          <asp:BoundColumn HeaderText="Ext."
	                  DataField="extension"/> 
          <asp:BoundColumn HeaderText="Función"
	                  DataField="funcion"/> 
          <asp:BoundColumn HeaderText="Campaña 1"
	                  DataField="campana1"/> 
          <asp:BoundColumn HeaderText="Campaña 2"
	                  DataField="campana2"/> 
          </Columns>
        </asp:DataGrid>
        </font> 
      </form>
    </td>
  </tr>
</table>

</body>
</html>

==================================


  Return to Index