dataview1.aspx

来自「《精通ASP.NET网络编程》附带实例」· ASPX 代码 · 共 68 行

ASPX
68
字号
<%@Import Namespace="System.Data"%>
<%@Import Namespace="System.Data.OleDb"%>
<html>
<Script Language=VB Runat=Server>
   Sub Page_Load(Sender As Object, e As EventArgs)
      Dim dtConn As OleDbConnection
      Dim dtCmd As OleDbDataAdapter
      Dim dtSet As DataSet
      Dim sSQL As String
      Dim dv,dv2 As DataView
      sSQL = "Select * From 学生成绩表;"

      dtConn = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("Sample.mdb"))

      dtCmd = New OleDbDataAdapter(sSql, dtConn)

    
      dtSet = New DataSet
      dtCmd.Fill(dtSet)
      dv=New DataView(dtSet.Tables(0))
      dv.RowFilter="数学>=90"
      dv2=New DataView(dtSet.Tables(0))
      dv2.RowFilter="数学<90"
      myDataGrid.DataSource=dv
      myDataGrid.DataBind()
      my2DataGrid.DataSource=dv2
      my2DataGrid.DataBind()
    ENd Sub 
     
     
</Script>
<body>

    <h3><font face="Verdana">使用DataView自定义显示的数据</font></h3>

    <form runat=server>
     <h3><font face="Verdana">数学成绩大于等于90的学生信息</font></h3>


      <ASP:DataGrid id="myDataGrid" runat="server"
        BorderColor="black"
        BorderWidth="1"
        GridLines="Both"
        CellPadding="3"
        CellSpacing="0"
        Font-Name="Verdana"
        Font-Size="8pt"
        HeaderStyle-BackColor="#aaaadd"
      />
 <h3><font face="Verdana">数学成绩小于等于90的学生信息</font></h3>

      <ASP:DataGrid id="my2DataGrid" runat="server"
        BorderColor="black"
        BorderWidth="1"
        GridLines="Both"
        CellPadding="3"
        CellSpacing="0"
        Font-Name="Verdana"
        Font-Size="8pt"
        HeaderStyle-BackColor="#aaaadd"
      />

  </form>


</body>
</html>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?