VB / Global.asax Font Size: 1234567
C # Source: CS / Global.asax CS / Application2.aspx CS / Schemadata.xml VB Source: VB / Global.asax VB / Application2.aspx VB / Schemadata.xml Jscript Source: JS / Global.asax JS / Application2.aspx JS /Schemadata.xml
<% @ Import namespace = "system.data"%>
<% @ Import namespace = "system.io"%>
Sub Application_Start (Sender As Object, E AS Eventargs)
DIM DS AS New DataSet
DIM FS AS FileStream
Fs = new filestream (Server.Mappath ("Schemadata.xml"), FileMode.Open, FileAccess.Read)
Dim Reader As StreamReader
Reader = New StreamReader (FS)
DS.Readxml (Reader)
Fs.close ()
Dim View as dataview
View = new dataview (ds.tables (0))
Application ("Source") = view
End Sub
script>
============