% '如果沒有輸入關鍵字則傳回所有資料 if Request("KeyWord")=Empty then sql = "SELECT * from process" Set rs = conn.Execute( sql ) else '尋找主題或內容中與關鍵字符合的資料 sql = "SELECT * from process where 批號 == '"&Request("keyword")&"' " Set rs = conn.Execute( sql ) end if %>