通讯簿应用程序包括以下命令按钮:
“查找”按钮,用于向数据库提交查询。
清除 按钮,用于在开始新搜索之前清除文本框。
更新配置文件 按钮,用于保存对员工记录的更改。
“取消更改” 按钮用于放弃更改。
重要
从 Windows 8 和 Windows Server 2012 开始,RDS 服务器组件不再包含在 Windows 操作系统中(有关详细信息,请参阅 Windows 8 和 Windows Server 2012 兼容性指南)。 RDS 客户端组件将在将来的 Windows 版本中删除。 避免在新开发工作中使用此功能,并计划修改当前使用此功能的应用程序。 使用 RDS 的应用程序应迁移到 WCF 数据服务。
“查找”按钮
单击 “查找”按钮将激活 VBScript Find_OnClick 子过程,该过程生成并发送 SQL 查询。 单击此按钮将填充数据网格。
生成 SQL 查询
Find_OnClick子过程的第一部分通过逐次向全局 SQL SELECT 语句追加文本字符串来构建 SQL 查询。 它首先将变量 myQuery
设置为 SQL SELECT 语句,该语句从数据源表请求所有数据行。 接下来,Sub 过程扫描页面上四个输入框中的每一个。
由于程序在生成 SQL 语句时使用单词 like
,因此查询是子字符串搜索,而不是完全匹配。
例如,如果 姓氏 框包含条目“Berge”,并且 职位 框包含条目“Program Manager”,则 SQL 语句(myQuery
的值)将读取为:
Select FirstName, LastName, Title, Email, Building, Room, Phone from Employee where lastname like 'Berge%' and title like 'Program Manager%'
如果查询成功,则 HTML 数据网格中会显示包含文本“Berge”(如 Berge 和 Berger)的姓氏的所有人员,以及包含“项目经理”(例如,项目经理、高级技术)的标题。
准备和发送查询
Find_OnClick Sub 过程的最后一部分由两个语句组成。 第一个语句分配 RDS 的 SQL 属性。DataControl 对象等于动态生成的 SQL 查询。 第二个语句导致 RDS。DataControl 对象(DC1
)查询数据库,然后在网格中显示查询的新结果。
Sub Find_OnClick
'...
DC1.SQL = myQuery
DC1.Refresh
End Sub
“更新配置文件”按钮
单击 更新配置文件 按钮将激活执行 RDS 的 VBScript Update_OnClick 子过程。DataControl 对象的 (DC1
) SubmitChanges 和 Refresh 方法。
Sub Update_OnClick
DC1.SubmitChanges
DC1.Refresh
End Sub
执行 DC1.SubmitChanges
时,远程数据服务会打包所有更新信息,并通过 HTTP 将其发送到服务器。 更新是「全有或全无」的;如果更新的一部分未成功,则不会进行任何更改,并且会返回状态消息。 使用远程数据服务 DC1.Refresh
后,不需要 ,但可确保新的数据。
“取消更改”按钮
单击 “取消更改” 后,将激活 VBScript 的 Cancel_OnClick 子过程,它会执行 RDS.DataControl 对象的DC1)
CancelUpdate 方法。
Sub Cancel_OnClick
DC1.CancelUpdate
End Sub
执行 DC1.CancelUpdate
时,它会放弃用户自上次查询或更新以来对数据网格上员工记录所做的任何编辑。 它还原原始值。