GridView如何将分页数据全部导出为EXCEL？

GRIDVIEW分页状态下将全部数据导出

protected void Button2_Click(object sender, EventArgs e)
//按button2将gridview将数据导出。
    {
        GridView1.AllowPaging = false; //清除分页
        GridView1.AllowSorting = false; //清除排序     
      pbind();  //你绑定gridview1数据源的那个函数。
        Response.Clear();
        Response.Buffer = true;
        Response.Charset = "GB2312";
        Response.AppendHeader("Content-Disposition", "attachment;filename=dpdgxkh.xls"); //.xls的文件名可修改
        Response.ContentEncoding = System.Text.Encoding.UTF7;
        Response.ContentType = "application/ms-excel";      //设置输出文件类型为excel文件。   
        System.IO.StringWriter oStringWriter = new System.IO.StringWriter();
        System.Web.UI.HtmlTextWriter oHtmlTextWriter = new System.Web.UI.HtmlTextWriter(oStringWriter);
        GridView1.RenderControl(oHtmlTextWriter);
        Response.Output.Write(oStringWriter.ToString());
        Response.Flush();
        Response.End();
        GridView1.AllowSorting = true; //恢复分页          GridView1.AllowPaging = true;  //恢复排序
        pbind(); //再次绑定    }

分页状态下将GRIDVIEW中的全部数据进行运算

Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim ads As New AccessDataSource("~/app_data/jgsu.mdb", "")
        Me.GridView1.AllowPaging = False '清除分页 
        Me.GridView1.DataBind()    ’重新绑定数据源
        If Me.GridView1.Rows.Count > 0 Then
            Dim ROW_ID6 As Integer
            ROW_ID6 = 0
            For ROW_ID6 = 0 To Me.GridView1.Rows.Count - 1
                Dim Xh_2 = Me.GridView1.Rows(ROW_ID6).Cells(0).Text

ads.InsertCommand = "insert into sheet2 (xh,xm,bj,bz1,bz2) values (" & Xh_2 & "," & Xh_2 & ",3,4,5)"
                ads.Insert()
            Next ROW_ID6
        End If
        Me.GridView1.AllowPaging = True '分页
        Me.GridView1.DataBind()  ’重新绑定数据源

End Sub