📄 index.asp
字号:
<% Option Explicit %>
<!--#Include file="Connection.asp"-->
<!--#Include file="Function.asp"-->
<%
dim rs,sql
set rs=server.createobject("adodb.recordset")
sql="select * from updata order by dateandtime desc"
rs.open sql,db,3,2
%>
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>搜搜搜软件自动更新引擎！up.fihu.net,www.sousousou.com</title>
<LINK href="style.css" rel=stylesheet>
</head>
<body leftmargin="20" topmargin="20" marginwidth="20" marginheight="20" style="OVERFLOW-X: hidden; OVERFLOW-Y: scroll" bgcolor="#3165CE">
<p align="center"><font color="#FFFFFF" size="5">搜搜搜软件自动更新引擎！</font></p>
<%
if not rs.bof and not rs.eof Then
Dim page_size
dim p
dim page_total
page_size=100
if request("p")="" then
p=1
else
p=cint(request("p"))
end if
session("p")=p
rs.pagesize=page_size
page_total=rs.pagecount
rs.absolutepage=p
dim I,J
I=0
J=page_size
do while not rs.eof and J>0
I=I+1
J=J-1
%>
<div align="center">
<center>
<table border="1" cellpadding="0" cellspacing="0" bordercolor="#3165CE" width="90%" bgcolor="#FFFFFF" style="border-collapse: collapse">
<tr>
<td width="75%" height="22"> <a href="go.asp?url=http://<%=Trim(rs("httpdata"))%>" target="_blank"><%=Trim(rs("titledata"))%>…</a>
</td>
<td width="25%" height="22">
<p align="center"><%if (month(rs("dateandtime"))&day(rs("dateandtime")))=(month(date())&day(date())) then%><FONT color=red><%=year(rs("dateandtime"))%>-<%=month(rs("dateandtime"))%>-<%=day(rs("dateandtime"))%></FONT><%else%><%=year(rs("dateandtime"))%>-<%=month(rs("dateandtime"))%>-<%=day(rs("dateandtime"))%></FONT><%end if%></td>
</tr>
<%
rs.movenext
loop
end if
%>
</table>
</center>
</div>
<p>
<div align="center">
<table border="1" width="90%" cellpadding="0" cellspacing="0" bordercolor="#3165CE" bgcolor="#E1FFFF" height="23" style="border-collapse: collapse">
<tr><td><p align="center">
<%
call select_page(p,page_total)
%> </td>
</tr>
</table>
</div>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -