formdatabind02.aspx

来自「asp做的新闻系统」· ASPX 代码 · 共 100 行

ASPX
100 行
字号 
<%@ import NameSpace="System.Data" %>
<%@ import NameSpace="System.Data.SQL" %>
<html>
<script language="vb" runat=server>
   Sub Page_Load(o as object,e as eventargs)
     If Not IsPostBack
         '首次加载，以四种方式绑定数据源
         Dim values as ArrayList
         values=New ArrayList()
         values.add("北京")
         values.add("上海")
         values.add("天津")
         values.add("重庆")
         values.add("香港")
         values.add("澳门")
         lstArray.datasource=values
         lstArray.databind

         '控件以ArrayList方式绑定
         Dim dt as DataTable
         Dim dr as DataRow
         Dim i  as Integer
         Dim ar as Array
         dt=New DataTable()
         dt.Columns.add(New DataColumn("City",GetType(string)))
         '建立一个city字段

         For i =0 to 5
            dr=dt.NewRow()
            dr(0)=values.item(i)
            dt.rows.add(dr)
         Next
         '添加六个城市的数据

         lstDataView.DataSource=New DataView(dt)
         lstDataView.DataValueField="City"
         lstDataView.DataBind
         '控件以DataView方式绑定

         Dim ht as HashTable
         ht=New HashTable()
         ht.add("1","北京")
         ht.add("2","上海")
         ht.add("3","天津")
         ht.add("4","重庆")
         ht.add("5","香港")
         ht.add("6","澳门")
         lstHash.DataSource=ht.values
         lstHash.DataBind
         '控件以HashTable方式绑定

         dim MyConn as SQLConnection
         dim Mystr as String
         dim MyComm as SQLCommand
         dim MyReader as SQLDataReader
       MyConn=New SQLConnection("server=localhost;uid=sa;pwd=;database=test")
       '连接服务器上的Test数据库

       MyStr="select city_name from city"
       '从city表中取城市名字段(city_name)
       MyComm=New SQLCommand(Mystr,MyConn)
       MyConn.Open
       MyComm.Execute(MyReader) 
       lstDR.Datasource=MyReader
       lstDR.DataValueField="city_name"
       lstDR.DataBind
       MyConn.Close 
     End If
   End Sub
</script>

<head>
  <title>
数据绑定试验
  </title>
</head>
<body bgcolor=#ccccff>
  <center>
  <h2>数据绑定之集合绑定试验</h2>
  <hr>

  <form runat=server>
     <b>绑定到ArrayList的效果:</b>
     <asp:dropdownlist id="lstArray" runat=server />
     &nbsp;&nbsp;
     <b>绑定到DataView的效果:</b>
     <asp:dropdownlist id="lstDataView" runat=server />
     <br>
     <p></p>
     <b>绑定到HashTable的效果:</b>
     <asp:dropdownlist id="lstHash" runat=server />
     &nbsp;&nbsp;
     <b>绑定到DataReader的效果:</b>
     <asp:dropdownlist id="lstDR" runat=server />
    </form>

  </center>
</body>
</html>

formdatabind02.aspx - 源码说明

本页面展示了「asp做的新闻系统」中的 formdatabind02.aspx 源码文件，采用 ASPX 编程语言编写，共 100 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫开发者社区收录了大量与ASP相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

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