asp 站内的搜索有关问题

2013-10-23

asp 站内的搜索问题遇到的问题是写了出来之后测试不可以使用，自己找不出来错误了，需要各位大大帮忙代码如

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"> </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>

            <%
            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"> </td></form>

热点排行

ASP

asp 站内的搜索有关问题