asp+中取代ASP的RS(Remote Scripting)技術的Framework
Batman
在上面的文章裡面我提到了Page.IsPostBack屬性的一個應用,可以用來保存用戶輸入的
信息,下面我將介紹它的另外一個用處,那就是取代ASP中的RS(Remote Scripting)技術。
至於RS的基本概念和用法我已經在ASP版裡面有很多介紹了,它主要的優勢就是在不刷新
當前頁面的情況下和服務器端進行通信。但是由於它的底層是使用了Java技術,所以它用
起來還是顯得較為煩瑣,下面我就將介紹在ASP+中如何利用Page.IsPostBack來取代RS技術。
按照我的習慣是喜歡用具體的例子來解釋問題,所以這次還是使用一個簡單的實例來說明
問題。下面這個例子中,將使用一個PRoducts.ASPx程序,它主要有兩個服務器端控件(Server-side
control),這是ASP+裡面引入的新的控件編程方式,一個是一個下拉框控件--'mudCategorIEs',
另外一個是列表框控件--'mudProducts'。這個例子將演示,列表框中的內容將跟隨下拉框中內容
的改變而改變,為了大家重現的方便,我將使用SQL Server中自帶的數據庫例子來實現。
Products.ASPx代碼如下:
<%@ Import Namespace="System.Data"%>
<%@ Import Namespace="System.Data.ADO"%>
<script language="VB" runat="server">
Sub Page_Load (SourceObj as Object, EveArg as EventArgs)
If Not Page.IsPostBack Then
Dim mudCommand As ADODataSetCommand
Dim mudConnection As ADOConnection
Dim dSet As New DataSet
Dim strSQL as String
Dim connStr as String
strSQL = "SELECT CategoryID, CategoryName From CategorIEs"
connStr = "Provider = SQLOLEDB; Data Source=test; Initial Catalog=Northwind; User ID=sa; passWord=;"
mudConnection = New ADOConnection(connStr)
mudCommand = New ADODataSetCommand(strSQL, mudConnection)
mudCommand.FillDataSet(dSet, "CategorIEs")
mudCategories.DataSource = dSet.Tables("Categories").DefaultVIEw
mudCategorIEs.DataBind()
End If
End Sub
Sub displayProducts (Source as Object, EveArg as EventArgs)
Dim mudCommand As ADODataSetCommand
Dim mudConnection As ADOConnection
Dim dSet As New DataSet
Dim strSQL as String
Dim connStr as String
connStr = "Provider = SQLOLEDB; Data Source=test; Initial Catalog=Northwind; User ID=sa; passWord=;"
strSQL = "Select ProductID, ProductName From Products"
strSQL = strSQL & " WHERE CategoryID = " & mudCategorIEs.SelectedItem.Value
mudConnection = New ADOConnection(connStr)
mudCommand = New ADODataSetCommand(strSQL, mudConnection)
mudCommand.FillDataSet(dSet, "Products")
mudProducts.DataSource = dSet.Tables("Products").DefaultVIEw
mudProducts.DataBind()
End Sub
</script>
<Html>
<form name="mudForm" runat="server">
產品目錄:
<ASP:DropDownList id="mudCategories" runat="server" DataTextField="CategoryName" DataValueFIEld="CategoryID" AutoPostBack="true" OnSelectedIndExchanged="displayProducts"/>
產品: <ASP:ListBox id="mudProducts" SelectionMode="Multiple" DataValueField="ProductID" DataTextFIEld="ProductName" runat="server" />
</Html>
從例子程序可以看到,其中顯然是使用了服務器端控件的下拉框OnChange事件配合AutoPostBack和
Page.IsPostBack屬性就可以很簡單和清晰的實現了以前在ASP中煩瑣的RS實現方法。
呵呵,希望大家從上面的這個例子中有所收獲。