📄 367gl.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="conn.asp"-->
<!--#include file="jl.asp" -->
<%
'ASP彩票系统
'制作:子渊
'由左眼失明残疾人子渊制作
'手机：13556590001
'E：MAIL:ziyzo2008@yahoo.com.cn
'演示:http://www.gy16.com/cp/
'以上信息不影响资源,请保留版权信息
%>
<link href="style.css" rel="stylesheet" type="text/css">
<SCRIPT LANGUAGE="JavaScript">
<!--
function checkdel(delid){
if(confirm('删除选定的信息'))
{location.href="save.asp?action=del&id="+delid;}
}
//-->
function CheckAll(form) {
for (var i=0;i<form.elements.length;i++) {
var e = form.elements[i];
if (e.name != 'chkall') e.checked = form.chkall.checked;
}
}
</SCRIPT>
<body bgcolor="e6e6e6">
<center>
<table width="100%" border="0">
<tr>
<td valign="top">
<p align="center"><a href="367gx.asp">添加数据</a> <a href="save.asp">修改/删除数据</a>
<a href="admin_admin.asp?action=modpass" target="_blank">修改管理员密码</a>
<a href="http://www.gy16.com">返回首页</a> </p>
</td>
</tr>
</table>
<font color="#FF0000"><br>
<br>
管理</font><br>
<br>
<table width="700" border="0" cellpadding="0" cellspacing="1">
<%
page=request("page")
PageSize = 15
sql="select * from hao order by id desc"
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,1
rs.PageSize = PageSize
totalfilm=rs.recordcount
pgnum=rs.Pagecount
if page="" or clng(page)<1 then page=1
if clng(page) > pgnum then page=pgnum
if pgnum>0 then rs.AbsolutePage=page
if rs.eof then
response.write "<tr><td>暂无任何信息！</td></tr></table>"
response.end
end if
pageurl="367gl.asp?flag=&"
%>
<tr align="center" bgcolor="#CCCCCC">
<td width="145" height="25"><font color="#000000">期 号</font></td>
<td width="153"><font color="#000000">开奖日期</font></td>
<td width="135"><font color="#000000">销售总额</font></td>
<td width="212"><font color="#000000">管 理</font></td>
</tr>
<%
count=0
do while not rs.eof and count<rs.PageSize
id=rs("id")
qs=trim(rs("qs"))
sj=rs("sj")
p1=rs("p1")
p2=rs("p2")
p3=rs("p3")
p4=rs("p4")
p5=rs("p5")
p6=rs("p6")
tm=rs("tm")
%>
<form method="post" name="form1" action="367gl.asp">
<tr align="center" valign="middle" bgcolor="#FFFFFF">
<td height="25"><%=qs%></td>
<td><%=sj%></td>
<td><%=p1%>-<%=p2%>-<%=p3%>-<%=p4%>-<%=p5%>-<%=p6%>-<font color="#FF0000"><%=tm%></font></td>
<td valign="middle"><a href="show.asp?id=<%=id%>" target=_blank>浏览</a> | <a href="367gxedit.asp?id=<%=id%>" target="_self">修改</a> |
<input type="checkbox" name="id" value="<%=id%>">
<a href="javascript:checkdel('<%=id%>')">删除</a></td>
</tr>
<%
rs.movenext
count=count+1
loop
%>
<tr bgcolor="#FFFFFF">
<td height="30" colspan="4">
<input type='checkbox' name=chkall onclick='CheckAll(this.form)'>
全选
<input type="submit" name="action" value="删除" onclick="{if(confirm('该操作不可恢复！\n\n确定删除选定的信息？')){this.document.form1.submit();return true;}return false;}">
</td>
</tr>
</form>
</table>
<br>
<table width="650" border="0" cellspacing="0" cellpadding="0">
<form method=Post action=""> <tr>
<td>
<div align="center">[<b><%=rs.pagecount%></b>/<%=page%>页] [共<%=totalfilm%>个]
<%if page=1 then%>
[首 页] [上一页]
<% else %>
[<a href="<%=pageurl%>page=1">首 页</a>] [<a href="<%=pageurl%>page=<%=page-1%>">上一页</a>]
<%end if%>
<%if rs.pagecount-page<1 then%>
[下一页] [尾 页]
<%else%>
[<a href="<%=pageurl%>page=<%=page+1%>">下一页</a>]
[<a href="<%=pageurl%>page=<%=rs.pagecount%>">尾
页</a>]
<%end if%>
转到<input type='text' name='page' size=2 maxlength=10 value="<%=page%>" align=center>页
<input type='submit' value='确定'>
</div>
</td>
</tr></form>
</table>
</center>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -