| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 614 人关注过本帖
标题:谁能帮帮我 非常感谢
只看楼主 加入收藏
山野樵夫
Rank: 1
等 级:新手上路
帖 子:5
专家分:0
注 册:2007-12-2
收藏
 问题点数:0 回复次数:3 
谁能帮帮我 非常感谢
<table width="100%" border="0" cellspacing="0" cellpadding="0" class="Index-Left-Bot">
  <tr>
    <td height="22" bgcolor="#DEDEDE"><img src="Images/pj_fl.gif" alt="商品分类" width="190" height="28" /></td>
  </tr>
  <tr>
    <td height="84" align="center" bgcolor="#f2f2f2"><table width="100%" border="0" cellspacing="1" cellpadding="5" class="Page-Left-01">
      <tr>
        <td height="12"></td>
        <td></td>
        <td colspan="2"></td>
      </tr>
<%
set RsA = server.createobject("adodb.recordset")
RsA.source = "select id,parentid,content from deeptree where parentid=0 order by id"
RsA.open RsA.source,conn,1,1
if RsA.eof then response.write"还没有相关内容!"
while not RsA.eof
   Pid=RsA("id")
%>
      <tr>
        <td width="12" height="26"> </td>
        <td width="14"><img src="Images/Arrow-Page-01.gif" width="13" height="13" /></td>
        <td colspan="2" bgcolor="#EBEBEB"><a href="ProductsListA.asp?id=<%=RsA("id")%>&Str=<%=RsA("content")%>"><%=RsA("content")%></a></td>
      </tr>
      <%
         set RsB = server.createobject("adodb.recordset")
         RsB.source = "select id,parentid,content from deeptree where parentid="&Pid&""
         RsB.open RsB.source,conn,1,1
         while not RsB.eof
         %>
      <tr>
        <td height="26"> </td>
        <td> </td>
        <td width="13"> </td>
        <td width="889"><a href="ProductsListB.asp?id=<%=RsB("id")%>&Str=<%=RsB("content")%>&Pid=<%=Pid%>&PStr=<%=RsA("content")%>"><%=RsB("content")%></a></td>
      </tr>
      <%
            RsB.movenext
         wend
         RsB.close
         set RsB=nothing
'========
RsA.movenext
wend
RsA.close
set RsA=nothing
%>
    </table></td>
  </tr>
  <tr>
    <td bgcolor="#DEDEDE"><img src="Images/pj_ss.gif" alt="站内搜索" width="190" height="28" /></td>
  </tr>
  <tr>
    <td height="88" align="center"><table width="168" border="0" cellspacing="0" cellpadding="0">
        <form action="Search.asp" method="post" name="SearchForm" id="SearchForm">
          <tr>
            <td width="56" height="24">关键字:</td>
            <td height="24" colspan="2"><input name="KeyWord" type="text" id="KeyWord" size="11"  class="Index-Left-TextInput"/></td>
          </tr>
          <tr>
            <td height="24">范 围:</td>
            <td width="92" height="24"><select name="Area" class="Index-Left-TextInput" id="Area">
                <option value="None" selected="selected">请选择</option>
                <option value="Pro">产品</option>
                <option value="News">新闻</option>
              </select>            </td>
            <td width="20" height="24" align="right"><input name="SubmitSearch" type="image" src="Images/Index_Left_Go.gif" width="18" height="18" border="0" /></td>
          </tr>
        </form>
    </table></td>
  </tr>
  <tr>
    <td height="30" bgcolor="#f2f2f2"> </td>
  </tr>
</table>

我想把其中的商品分类中的子栏目改为平行排列。 而以上代码中的子栏目是另起一行排列  请问我应该修改哪儿。非常感谢。。
搜索更多相关主题的帖子: 感谢 
2007-12-02 15:28
山野樵夫
Rank: 1
等 级:新手上路
帖 子:5
专家分:0
注 册:2007-12-2
收藏
得分:0 
我想得到子目录平行分布的效果。。谢谢

11.JPG (39.24 KB)
图片附件: 游客没有浏览图片的权限,请 登录注册


未命名.JPG (38.31 KB)
图片附件: 游客没有浏览图片的权限,请 登录注册
2007-12-02 15:32
tianyu123
Rank: 1
等 级:新手上路
威 望:2
帖 子:576
专家分:0
注 册:2007-8-26
收藏
得分:0 
循环<tr>...</tr>为竖向排列 循环<td>...</td>为横向排列
<%
         set RsB = server.createobject("adodb.recordset")
         RsB.source = "select id,parentid,content from deeptree where parentid="&Pid&""
         RsB.open RsB.source,conn,1,1
         %>
      <tr>
        <td height="26"> </td>
        <td> </td>
        <td width="13"> </td>
       <%
       while not RsB.eof
       %>
        <td width="889"><a href="ProductsListB.asp?id=<%=RsB("id")%>&Str=<%=RsB("content")%>&Pid=<%=Pid%>&PStr=<%=RsA("content")%>"><%=RsB("content")%></a></td>
      <%
         RsB.movenext
         wend
         RsB.close
         set RsB=nothing

      %>
      </tr>
      <%
         '========
RsA.movenext
wend
RsA.close
set RsA=nothing
%>
[/tr]

改变一切,须从改变观念开始!
2007-12-02 18:08
山野樵夫
Rank: 1
等 级:新手上路
帖 子:5
专家分:0
注 册:2007-12-2
收藏
得分:0 
谢谢兄台的指点。。问题已经解决了。。非常感谢!
有QQ吗。我的是104801443
2007-12-03 11:29
快速回复:谁能帮帮我 非常感谢
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.018218 second(s), 10 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved