If Not lnIndex = 0 Then
     lsSQL = lsSQL & " OR "
     End If
     lsSQL = lsSQL & "(" & Join(asFieldAry, " LIKE '%" & lsKeyword & "%' OR ")
& " LIKE '%" & lsKeyword & "%')"
     Next
     lsSQL = lsSQL & ")"
     End If
     If Not lsSQL = "" Then lsSQL = "(" & lsSQL & ")"
     buildQuery = lsSQL
    End Function
    '---------------------------------------
    '     ----------------------------------------
    '     
    %>

上一页  [1] [2] [3] [4]