通讯簿命令按钮
通讯簿应用程序包括以下命令按钮:
“查找”按钮,用于将查询提交到数据库。
“清除”按钮,用于在开始新搜索之前清除文本框。
“更新配置文件”按钮,用于保存对员工记录的更改。
“取消更改”按钮,用于放弃更改。
重要
从 Windows 8 和 Windows Server 2012 开始,Windows 操作系统不再包含 RDS 服务器组件(有关更多详细信息,请参阅 Windows 8 和 Windows Server 2012 兼容性实用手册)。 Windows 的未来版本中将移除 RDS 客户端组件。 请避免在新的开发工作中使用该功能,并着手修改当前还在使用该功能的应用程序。 使用 RDS 的应用程序应迁移到 WCF 数据服务。
“查找”按钮
单击“查找”按钮将激活 VBScript Find_OnClick Sub 过程,该过程生成并发送 SQL 查询。 单击此按钮将填充数据网格。
生成 SQL 查询
Find_OnClick Sub 过程的第一部分通过将文本字符串追加到全局 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%'
如果查询成功,则姓氏包含文本“Berge”(如 Berge 和 Berger)且标题包含单词“Program Manager”(例如,Program Manager, Advanced Technologies)的所有人员都将显示在 HTML 数据网格中。
准备和发送查询
Find_OnClick Sub 过程的最后一部分由两个语句组成。 第一个语句将 RDS.DataControl 对象的 SQL 属性指定为等于动态生成的 SQL 查询。 第二个语句使 RDS.DataControl 对象 (DC1
) 查询数据库,然后在网格中显示查询的新结果。
Sub Find_OnClick
'...
DC1.SQL = myQuery
DC1.Refresh
End Sub
“更新配置文件”按钮
单击“更新配置文件”按钮将激活 VBScript Update_OnClick Sub 过程,该过程执行 RDS.DataControl 对象的 (DC1
) SubmitChanges 和 Refresh 方法。
Sub Update_OnClick
DC1.SubmitChanges
DC1.Refresh
End Sub
当 DC1.SubmitChanges
执行时,远程数据服务会打包所有更新信息,并通过 HTTP 将其发送到服务器。 更新是全有或全无的;如果更新的一部分未成功,则不会进行任何更改,并返回状态消息。 DC1.Refresh
在使用远程数据服务 SubmitChanges 之后,不再是必需的,但它可确保数据是最新的。
“取消更改”按钮
单击“取消更改”将激活 VBScript Cancel_OnClick Sub 过程,该过程执行 RDS.DataControl 对象的 (DC1)
CancelUpdate 方法。
Sub Cancel_OnClick
DC1.CancelUpdate
End Sub
当 DC1.CancelUpdate
执行时,它会放弃自上次查询或更新以来用户对数据网格上的员工记录所做的任何编辑。 它将还原原始值。