【www.gdgbn.com--js教程】

js tab选项切换卡代码

<script type="text/javascript教程" >
var tID=0;
function showTabs(ID)
{
  if(ID!=tID)
  {
    TabTitle[tID].className="tabs_title_01";
    TabTitle[ID].className="tabs_title_02";
    TabContent[tID].style.display="none";
    TabContent[ID].style.display="";
    tID=ID;
  }
}
</script>



 
    asp教程" target="_blank">政工动态
  
    干部工作
  
    青风采
 
 
 
 
   
     
       
         
       
     
                                width="98%" align="center" border="0">
               
                  <%
           
            dim sqlzdgz
        sqlzdgz="select top 9 * from zdgz  where isture="是" order by id desc"           
        call opendb()
        rs.open sqlzdgz,conn,1,1
       if not rs.eof then
        do while not rs.eof
        %>
                 
                    &table_s=zdgz" target="_blank" class="tomg"> › 
                          <%if datediff("d",rs("send_date"),date())<4 then
            If len(Rs("title"))>=16 Then
            response.Write(left(rs("title"),14))
           Response.write("..")
            response.Write("")
           Else
             response.Write(rs("title"))
            response.Write("")
           End if
           else
           If len(Rs("title"))>16 Then
            response.Write(left(rs("title"),15))
           Response.write("...")
            
           Else
             response.Write(rs("title"))
            
           End if
           end if%>
                   
                    <%=rs("send_date")%>
                 
                  <%rs.movenext
        loop
        else
        %>
                 
                    暂时还没上传东西www.111cn.net
                 
                  <%
        end if
        
        %>
               
       
   
   

 
 
 
 
   
     
       
         
       
     
                                width="98%" align="center" border="0">
               
                  <%
           
            dim gbmange
        gbmange="select top 9 * from gbmange2  order by id desc"           
        call opendb()
        rs.open gbmange,conn,1,1
       if not rs.eof then
        do while not rs.eof
        %>
                 
                    " target="_blank" class="tomg"> › 
                          <%if datediff("d",rs("send_date"),date())<4 then
            If len(Rs("title"))>=16 Then
            response.Write(left(rs("title"),14))
           Response.write("..")
            response.Write("")
           Else
             response.Write(rs("title"))
            response.Write("")
           End if
           else
           If len(Rs("title"))>16 Then
            response.Write(left(rs("title"),15))
           Response.write("...")
            
           Else
             response.Write(rs("title"))
            
           End if
           end if%>
                   
                    <%=rs("send_date")%>
                 
                  <%rs.movenext
        loop
        else
        %>
                 
                    暂时还没上传东西
                 
                  <%
        end if
        
        %>
               
       
   
   

 
 
 
 
   
     
       
         
       
     
                                width="98%" align="center" border="0">
               
                  <%
           
            dim young
        young="select top 9 * from young  order by id desc"           
        call opendb()
        rs.open young,conn,1,1
       if not rs.eof then
        do while not rs.eof
        %>
                 
                    "  target="_blank" class="tomg"> › 
                          <%if datediff("d",rs(3),date())<4 then
            If len(Rs(4))>=16 Then
            response.Write(left(rs(4),14))
           Response.write("..")
            response.Write("")
           Else
             response.Write(rs(4))
            response.Write("")
           End if
           else
           If len(Rs("title"))>16 Then
            response.Write(left(rs(4),15))
           Response.write("...")
            
           Else
             response.Write(rs(4))
            
           End if
           end if%>
                   
                    <%=rs(3)%>
                 
                  <%rs.movenext
        loop
        else
        %>
                 
                    暂时还没上传东西
                 
                  <%
        end if
        
        %>
               
       
   
   

 本站原创转载注明来源www.111cn.net

本文来源:http://www.gdgbn.com/wangyezhizuo/24226/