84、案例研究：Wrox租赁店与分布式应用消息监控系统

案例研究：Wrox租赁店与分布式应用消息监控系统

1. Wrox租赁店案例

在Wrox租赁店的管理系统中，涉及到客户记录更新和订单详情展示等功能。

1.1 客户记录更新

尝试进行更新调用时，如果出现错误会进入错误处理程序。以下是相关代码：

Attempt the Update call. If an error occurs we will be taken to the error handler:
If blnShowMessage Then
    MsgBox "Customer record saved.", vbInformation
    m_blnDataChanged = False
End If
Set objHSCustomer = Nothing
Exit Sub
...
Error handling code omitted
...
End Sub

更新函数会返回操作是否成功的布尔值，根据结果会相应地显示消息框。

1.2 订单详情展示

从客户界面，用户可以打开任何客户的订单。 frmOrder 表单用于显示订单详情。有一个 Display 过程，它接收所需的 OrderID ，并使用三个函数来检索订单信息：
- wxHSOrderBR.cOrderBasket.GetDetailsByID() ：获取订单的详细信息，如日期和状态。
- wxHS