⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 mb_news.asp

📁 好!由此可以引申出另一快速恢复多系统启动选单的方法:就是利用Ghost克隆工具
💻 ASP
字号:
<!--#include file="conn.asp"-->
<html>
<head>
<style>
a{text-decoration:none}
td{font-size:9pt}
a:hover{text-decoration:underline}
</style>
<body leftmargin=0 topmargin=0 bgcolor=#000000>
<table width=270 cellspacing=0 cellpadding=5>
<tr><td colspan=2 valign=top width=270 height=15></td></tr>
<tr><td colspan=2 valign=top width=270>
<%
  sql="select top 10 news.content,news.time,lm.username,lm.pagename from news,lm where news.username<>'mmpchome' and news.username=lm.username order by news.time desc"
  set rs=conn.execute(sql) '成员发表的新闻 
  if rs.eof and rs.bof then
  response.write "还没有新闻"
  else
  do while not rs.eof%>
  <table width=270 cellspacing=0 cellpadding=0>
  <tr><td>
  <font color="#999999">&nbsp;<font color=#ffffff>→</font>&nbsp;<%=replace(replace(trim(left(rs("content"),35)),"<","&lt;"),">","&gt;")%>&nbsp;(<%=formatdatetime(rs("time"),1)%>)&nbsp;--<a href="cview.asp?url=<%=rs("username")%>" style="color:#cccccc" target="_blank"><%=rs("pagename")%></a></td></tr>
  <tr><td align=center>&nbsp;<font color=#cccccc>............................................</font>&nbsp;</td></tr>
  <tr><td align=center height=5></td></tr>
  </table>
<%
  rs.movenext
  loop
  rs.close
  end if
%>                  
</td></tr>  
</table>
</body>
</html>

⌨️ 快捷键说明

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