📄 gg.asp
字号:
<%@ codepage ="936" %><%
'┌─ 风云ASP在线 ────────────────────────┐
'│ │
'│ 作者：赵振波. http://www.fyasp.com │
'│ │
'│ Q Q：176189168 │
'│ │
'│ Email：service@fyasp.com │
'│ │
'│ 程序定做，系统开发，网站制作，提供高质量的网络产品、技术和服务！│
'│ │
'│【版权声明】 │
'│ │
'│ 本程序版权归坐看风云所有，未经授权擅自修改、复制或散布本程序│
'│ │
'│的部分或全部，将承受严厉的民事和刑事处罚，对已知的违反者将给予法 │
'│ │
'│律范围内的全面制裁。对非法使用此程序所造成的一切后果本人概不负责!│
'│ │
'└─────────────────── http://www.fyasp.com ──┘
%><!--#include file="../inc/config.asp"--><!--#include file="../conn/dbconn1.asp"-->
<style type="text/css">
<!--
body { font-family: "宋体"; font-size: 9pt}
p { }
table { font-family: "宋体"; font-size: 9pt}
td { font-family: "宋体"; font-size: 9pt; line-height: 13pt; letter-spacing: 0pt}
a:link { text-decoration: none}
a:visited { text-decoration: none}
.unnamed1 { cursor: hand}
a:hover { color: #006699; text-decoration: none}
-->
</style>
<%
const newspage=1
dim newsql
dim newrs
newsql="select * from news where bz=0 order by newsid desc"
Set newrs= Server.CreateObject("ADODB.Recordset")
newrs.open newsql,conn,1,1
%>
<a name="a"></a><HTML><HEAD><TITLE><%=WebName%>-会员管理平台</TITLE>
<META content=zh-cn http-equiv=Content-Language>
<META content="text/html; charset=gb2312" http-equiv=Content-Type>
<META content="Microsoft FrontPage 5.0" name=GENERATOR></HEAD>
<BODY leftMargin=0 otopMargin=0 marginheight="0" marginwidth="0" bgcolor="#000080" style="background-color: #FDFDFD">
<div align="center">
<center>
<table border="0" cellspacing="1" style="border-collapse: collapse" bordercolor="#111111" width="96%" id="AutoNumber9">
<tr>
<TD height="45"><B class=Subject3><span style="font-size: 10.5pt">
尊敬的
</span></B><b><font face=Arial color="#FF6600" style="font-size: 10.5pt"><%=session("name")%></font></b><B class=Subject3><span style="font-size: 10.5pt">：<br>
<BR> 您好！</span></B></TD>
</tr>
<tr>
<TD height=8>
<%do while not newrs.eof%> <span lang="en-us">
<%=newrs("Content")%></TD>
</tr>
<tr>
<TD height=23>
<p align="right"> <span lang="en-us">
<b><%=newrs("name")%></b><%newrs.movenext
z=z+1
if z>=newspage then Exit Do
loop
newrs.close
set newrs=nothing
%>
</TD>
</tr>
</table>
</center>
</div>
</BODY></HTML>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -