[分享][讨论][开源][求助]复杂的asp分类查询问题 - ASP技术论坛

问题点数：0 回复次数：0

[分享][讨论][开源][求助]复杂的asp分类查询问题

我想实现这样一个操作
我有两个表一个表用来分类,另一个表用来记集用户选择的分类信息,然后实现这个一样效果,从分类中查找公司选取的数量和公司的相关信息.
分类表信息
有三级分类
数据表结构如下:
id fathid name bianhao
01 化学品 1003
0101 01 化学品小类 1004
010101 0101 酸 1005
02 家电 1006
0201 02 电视 1007
020101 0201 长虹 1008
还有一个表结构如下
user comp xuan1 xuan2 xuna3
kkk 百度 1003 1004 1006
jjj 新浪 1003 1008 1007
现在想实这样一个操作
通过查询化学品得到化学品中有几家公司选择,并列出选择,同样还要可以列出化学品小类,酸这些选择的公司数目,并可以输出,就是通过分类得到公司的信息.我现在实现了分类并可以得到公司的数目就是不能输出公司的信息.
这是我现在的源代码请问如何改,才能实现上面的要求.
<% set rb=server.createobject("adodb.recordset")
id=request("id")
sql="select * from corp_producttype,corpuser_info where corp_producttype.id="&id&" and corp_producttype.guanlian in(corpuser_info.jobFunction1,corpuser_info.jobFunction2,corpuser_info.jobFunction3)"
rb.open sql,conn,1,1,
if rb.recordcount<>"" then
%>
<a href="searchResult.asp?keywords=<%=rb("corpuser_info.username")%>"> <%=rb("corpuser_info.username")%></a>
<%
id=request("id")
if len(id)=6 then%>
<%set rs = server.CreateObject("adodb.recordset")
sql = "SELECT * FROM corp_producttype where parent="&id&""
rs.open sql,conn,1,1
%>
<a href="searchResult.asp?keywords=<%=rb("corpuser_info.username")%>"> <%=rb("corpuser_info.username")%></a>
<table width="100%" border="0" cellspacing="0" cellpadding="5">
<tr>
<td width="6%"><img src="images/arrow01.gif" width="9" height="12" align="absmiddle"></td>
<td width="94%"><a href="searchResult.asp?keywords=<%=rb("corpuser_info.username")%>"> <%=rb("corpuser_info.username")%></a>
</table>
<%else%>
<%set rs = server.CreateObject("adodb.recordset")
sql = "SELECT * FROM corp_producttype where parent="&id&""
rs.open sql,conn,1,3
%><%if rb.recordcount<>"" then
%>
<% if len(id)=2 or len(id)=4 then%>
<a href="producttype_list.asp?id=<%=rs("id")%>" class="link4"><%=rs("corp_producttype")%><%=rb.recordcount%><%response.write("公司")%></a></td>
<% do while not rs.eof %>

<table width="100%" border="0" cellspacing="0" cellpadding="5">
<tr>
<td width="6%"><img src="images/arrow01.gif" width="9" height="12" align="absmiddle"></td>
<td width="94%">
<%rs.movenext%>

<%loop%>
<% else%>
<%
response.redirect "searchResult.asp?keywords="&rb("corpuser_info.username")
%>

<%end if%>
<%end if%>
<% end if%>
<% end if%> </tr>

<tr>
<td width="6%"></td>

</table>
<table width="780" height=124 align="center" class="LEADERBOARD">
<tr>
<td width="780" align="center" ><table width=758 height=118 border="0" cellpadding="0" cellspacing="0">
<tr>
<td class=LEADERAD align=middle><img src="../../img/framework/blank_spacer.gif" width="8" height="6"><br>
<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=7,0,19,0" width="728" height="90">
<param name="movie" value="../../img/2006-8-316-41-24_1.swf">
<param name="quality" value="high">
<embed src="../../img/2006-8-316-41-24_1.swf" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="728" height="90"></embed>
</object></td>
</tr>
</table></td>
</tr>
</table>


</body>
</html>
<%
rs1.close
set rs1 = nothing
close db
%>

搜索更多相关主题的帖子: 长虹　 asp　开源　分类　化学品　