代码如下
set conn=opendb("oabusy","conn","accessdsn")
set rs=server.createobject("adodb.recordset")
if request.Form("query")="查询" then
aa=request("selecttown")
sql="select * from Department where town=" & sqlstr(aa)
else
sql="select * from Department order by StatID"
end if
rs.open sql,conn,1