在ASP中，Excel是一個非常常用的工具，可以用于數據的導入、導出、分析和處理。在進行數據查詢時，我們經常會遇到需要根據多個條件來進行篩選的情況。本文將介紹如何使用ASP中的Excel對象進行多條件查詢，并給出相應的代碼示例。

假設我們有一個包含學生信息的Excel表格，其中包括學生的姓名、性別、年齡和成績等字段。我們需要查詢出年齡在18歲以下、成績大于80分的學生信息。

首先，我們需要創建一個Excel對象，打開相應的工作簿和工作表，然后使用ADO對象來讀取數據。

' 創建Excel對象
Dim objExcel
Set objExcel = CreateObject("Excel.Application")
' 打開工作簿
Dim objWorkbook
Set objWorkbook = objExcel.Workbooks.Open("C:\path\to\students.xlsx")
' 打開工作表
Dim objWorksheet
Set objWorksheet = objWorkbook.Worksheets("Sheet1")
' 讀取數據
Dim objRange
Set objRange = objWorksheet.UsedRange
Dim arrData
arrData = objRange.Value
' 關閉Excel對象
objExcel.Quit
Set objExcel = Nothing

接下來我們可以遍歷數據，并根據條件進行篩選。這里我們使用一個循環來遍歷學生數據，并將滿足條件的學生信息添加到一個結果數組中。

' 定義結果數組
Dim arrResult
ReDim arrResult(1 To objRange.Rows.Count, 1 To objRange.Columns.Count)
' 定義結果數組的行數
Dim rowNum
rowNum = 1
' 遍歷數據
Dim i
For i = 1 To objRange.Rows.Count
' 獲取當前學生的年齡和成績
Dim age
age = arrData(i, 3)
Dim score
score = arrData(i, 4)
' 根據條件進行篩選
If age< 18 And score >80 Then
' 將滿足條件的學生信息添加到結果數組中
arrResult(rowNum, 1) = arrData(i, 1) ' 姓名
arrResult(rowNum, 2) = arrData(i, 2) ' 性別
arrResult(rowNum, 3) = arrData(i, 3) ' 年齡
arrResult(rowNum, 4) = arrData(i, 4) ' 成績
rowNum = rowNum + 1
End If
Next
' 輸出滿足條件的學生信息
For i = 1 To rowNum - 1
Response.Write "姓名：" & arrResult(i, 1) & "，性別：" & arrResult(i, 2) & "，年齡：" & arrResult(i, 3) & "，成績：" & arrResult(i, 4) & "
"
Next

以上代碼中，我們首先定義了一個結果數組來存儲滿足條件的學生信息。在遍歷數據時，我們通過判斷學生的年齡和成績是否滿足條件來確定是否將該學生的信息添加到結果數組中。最后，我們使用Response.Write方法輸出滿足條件的學生信息。

通過上述代碼示例，我們可以看到如何使用ASP中的Excel對象進行多條件查詢。根據實際需要，我們可以根據不同的條件來篩選和處理Excel中的數據，從而實現更加復雜的數據查詢和分析功能。