gwsxwxs.asp

来自「原代码学生信息管理系统（原代码）不够的的话我给原程序 QQ3810091」· ASP 代码 · 共 124 行

ASP
124 行
字号 



<!--#include file="conn.asp"-->
 <body bgcolor="#fef4d9" text="#000000">

<%
 dim rs
 dim sql
  set rs=server.createobject("adodb.recordset")
 sql="select * from gg Order by rq desc"

rs.open sql,conn,3,3
total=rs.recordcount
    if not rs.eof then   
 bt=rs("bt")
  rq=rs("rq")
 bh=rs("bh")
  nr=rs("nr")
 end if  
  
    
  

 %>




 

<html>
<head>
<meta http-equiv=Content-Type content="text/html; charset=gb2312">
<STYLE type=text/css>A {
	COLOR: black; FONT-STYLE: normal; TEXT-DECORATION: none
}
A:hover {
	BACKGROUND: red; COLOR: yellow; FONT-STYLE: normal; TEXT-DECORATION: none
}
A:active {
	COLOR: #0080ff; FONT-STYLE: normal; TEXT-DECORATION: none
}
TABLE {
	BORDER-BOTTOM: 0px; BORDER-LEFT: 0px; BORDER-RIGHT: 0px; BORDER-TOP: 0px; FONT-SIZE: 9pt; cellspacing: "0"; cellpadding: "0"
}
.space {
	LINE-HEIGHT: 0.5cm
}
P {
	FONT-SIZE: 9pt; LINE-HEIGHT: 18px; font-famliy: 宋体
}
BIG {
	FONT-SIZE: 10.8pt; LINE-HEIGHT: 18px; font-famliy: 宋体
}
.p10pt {
	FONT-SIZE: 10pt
}
</STYLE>

<title>新闻系统</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="config.css" type="text/css">
</head>
<body bgcolor="#fef4d9" text="#000000">
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td>
                
        <div align="center"><b><font color="#0066FF">　共有<font color=red><%=total%></font>条公告
        </font></b></div>
    </td>
  </tr>
</table>




	<table>
    <tr>
  


<%
do while not rs.eof
i=i+1
bh=rs("bh")
bt=rs("bt")
nr=rs("nr")
rq=rs("rq")



%>

  
  
  
  
  
    
    <td align=center><font color="red"><%=i%></font>　</td>
        <td align=left><%=rq%>　</td>
       <td align=center>
    <a href="#" onClick="window.open('lys31.asp?bh=<%=bh%>', 'Sample', 'toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=yes,resizable=yes,copyhistory=yes,height=340,width=420,left=0,top=0')">
    <font color="green"><%=bt%></font></a>　</td></tr>
   

    
    
    
 <%
rs.movenext
loop
Response.Write("</table>") 
Response.Write("</center>")
 rs.close
set rs=nothing
conn.close
set conn=nothing
 
 

%></head></html>

gwsxwxs.asp - 源码说明

本页面展示了「原代码学生信息管理系统（原代码）不够的的话我给原程序 QQ3810091」中的 gwsxwxs.asp 源码文件，采用 ASP 编程语言编写，共 124 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫开发者社区收录了大量与3810091相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

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