繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > ASP+中取代ASP的RS(Remote Scripting)技术的Framework
- ASP
- 编写通用的asp防注入程序
- vbs(asp)下的Function 语句
- ASP中类Class相关内容的整理资料
- 字符批量替换程序asp服务器版
- 旁注-网站小助手旭方修改免杀asp版
- 用正则表达式写的HTML分离函数
- asp中"无限流"分页程序代码
- asp的一个日期格式化函数
- asp中创建多级目录的两段代码
- asp中去除内容HTML标签的三个function函数
- chr(9)、chr(10)、chr(13)、chr(32)、chr(34)讲解
- 方便的大家admin及admin888 经过 md5加密后16位和32位代码
- 可用的ASP无重复数字随机函数, 数组实现, 并应用于随机显示记录集
- asp动态级联菜单代码
- ASP中经常使用的SQL语句与教程说明
- 实例分析之用ASP编程实现网络内容快速查找的代码
- 服务端 VBScript 与 JScript 几个相同特性的写法与示例
- ASP 环境下 VBS 事件应用 示例代码
- asp 之上传漏洞终结篇
- asp中一段防SQL注入的通用脚本
ASP+中取代ASP的RS(Remote Scripting)技术的Framework
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 226 ::
收藏到网摘: n/a
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
评论 (0) All
