<%@PageLanguage="VB"%>
<!DOCTYPEhtmlPUBLIC"-//W3C//DTDXHTML1.0Transitional//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<scriptrunat="server">
FunctionCreateDataSource()AsICollection
DimdtAsSystem.Data.DataTable=NewSystem.Data.DataTable
DimdrAsSystem.Data.DataRow
dt.Columns.Add(NewSystem.Data.DataColumn("学生班级",GetType(System.String)))
dt.Columns.Add(NewSystem.Data.DataColumn("学生姓名",GetType(System.String)))
dt.Columns.Add(NewSystem.Data.DataColumn("语文",GetType(System.Decimal)))
dt.Columns.Add(NewSystem.Data.DataColumn("数学",GetType(System.Decimal)))
dt.Columns.Add(NewSystem.Data.DataColumn("英语",GetType(System.Decimal)))
dt.Columns.Add(NewSystem.Data.DataColumn("计算机",GetType(System.Decimal)))
DimiAsInteger=0
Fori=0To50-1
DimrdAsSystem.Random=NewSystem.Random(Environment.TickCount*i)
dr=dt.NewRow
dr(0)="班级"+i.ToString
dr(1)="【孟子E章】"+i.ToString
dr(2)=System.Math.Round(rd.NextDouble*100,2)
dr(3)=System.Math.Round(rd.NextDouble*100,2)
dr(4)=System.Math.Round(rd.NextDouble*100,2)
dr(5)=System.Math.Round(rd.NextDouble*100,2)
dt.Rows.Add(dr)
Next
DimdvAsSystem.Data.DataView=NewSystem.Data.DataView(dt)
Returndv
EndFunction
ProtectedSubPage_Load(ByValsenderAsObject,ByValeAsEventArgs)
IfNotIsPostBackThen
GridView1.DataSource=CreateDataSource()
GridView1.DataBind()
EndIf
EndSub
ProtectedOverloadsOverridesSubRender(ByValwriterAsHtmlTextWriter)
DimhtmlAsSystem.IO.StringWriter=NewSystem.IO.StringWriter
DimtwAsSystem.Web.UI.HtmlTextWriter=NewSystem.Web.UI.HtmlTextWriter(html)
MyBase.Render(tw)
DimswAsSystem.IO.StreamWriter
sw=NewSystem.IO.StreamWriter(Server.MapPath("a.htm"),False,System.Text.Encoding.Default)
sw.Write(html.ToString)
sw.Close()
tw.Close()
Response.Write(html.ToString)
Endsub
</script>
<htmlxmlns="http://www.w3.org/1999/xhtml">
<head>
<title>得到ASP.NET生成的HTML</title>
</head>
<body>
<formid="Form1"runat="server">
<asp:GridViewID="GridView1"runat="server"Font-Size="12px"BackColor="#FFFFFF"
GridLines="Both"CellPadding="4"Width="560">
<HeaderStyleBackColor="#EDEDED"Height="26px"/>
</asp:GridView>
</form>
</body>
</html>
<!DOCTYPEhtmlPUBLIC"-//W3C//DTDXHTML1.0Transitional//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<scriptrunat="server">
FunctionCreateDataSource()AsICollection
DimdtAsSystem.Data.DataTable=NewSystem.Data.DataTable
DimdrAsSystem.Data.DataRow
dt.Columns.Add(NewSystem.Data.DataColumn("学生班级",GetType(System.String)))
dt.Columns.Add(NewSystem.Data.DataColumn("学生姓名",GetType(System.String)))
dt.Columns.Add(NewSystem.Data.DataColumn("语文",GetType(System.Decimal)))
dt.Columns.Add(NewSystem.Data.DataColumn("数学",GetType(System.Decimal)))
dt.Columns.Add(NewSystem.Data.DataColumn("英语",GetType(System.Decimal)))
dt.Columns.Add(NewSystem.Data.DataColumn("计算机",GetType(System.Decimal)))
DimiAsInteger=0
Fori=0To50-1
DimrdAsSystem.Random=NewSystem.Random(Environment.TickCount*i)
dr=dt.NewRow
dr(0)="班级"+i.ToString
dr(1)="【孟子E章】"+i.ToString
dr(2)=System.Math.Round(rd.NextDouble*100,2)
dr(3)=System.Math.Round(rd.NextDouble*100,2)
dr(4)=System.Math.Round(rd.NextDouble*100,2)
dr(5)=System.Math.Round(rd.NextDouble*100,2)
dt.Rows.Add(dr)
Next
DimdvAsSystem.Data.DataView=NewSystem.Data.DataView(dt)
Returndv
EndFunction
ProtectedSubPage_Load(ByValsenderAsObject,ByValeAsEventArgs)
IfNotIsPostBackThen
GridView1.DataSource=CreateDataSource()
GridView1.DataBind()
EndIf
EndSub
ProtectedOverloadsOverridesSubRender(ByValwriterAsHtmlTextWriter)
DimhtmlAsSystem.IO.StringWriter=NewSystem.IO.StringWriter
DimtwAsSystem.Web.UI.HtmlTextWriter=NewSystem.Web.UI.HtmlTextWriter(html)
MyBase.Render(tw)
DimswAsSystem.IO.StreamWriter
sw=NewSystem.IO.StreamWriter(Server.MapPath("a.htm"),False,System.Text.Encoding.Default)
sw.Write(html.ToString)
sw.Close()
tw.Close()
Response.Write(html.ToString)
Endsub
</script>
<htmlxmlns="http://www.w3.org/1999/xhtml">
<head>
<title>得到ASP.NET生成的HTML</title>
</head>
<body>
<formid="Form1"runat="server">
<asp:GridViewID="GridView1"runat="server"Font-Size="12px"BackColor="#FFFFFF"
GridLines="Both"CellPadding="4"Width="560">
<HeaderStyleBackColor="#EDEDED"Height="26px"/>
</asp:GridView>
</form>
</body>
</html>
在ASP.NET 2.0中,有时候需要对ASP.NET生成的HTML代码进行处理,或者是保存成静态文件。ASP.NET 提供了直接将请求保存成文件的方法:HttpRequest.SaveAs方法。下面这个方法就是在ASP.NET 2.0中得到ASP.NET生成的HTML代码,同时,生成一个静态文件的方法。