账号通
    

账号  

密码  

138235

查看

265

回复
主题:[分享]教新手制作一个漂亮的橙色二级导航条 [收藏主题] 本贴被认定为精华 转到:  
zsmly 当前离线

3

主题

0

广播

0

粉丝
添加关注
级别:学前班

用户积分:8 分
登录次数:2 次
注册时间:2012/1/10
最后登录:2012/1/14
zsmly 发表于:2012/1/10 15:11:10   | 显示全部帖子 查看该作者主题 楼主 
科汛在线商城系统(NET)
以下是引用 secondday在2012-1-1 8:10:29的发言:

已经按照教程制作成功了,非常感谢

还想请教下,这个导航怎样才能使当前页导航高亮呢?点击查看原图


楼上的兄弟,我也引用了这个导航条,但是出错了,能帮我解决嘛!

 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
zsmly 当前离线

3

主题

0

广播

0

粉丝
添加关注
级别:学前班

用户积分:8 分
登录次数:2 次
注册时间:2012/1/10
最后登录:2012/1/14
zsmly 发表于:2012/1/10 15:13:52   | 显示全部帖子 查看该作者主题 沙发 

以下是我的代码,出现的错误是:没有对象!谁能帮我解决下啊!

————————————————————————————————————

<!-- #include file="Conn/Css.Asp" -->

<link href="Conn/Css.css" rel="stylesheet" type="text/css" />

<div id=menu_out>

<div id=menu_in>

<div id=menu><%

sql="Select  * from ["&TablePrefix&"Groups] where SortOrder>0 "&GroupIDSQL&" order by SortOrder"

  Set Rsa=Execute(sql)%>

<UL id=nav>

<LI class="menu_line"></LI><LI><A class=nav_on id=mynav0 onmouseover=javascript:qiehuan(0) href="Index.Asp"><SPAN>首 页</SPAN></A></LI>

<%

sql="Select top 10 * from ["&TablePrefix&"Groups] where SortOrder>0 "&GroupIDSQL&" order by SortOrder"

  Set rsx=Execute(sql)

   i = -1

   do while not rsx.eof

    i = i + 1

    if i mod 2 = 0 then

     response.Write("")

    end if

  %><LI class="menu_line"></LI><li>

       <a href="Default.Asp?GroupID=<%=rsx("GroupID")%>"GroupID")%>)" id="mynav<%=rsx("GroupID")%>" class="nav_off"><span><%=left(rsx("GroupName"),4)%></span></a></li>

    <%

    rsx.movenext

   loop

   rsx.close

   set rsx = nothing

  %>        

    <LI class="menu_line"></LI>

</UL>

<div id=menu_con>

<div id=qh_con0 style="DISPLAY: block">

<UL>

<%

sql=" Select top 6 * from ["&TablePrefix&"Threads] where Visible=1 and ThreadTop=2 order by lasttime Desc,ThreadID"

  set rst = conn.execute(sql)

   if Rst.EOF then:Response.Write("暂时没有相关内容!") end if

   i = -1        

           do while not Rst.eof

    i=i+1

    if i mod 5=0 then

     response.write ""

    end if

           %><LI><a href=ShowPost.Asp?ThreadID=<%=rst("ThreadID")%> title="<% =rst("Topic") %>" target="_blank"><SPAN><%=left(rst("Topic"),10)%></SPAN></a></LI><LI class=menu_line2>                 

              <%

    Rst.movenext

   loop

   Rst.close

   %>

</LI>

</UL></div>

<UL>

<%sql="Select top 16 * From ["&TablePrefix&"Forums] where GroupID="&Rsa("GroupID")&" and ParentID=0 and SortOrder>0 and IsActive=1  order by ForumID"   

      set rs1 = conn.execute(sql)

if Not Rs1.Eof Then      

     n=-1

     do while not rs1.eof

      n=n+1

      if n mod 2 =0 then

      response.Write("")

      end if

    %> <div id=qh_con<%=rs1("ForumID")%> style="DISPLAY: none">

<LI>  <a href="ShowForum.Asp?ForumID=<%=rs1("ForumID")%>" target="_blank"><span><%=left(rs1("ForumName"),5)%></span></A></LI><LI class=menu_line2></LI>

    <%

      

      rs1.movenext

     loop

      else

    response.write "对不起,暂无分类!"      

     rs1.close

     set rs1 = nothing

     end if

     %>  

</div> </UL>

</div></div></div></div>

————————————————————————————————————

 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
zsmly 当前离线

3

主题

0

广播

0

粉丝
添加关注
级别:学前班

用户积分:8 分
登录次数:2 次
注册时间:2012/1/10
最后登录:2012/1/14
zsmly 发表于:2012/1/10 15:24:03   | 显示全部帖子 查看该作者主题 藤椅 
点击查看原图
以下是引用 jswzm在2012-1-10 15:13:12的发言:

点击二级链接后一级的效果会变吗?


我上个图你看下吧,代码我已经发到256楼了,

 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
<上一主题 | 下一主题 >
Powered By KesionCMS Version X1
厦门科汛软件有限公司 © 2006-2016 页面执行0.08984秒 powered by KesionCMS 9.0