<%
search = ""
if request("PTYPE")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " PTYPE like '%" & request("PTYPE") & "%' "
end if
if request("PSERIES")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " PSERIES like '%" & request("PSERIES") & "%' "
end if
if request("PMODEL")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " PMODEL like '%" & request("PMODEL") & "%' "
end if
if request("PFEATURES")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " PFEATURES = '" & request("PFEATURES") & "' "
end if
if request("PMAINIMG")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " PMAINIMG = '" & request("PMAINIMG") & "' "
end if
if request("PSIZEIMG")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " PSIZEIMG = '" & request("PSIZEIMG") & "' "
end if
if request("PACCESSORIES")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " PACCESSORIES = '" & request("PACCESSORIES") & "' "
end if
if request("PSPECIFICATIONTABLE")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " PSPECIFICATIONTABLE = '" & request("PSPECIFICATIONTABLE") & "' "
end if
if request("PLINETABLE")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " PLINETABLE = '" & request("PLINETABLE") & "' "
end if
if request("PATTENTION")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " PATTENTION = '" & request("PATTENTION") & "' "
end if
if request("PABOUT")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " PABOUT = '" & request("PABOUT") & "' "
end if
if request("PPULL")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " PPULL = '" & request("PPULL") & "' "
end if
if request("PMOTOR")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " PMOTOR = '" & request("PMOTOR") & "' "
end if
if request("PRATIO")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " PRATIO = '" & request("PRATIO") & "' "
end if
if request("PCABLE")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " PCABLE = '" & request("PCABLE") & "' "
end if
if request("PDRUM")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " PDRUM = '" & request("PDRUM") & "' "
end if
if request("POVERALL")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " POVERALL = '" & request("POVERALL") & "' "
end if
if request("PPATTERN")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " PPATTERN = '" & request("PPATTERN") & "' "
end if
if request("PWEIGHT")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " PWEIGHT = '" & request("PWEIGHT") & "' "
end if
if request("PMOTORDISP")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " PMOTORDISP = '" & request("PMOTORDISP") & "' "
end if
if request("PFLOW")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " PFLOW = '" & request("PFLOW") & "' "
end if
if request("POTHER1")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " POTHER1 = '" & request("POTHER1") & "' "
end if
if request("POTHER2")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " POTHER2 = '" & request("POTHER2") & "' "
end if
if request("PMENUL")<>"" then
if search="" then
search = search & " WHERE "
else
search = search & " AND "
end if
search = search & " PMENUL = '" & request("PMENUL") & "' "
end if
table="WINCHLIST"
'sql="select * from " & table & search
'请参考下面代码排序
sql="select * from " & table & search & " order by id DESC"
'response.write sql
set rs=Server.CreateObject("ADODB.recordset")
rs.CursorType = 3
rs.Open sql,conn
rs.PageSize =6 '每页记录条数
result_num=rs.RecordCount '记录总数
if result_num<=0 then
if search="" then
word="目前还没有记录!"
else
word="没有查到符合条件的记录!"
end if
else
maxpage=rs.PageCount
page=request("page")
if Not IsNumeric(page) or page="" then
page=1
else
page=cint(page)
end if
if page<1 then
page=1
elseif page>maxpage then
page=maxpage
end if
rs.AbsolutePage=Page
end if
%>
越野绞盘 - 冠军绞盘,CHAMPION绞盘汽车绞盘,沃恩绞盘,麦尔马克绞盘-CHAMPION,WARN,MileMarker
提供
