menu.asp

来自「程序内核:原甘肃人才网 特点&功能: 1、专门针对应届毕业生进行了优化设计」· ASP 代码 · 共 53 行

ASP
53
字号
<!--#include file="DBconn.asp"-->
<html>
<head>
<link rel="stylesheet" type="text/css" href="style.css">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<link rel="stylesheet" type="text/css" href="main.css">
<title>功能菜单</title>
<base target="main">
</head>
<body bgcolor="#32659C" topmargin="10" marginheight="10" leftmargin="0" marginwidth="0">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
 <tr> 
   <td align=center>
   <p style="line-height: 150%"><br>
 <font color="#E1E1E1">今天是:<%=date%></font></td>
 </tr>
</table>
<table width="80" border="0" align="center" cellpadding="0" cellspacing="0" height="42">
  <tr> 
    <td colspan="2" height="16" width="123"><p align=center>&nbsp;</td>
  </tr>
<%
Set rst= Server.CreateObject("ADODB.Recordset")
rst.open "select * from menu",conn,1
do while NOT rst.EOF%>
  <tr> 
    <td colspan="2" height="11" width="123">
    <p style="line-height: 200%"><img src="images/+.gif" width="15" height="9">&nbsp; <a href="<%=rst("url")%>"><%=rst("menu")%></a></td>
  </tr>
  <tr> 
    <td background="images/line3.gif" height="10" width="16"> </td> 
    <td height="10" width="109">
    <p style="line-height: 200%"></td>
  </tr>
 
   <% rst.MoveNext
      loop
      rst.close
   %> 
  <tr> 
    <td colspan="2" height="11" width="123">
    <p style="line-height: 150%"><img src="images/+.gif" width="15" height="9">&nbsp; <a href=exit.asp target="_parent">退出系统</a></td>
  </tr>
</table>  
<table width="75%" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr> 
    <td colspan="2"> </td>
  </tr>
</table>
</body>
</html>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?