当前位置: 代码迷 >> ASP >> asp 站内的搜索有关问题
  详细解决方案

asp 站内的搜索有关问题

热度:289   发布时间:2013-10-23 11:39:13.0
asp 站内的搜索问题
遇到的问题是写了出来之后测试不可以使用,自己找不出来错误了,需要各位大大帮忙
代码如下:
<%
ProvinceID=Request("province")
%>
这是头部代码
主体代码在这
<form action="?" name="frm" method="post">
<input type="hidden" name="action" value="search" />
    <td width="258" height="60">&nbsp;</td>
    <td width="52" class="font14hui">区域:</td>
    <td width="3"></td>
    <td width="247"><select name="province">
<%
Sql="Select provinceID,province From T_Province"
SetRs Rs,Sql,conn,1,1
Do While Not Rs.eof
%>
<option value="<%=Rs("ProvinceID")%>" <%IF Cstr(Rs("provinceID"))=Cstr(provinceID) Then Response.Write("selected")%>><%=Rs("Province")%></option>
<%
Rs.movenext
Loop
DisRs Rs
%>
</select></td>
    <td width="1"></td>
    <td width="406"><input type="image" name="btnSearch" src="images/search.jpg" /></td>
    <td width="23">&nbsp;</td></form>


遇到的问题是,在选择完省之后,查询不反应,只是象征性的刷新一下,还是会出现所有的省的东西,上述代码为什么没有效果,求更正
asp select search 搜索

------解决方案--------------------
不久添加你省的过滤代码语句就行了
ProvinceID=Request("province")
response.write ProvinceID'输出看看有指没有
cd=""
if isnumeric(ProvinceID&"") then'''''''
 cd=" where ProvinceID="&ProvinceID
end if
sql="select * from table"&cd'''''''

------解决方案--------------------


<%
Dim ProvinceID
ProvinceID=Int(Trim(Request.Form("province")))

%>
<form action="" name="frm" method="post">
<input type="hidden" name="action" value="search" />
    <td width="258" height="60">&nbsp;</td>
    <td width="52" class="font14hui">区域:</td>
    <td width="3"></td>
    <td width="247"><select name="province">
<%
Set Rs=Server.CreateOBject("ADODB.RecordSet")
Sql="Select provinceID,province From T_Province"
Rs,Sql,conn,1,1
Do While Not Rs.eof
%>
<option value="<%=Rs("ProvinceID")%>" <%IF Cstr(Rs("provinceID"))=Cstr(provinceID) Then Response.Write("selected")%>><%=Rs("Province")%></option>
<%
Rs.movenext
Loop
DisRs Rs
%>
</select></td>
    <td width="1"></td>
    <td width="406"><input type="image" name="btnSearch" src="images/search.jpg" /></td>
    <td width="23">&nbsp;</td></form>

------解决方案--------------------
你是选择那个省就只显示那个省在select中?这样选择过后就无法再选了,你的要求应该是得到这个省的产品什么之类的信息吧。。

<%
Dim ProvinceID
ProvinceID=Int(Trim(Request.Form("province")))
 
%>
<form action="" name="frm" method="post">
        <input type="hidden" name="action" value="search" />
    <td width="258" height="60">&nbsp;</td>
    <td width="52" class="font14hui">区域:</td>
    <td width="3"></td>
    <td width="247"><select name="province">
            <%
            Set Rs=Server.CreateOBject("ADODB.RecordSet")
            Sql="Select provinceID,province From T_Province"
if isnumeric(ProvinceID&"") then'''''''加上过滤条件,都说了还没改过
 sql=sql&" where ProvinceID="&ProvinceID
end if

            Rs,Sql,conn,1,1
            Do While Not Rs.eof
            %>
            <option value="<%=Rs("ProvinceID")%>" <%IF Cstr(Rs("provinceID"))=Cstr(provinceID) Then Response.Write("selected")%>><%=Rs("Province")%></option>
  相关解决方案