<aspataGrid id="dgservizi" runat="server" PageSize="5" AllowCustomPaging="True" CellPadding="2"
AllowPaging="True" BorderWidth="0px" AutoGenerateColumns="False" Width="700px" OnPageIndexChanged="pagservizi">
<HeaderStyle cssclass=cap></HeaderStyle>
<ItemStyle cssclass=txtr></ItemStyle>
<FooterStyle cssclass=cap></FooterStyle>
<PagerStyle NextPageText="Pagina successiva" PrevPageText="Pagina precedente"></PagerStyle>
<Columns>
<asp:TemplateColumn HeaderText="Informazioni Utili" ItemStyle-Width="700px">
<ItemTemplate>
<%#Container.DataItem("Denominazione")%> - <%#Container.DataItem("Via")%> - <%#Container.DataItem("Cap")%> <%#Container.DataItem("Localita")%>
<hr size="1" color="#808080">
</ItemTemplate>
</asp:TemplateColumn>
</Columns>
</aspataGrid>
.....
<aspanel id=pservizilimitrofi runat=server visible=false>
<tr>
<td width=700 colspan=2>




<aspataGrid id="dgservizilimitrofi" runat="server" PageSize="5" AllowCustomPaging="True" CellPadding="2"
AllowPaging="True" BorderWidth="0px" AutoGenerateColumns="False" Width="700px" OnPageIndexChanged="pagservizilimitrofi">
<HeaderStyle cssclass=cap></HeaderStyle>
<ItemStyle cssclass=txtr></ItemStyle>
<FooterStyle cssclass=cap></FooterStyle>
<PagerStyle NextPageText="Pagina successiva" PrevPageText="Pagina precedente"></PagerStyle>
<Columns>
<asp:TemplateColumn HeaderText="Informazioni Utili zone limitrofe" ItemStyle-Width="700px">
<ItemTemplate>
<%#Container.DataItem("Denominazione")%> - <%#Container.DataItem("Via")%> - <%#Container.DataItem("Cap")%> <%#Container.DataItem("Localita")%>
<hr size="1" color="#808080">
</ItemTemplate>
</asp:TemplateColumn>
</Columns>
</aspataGrid>

Nel codebehind:
dentro la binddata

....
'//*Visualizzo i servizi
Dim sql As String = "Select * from servizi where tipo=" & IdTipoServizio & " AND cap= " & cap & " Order by Denominazione"
Dim sqlConta1 As String = "Select Count(*) from servizi where tipo=" & IdTipoServizio & " AND cap= " & cap & ""

If dgservizi.VirtualItemCount = 0 Then
Dim cmdQuanti As New OleDbCommand(sqlConta1, Conn)
quanti1 = cmdQuanti.ExecuteScalar()
dgservizi.VirtualItemCount = quanti1
Else
quanti1 = dgservizi.VirtualItemCount
End If

Dim Cmd As New OleDbDataAdapter(sql, Conn)
Cmd.Fill(ds, (dgservizi.CurrentPageIndex * 10), 10, "Servizi")
Dim Source As DataView = ds.Tables("Servizi").DefaultView
dgservizi.DataSource = Source
dgservizi.DataBind()
....
'//*Visualizzo i servizi limitrofi
Dim sqlservizilimitrofi = "SELECT ZONELIMIT.*, SERVIZI.* FROM SERVIZI INNER JOIN ZONELIMIT ON SERVIZI.Cap = ZONELIMIT.Cap1 where cap1= " & cap & " and tipo=" & IdTipoServizio & " Order by Denominazione"
Dim sqlConta2 As String = "Select Count(*) FROM SERVIZI INNER JOIN ZONELIMIT ON SERVIZI.Cap = ZONELIMIT.Cap1 where cap1= " & cap & " and tipo=" & IdTipoServizio & ""

If dgservizilimitrofi.VirtualItemCount = 0 Then
Dim cmdQuanti As New OleDbCommand(sqlConta2, Conn)
quanti2 = cmdQuanti.ExecuteScalar()
dgservizilimitrofi.VirtualItemCount = quanti2
Else
quanti2 = dgservizi.VirtualItemCount
End If

Dim Cmd As New OleDbDataAdapter(sqlservizilimitrofi, Conn)
Cmd.Fill(ds, (dgservizilimitrofi.CurrentPageIndex * 10), 10, "Servizilimitrofi")
Dim Source As DataView = ds.Tables("Servizilimitrofi").DefaultView
dgservizilimitrofi.DataSource = Source
dgservizilimitrofi.DataBind()
....

Sub pagservizi(ByVal sender As Object, ByVal e As DataGridPageChangedEventArgs)

dgservizi.CurrentPageIndex = e.NewPageIndex
BindData()

End Sub

Sub pagservizilimitrofi(ByVal sender As Object, ByVal e As DataGridPageChangedEventArgs)

dgservizilimitrofi.CurrentPageIndex = e.NewPageIndex
BindData()

End Sub

... mi sembra di aver postato tutto il codice necessario....
Praticamente se clicco su "pagina successiva" ricarica la pagina e non vedo + ne il datagrid sopra ne quello sotto

grazie,
Elisa