接着上一上程序,另一个程序如下:谢谢!!

来源:百度知道 编辑:UC知道 时间:2024/05/03 03:23:19
另一个程序如下:

<table width="500" border="1" align="center">
<tr>
<td colspan="3"><%
area=request.form("xuan1")
sorts=request.form("xuan2")
keyword=request.form("keyword")
Const MaxPerPage=10
dim totalPut
dim CurrentPage
dim TotalPages
dim j
dim sql
if Not isempty(request("page")) then
currentPage=Cint(request("page"))
else
currentPage=1
end if %>
<% select case action %>
<% case ""
set rs=server.createobject("adodb.recordset")
rs.open "select * from cataget where price =0",conn,1,1
case "search"
set rs=server.CreateObject("adodb.recordset")

不知道你是怎么意思,

select areaname,sortname, sorts from cataget where areaname="&area&"and sortname="&sorts&"and "&"sorts like '%"&request.Form("keyword")&"%' order by id desc",conn,1,1