关于多条件精确匹配查询
anxl 2003-09-30 08:36:28 初学ASP 大家多指教谢谢!多条件精确匹配查询这样写对吗?为什么
查询页定义from 依次为“jm”“jx”“nd”“js”要求查询结果为:jm加jx加nd加js,每个from可为空
<%
dim conn
on error resume next
Set conn=Server.CreateObject("ADODB.Connection")
conn.open "dsn=lxd;uid=;pwd=;"
%>
<%
const MaxPerPage=20
dim totalPut
dim category
dim CurrentPage
dim TotalPages
dim i
dim filename
dim categoryid
jm = request.form("jm")
jx =request.form("jx")
nd = request.form("nd")
js = request.form("js")
%>
<%
if not isempty(request("page")) then
currentPage=cint(request("page"))
else
currentPage=1
end if
filename="yphj_search.asp"
dim sql
dim rs
sql = "select lxzlt.zlno as lzlno,lxzlt.Name as orname, lxzlt.Cname as Cname, lxzlt.Director as Director, lxzlt.content as content, lxzlt.hints as hints, lxzlt.lang as lang, lxzlt.minutes as minutes, lxzlt.kinds as kinds,lxzlt.Counts as Counts from lxzlt inner join prize on lxzlt.zlno = prize.zlno where prize.Prize like '%"&jm&"%' and prize.kind like '%"&jx&"%' and prize.Pyear like '%"&nd&"%' and prize.Parray like '%"&js&"%' order by lxzlt.zlno asc"
Set RS = Server.CreateObject("ADODB.Recordset")
rs.open sql,conn,3,1