📄 top.asp

📁 MisCMS源码

💻 ASP

字号:

<link href="../css/style.css" rel="stylesheet" type="text/css">
<link rel="icon" href="favicon.ico" type="image/x-icon" />
<link rel="shortcut icon" href="favicon.ico" type="image/x-icon" />
<link rel="Bookmark" href="favicon.ico" type="image/x-icon" />
<meta name="keywords" content="<%= SysKeyWords %>">
<meta name="Description" content="<%= SysDescription %>">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<body>

<div id="top">
<div id="fav"><h4><a href="#" onClick="this.style.behavior='url(#default#homepage)';this.sethomepage('<%= SysUrl %>');return false;">设为首页</a></h4>
<h5><a href="javascript:window.external.AddFavorite('<%= SysUrl %>','<%= SysName %>')">收藏本站</a></h5>
</div>
<img src="../images/top.gif">

</div>

<div id="menue">
<ul>
<li><a href="/">　首页　</a></li>
<% set rs=server.createobject("adodb.recordset")
    	 rs.open"select m_id,m_name from munexx where m_type=1 order by m_order asc",conn,1,1
		 if rs.bof and rs.eof then
		 response.Write("")
		 else 
		 do while not rs.eof %>
      <li><a href="list.asp?cID=<%=rs(0)%>&cname=<%=rs(1)%>"><%=rs(1)%></a></li>
      <%rs.movenext
   		loop 
   		end if
   		rs.close
		set rs=nothing %>
<li><a href="zurl.asp">站长网址</a></li>
<li><a href="mz.asp">精品美文</a></li>
<li><a href="myfav.asp" target="_blank">网络收藏</a></li>
<li><a href="http://bbs.mis8.cn" target="_blank">迷失论坛</a></li>
</ul>
</div>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -