35、客户服务应用程序代码解析与操作指南

客户服务应用程序代码解析与操作指南

1. 搜索功能代码解析

在客户服务应用程序中，搜索功能是一个重要的部分。下面我们来详细解析搜索功能相关的代码。

首先是错误处理的代码：

HandleError:
GeneralErrorHandler Err.Number, Err.Description, SEARCH_FORM, "RunSearch"
Exit Sub
End Sub

这段代码用于处理错误，当出现错误时，调用 GeneralErrorHandler 函数记录错误信息。

接下来是生成 SQL 语句的 GetSQL 函数：

Function GetSQL() As String
    On Error GoTo HandleError
    Dim strSQL As String
    Dim strSQLWhereClause As String
    Dim blnPriorWhere As Boolean
    blnPriorWhere = False
    'generate the first part of the SQL Statement
    strSQL = BuildSQLSelectFrom()
    'build the where criteria based on the criteria filled in
    'by the user in one or more of the