急求菜单切换代码!

html-css027

急求菜单切换代码!,第1张

<html>

<head>

<meta http-equiv="Content-Type" content="text/htmlcharset=gb2312">

<title>标签切换菜单</title>

<style>

body {

font-family: "宋体"

font-size: 12px

color: #525252

}

td {

font-family: "宋体"

font-size: 12px

color: #525252

}

a:link {

color: #525252

font-size: 12px

text-decoration: none

}

a:visited{

color: #525252

font-size: 12px

text-decoration: none

}

a:hover {

color: #ff6600

font-size: 12px

text-decoration: underline

}

.gd1{

font-family: "宋体"

font-size: 12px

color: #ff0000

}

.sec11 {BORDER-RIGHT: #C5E1FE 1px solidBORDER-TOP: #C5E1FE 1px solidBORDER-LEFT: #C5E1FE 1px solidCURSOR: handCOLOR: #01499ABORDER-BOTTOM: #C5E1FE 1px solidBACKGROUND-COLOR: #ffffff}

.sec21 {BORDER-RIGHT: #C5E1FE 1px solidBORDER-TOP: #C5E1FE 1px solidFONT-WEIGHT: 800color:#01499ABORDER-LEFT: #C5E1FE 1px solidBORDER-BOTTOM: #C5E1FE 1px solidCURSOR: handBACKGROUND-COLOR: #E6EEF7BACKGROUND:url('/icon/098.gif') no-repeat}

.main_tab {BACKGROUND-COLOR: #ffffff}

</style>

<!--JavaScript部分-->

<SCRIPT language=javascript>

function secBoard(n)

{

for(i=0i<secTable.cells.lengthi++)

secTable.cells

[i].className="sec11"

secTable.cells[n].className="sec21"

for(i=0i<mainTable.tBodies.lengthi++)

mainTable.tBodies

[i].style.display="none"

mainTable.tBodies

[n].style.display="block"

}

</SCRIPT>

</head>

<body>

<p align="center">我看了QQ主页,没有发现什么激动人心的特效。所以 这里介绍一个比较流行且实用地栏目切换,你可以根据需要,自行增加栏目!修改CSS使它更适合你的网站</p>

<div align="center">

<table border="0" width="200" cellpadding="0" cellspacing="0" style="border-collapse: collapse" height="145" id="table7" bgcolor=#ecf5ff><tr><td height="145"><div align="center">

<table border="0" width="200" cellpadding="0" style="border-collapse: collapse" height="140" id="table107"><tr><td height="25">

<div align="center">

<table border="0" width="220" cellpadding="0" style="border-collapse: collapse" height="22" id=secTable>

<tr><td class=sec21 onmouseover=secBoard(0) width="50%">

<p align="center">菜单效果</td>

<td class=sec11 onmouseover=secBoard(1) width="50%">

<p align="center">简要说明</td></tr></table></div></td></tr>

<tr><td height="115"><div align="center">

<table id=mainTable border="0" width="195" cellpadding="0" style="border-collapse: collapse" height="115">

<TBODY style="DISPLAY: block"><tr><td height="145">

<div align="center">

<table border="0" width="205" cellpadding="0" style="border-collapse: collapse" height="138"> <tr><td height="23" width="15" valign="middle">·</td><td height="23" width="180">

<a target="_blank" style="color: #01499a" href="http://hi.baidu.com/basehue">你的连接1Your Link1</a></td></tr><tr><td height="23" width="15">·</td><td height="23" width="180">

<a target="_blank" style="color: #01499a" href="http://hi.baidu.com/basehue">你的链接2Your Link2</a></td></tr><tr><td height="23" width="15">·</td>

<td height="23" width="180"><a target="_blank" style="color: #01499a" href="http://hi.baidu.com/basehue">你的链接3Your Link3</a></td></tr>

<tr><td height="23" width="15">·</td><td height="23" width="180">

<a target="_blank" style="color: #01499a" href="http://hi.baidu.com/basehue">你的链接4Your Link4</a></td></tr><tr><td height="23" width="15">·</td><td height="23" width="180"> <a target="_blank" style="color: #01499a" href="http://hi.baidu.com/basehue">你的第五个链接Your Link Five??</a></td></tr><tr><td height="23" width="195" colspan="2"><p align="right"><font color="#01499A">

<a target="_blank" href="http://hi.baidu.com/basehue"><font color="#01499A">更多</font><font color="#01499A" face="Arial">>>></font></a></font></td></tr></table></div></td></tr></TBODY>

<TBODY style="DISPLAY: none"><tr><td height="145"><div align="center"><table border="0" width="205" cellpadding="0" style="border-collapse: collapse" height="138">

<tr><td height="138" width="195" style="line-height: 150%">

<b><a target="_blank" href="http://hi.baidu.com/basehue">QQ新闻</a></b>没有看见你说的什么新闻和广东2之类的东西了。我猜测可能是这个效果。因为是猜测的,所以难免会有错。如果不对,就抱歉了。你可以到<a target="_blank" href="http://www.qq.com/">QQ首页</a>去看看,或者给我一个你要的特效的链接。</td></tr></table></div></td>

</tr></TBODY></table></div></td></tr></table></div></td></tr></table></div>

</body>

</html>

样式冲突,字体颜色变为白色,显示不出来。

设置一个id或者class.

document.getElementById('a标签的id').innerText

或document.getElementsByClassName('a标签的class')[0].innerText

首页原代码:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="935"%>

<!--#include file="conn.asp"-->

<!--#include file="Inc/config.asp"-->

<!--#include file="Inc/const.asp"-->

<!--#include file="Inc/func.asp"-->

<%

if request.QueryString("page")<>"" then

dim page

page=trim(request.QueryString("page"))

if page="" or not isnumeric(page) then

response.Redirect("/")

End If

end if

%>

<%

if request.QueryString("sort_id")<>"" then

dim sort_id

sort_id=trim(request.QueryString("sort_id"))

if sort_id="" or not isnumeric(sort_id) then

response.Redirect("/")

End If

end if

%>

<html>

<head>

<meta http-equiv="Content-Type" content="text/htmlcharset=gb2312">

<link href="file/web_css.css" rel="stylesheet" type="text/css">

<style type="text/css">

<!--

.style1 {font-weight: bold}

body {

background-image: url(img/background.gif)

}

.STYLE6 {

font-family: "宋体"

font-weight: bold

}

-->

</style>

</head>

<body>

<!--#include file="file/top.asp"-->

<table width="778" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">

<tr>

<td width="220" align="center" valign="top"><table width="200" border="0" align="right" cellpadding="0" cellspacing="0" bordercolor="#525252">

<tr>

<td align="center" valign="top"><!--#include file="left.asp"--></td>

</tr>

<tr>

<td align="center" valign="top"><!--#include file="tuijian.asp"--></td>

</tr>

<tr>

<td align="center" valign="top"><!--#include file="freid.asp" --></td>

</tr>

</table></td>

<td align="center" valign="top"><table width="677" height="559" border="0" align="center" cellpadding="0" cellspacing="0">

<tr>

<td width="677" align="center" valign="top">

<table width="677" height="100" border="0" cellpadding="0" cellspacing="0">

<tr>

<td><table width="100%" height="100" border="0" cellpadding="0" cellspacing="0">

<tr>

<td height="20"><table width="100%" border="0" cellspacing="0" cellpadding="0">

<tr>

<td height="33"><img src="img/about_01.gif" width="679" height="33" border="0" usemap="#Map"></td>

</tr>

</table></td>

</tr>

<tr>

<td height="80"><table width="680" height="36" border="0" cellpadding="0" cellspacing="3">

<tr>

<td width="24"> </td>

<td width="416" align="right"><div align="justify"><span class="STYLE6">深圳市中海通机器人有限公司</span>属于深圳中海通科技集团旗下一家专业研发、设计、生产和销售连接器行业自动化设备的高新技术企业。深圳中海通科技集团,参照美国硅谷高科技公司发展模式,按照现代企业制度于1996年组建而成。2002年被深圳市政府评为“深圳市300家最具成长性企业”。中海通科技集团于2009年特别成立深圳市中海通机器人有限公司,组建了一支优秀的工程技术团队,通过引进国外先进技术与本土研发相结合,倾力打造性能卓越的自动化生产设备,为客户提供全方位的技术支持,让客户不再为产能而担忧。 <a href="content.asp">MORE>>></a></div></td>

<td width="220"><img src="img/company_left.jpg" width="212" height="145" align="right"></td>

</tr>

</table></td>

</tr>

</table></td>

</tr>

</table>

<table width="677" border="0" cellpadding="0" cellspacing="0">

<tr align="center">

<td width="677" height="120" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0" background="img/pro-t.jpg">

<tr>

<td height="33" background="img/pro-t.jpg"> </td>

</tr>

</table>

<table width="677" border="0">

<tr>

<td height="312"><table width="677" height="130" border="0" cellpadding="0" cellspacing="0">

<tr>

<td width="677" align="center" valign="top">

<% set rs=server.CreateObject("adodb.recordset")

sql="select * from product_info where tuijian=1 and pass=1 order by sx asc"

rs.open sql,conn,1,1

%>

<!--#include file="page3.asp"-->

<table width="677" height="163" border="0" cellpadding="0" cellspacing="0">

<tr align="center">

<td width="677" height="120"><table width="677" border="0" align="center" cellpadding="0" cellspacing="0" bordercolor="#FF9900">

<%

j=1

for i=1 to x

if (j mod 3)=1 then

response.write "<tr>"

end if

%>

<td width="483" align="center" valign="top" whith="200"><table width="110" height="84" border="0" cellpadding="0" cellspacing="0" bgcolor="#CCCCCC">

<tr>

<td width="304" align="center" bgcolor="#FFFFFF"><table width="158" height="111" border="0" cellpadding="0" cellspacing="0" background="img/tablebg.gif">

<tr>

<td align="center" valign="middle"><%If rs("small_img")<>"" then%>

<a href="show_imgnews.asp?id=<%=rs("id")%>" target="_blank"><img src="<%=rs("small_img")%>" width="128" height="80" border="0" align="center"></a>

<% Elseif rs("big_img")<>"" then %>

<a href="show_imgnews.asp?id=<%=rs("id")%>" target="_blank"><img src="<%=rs("big_img")%>" width="128" height="80" border="0" align="center"></a>

<% Else %>

<font color="gray">暂无图片</font>

<%End If%> </td>

</tr>

</table></td>

</tr>

</table>

<table width="158" border="0" cellspacing="0" cellpadding="0">

<tr>

<td width="56" height="22" align="center"><font color="#999999">名称:</font></td>

<td width="102" align="left"><a href="show_imgnews.asp?id=<%=rs("id")%>" target="_blank"><%=rs("product_name")%></a></td>

</tr>

<tr>

<td height="22" align="center"><font color="#999999">型号:</font></td>

<td height="25" align="left"><a href="show_imgnews.asp?id=<%=rs("id")%>" target="_blank"><%=rs("product_sort")%></a></td>

</tr>

</table></td>

<%

if (j mod 3)=0 then

response.write "</tr>"

end if

j=j+1

rs.moveNext

next

end if

%>

</table></td>

</tr>

</table> </td>

</tr>

</table></td>

</tr>

</table></td>

</tr>

<tr align="center">

<td valign="middle"></td>

</tr>

</table></td>

</tr>

</table></td>

</tr>

</table>

<!--#include file="file/end.htm"-->

<map name="Map"><area shape="rect" coords="602,3,679,31" href="content.asp">

</map></body>

</html>