比如:
dim bumen '部門
bumen=trim(request("bumen"))
dim wherestr '定義條件臨時變量
if len(bumen)>0 then wherestr=" [部門字段名]='" & bumen & "'"
'SQL語句表示選擇哪個部門就查哪個部門的數據,不選擇就顯示全部
sql="select * from [表名]" & wherestr
其它相關代碼省略,自己寫那些基礎代碼