news.asp

来自「一套在线考试系统」· ASP 代码 · 共 50 行

ASP

50 行

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

<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>在线考试系统</title>
<link rel="stylesheet" type="text/css" href="../DEFAULT.CSS">
<base target="_self">
<script language="JavaScript1.2" src="../js/lock.js"></script>
</head>

<body onkeydown="lockalt();" oncontextmenu="self.event.returnValue=false" onselectstart="selectstart();" bgcolor="#FFFFFF">

<table border="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber1">
  <tr>
    <td width="100%" height="20" style="border-left-style: solid; border-left-width: 0; border-right-style: solid; border-right-width: 0; border-top-style: solid; border-top-width: 0; border-bottom: 1px solid #000000">
    <img border="0" src="../images/NEWS.GIF"></td>
  </tr>
  <%
sql="select * from exam_news where havepass=1 order by posttime desc"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,3,2
do while not rs.eof
'if rs("youxq")>=datediff("d",rs("posttime"),date()) then
%>
  <tr>
    <td width="100%" height="25" style="height: 12"></td>
  </tr>
  <tr>
    <td width="100%" height="25"><img border="0" src="../images/bluebullet.gif">
    <a href="viewnews.asp?newsid=<%=rs("newsid")%>"><%=rs("title")%></a> [<%=formatdatetime(rs("posttime"),1)%>]
    <%
    if (date()-rs("posttime"))<3 then
    %> <img border="0" src="../images/NEW.GIF"> <%
    end if
    %> </td>
  </tr>
  <% 
 'end if
rs.movenext
loop %>
</table>

</body>

</html>

⌨️ 快捷键说明

复制代码Ctrl + C

搜索代码Ctrl + F

全屏模式F11

增大字号Ctrl + =

减小字号Ctrl + -

显示快捷键?

news.asp

news.asp - 源码说明

⌨️ 快捷键说明