日期:2009-09-30 浏览次数:20961 次
<HTML>
<head>
<link rel="stylesheet"href=../../"intro.CSS">
</head>
<script language="VB" runat=server>
Sub SubmitBtn_Click(Sender As Object, E As EventArgs)
Dim DS As DataSet
Dim MyConnection As SQLConnection
Dim MyCommand As SQLDataSetCommand
'以下是数据库联结
MyConnection = New SQLConnection("server=localhost;uid=sa;pwd=;database=pubs")
MyCommand = New SQLDataSetCommand("select * from Titles where type='" + Category.SelectedItem.Value + "'", myConnection)
DS = new DataSet()
MyCommand.FillDataSet(DS, "Titles")
MyList.DataSource = DS.Tables("Titles").DefaultView
MyList.DataBind()
End Sub
</script>
<body>
<center>
<form action="intro75.ASPx" method="post" runat="server">
<ASP:adrotator AdvertisementFile="ads.XML" BorderColor="black" BorderWidth=1 runat="server"/>
<h3> Name: <ASP:textbox id="Name" runat="server"/>
Category: <ASP:dropdownlist id="Category" runat=server>
<ASP:listitem >psychology</ASP:listitem>
<ASP:listitem >business</ASP:listitem>
<ASP:listitem >popular_comp</ASP:listitem>
</ASP:dropdownlist>
<ASP:button type=submit text="Lookup" OnClick="SubmitBtn_Click" runat="server"/>
<p>
<ASP:DataGrid id="MyList" HeaderStyle-BackColor="#aaaadd" BackColor="#ccccff" runat="server"/>
</form>
</center>
</body>
</HTML>
这个例子的运行示例在
http://tutorial.superexpert.com/quickstart/ASPplus/samples/webforms/intro/intro75.ASPx
数据表格(data grid)控件 <ASP:datagrid runat=server>
给我们提供了一种非常简单的方法用传统的UI截面去显示数据查询的结果.ASP+ 的开发者现在还可以通过<ASP:dataList runat=server>
来定制数据列表显示来定制信息
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.SQL" %>
<HTML>
<head>
<link rel="stylesheet"href=../../"intro.CSS">
</head>
<script language="VB" runat=server>
Sub SubmitBtn_Click(Sender As Object, E As EventArgs)
Dim DS As DataSet
Dim MyConnection As SQLConnection
Dim MyCommand As SQLDataSetCommand
MyConnection = New SQLConnection("server=localhost;uid=sa;pwd=;database=pubs")
MyCommand = New SQLDataSetCommand("select * from Titles where type='" + Category.SelectedItem.Value + "'", myConnection)
DS = new Data