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
