📄 admin_index.asp
字号:
<!--#include file=conn.asp-->
<!--#include file=inc/function.asp-->
<!--#include file=admin_chkpass.asp-->
<!-- POWERED BY 7wap Enterprise Mobile Infomation System ●<%=now()%>-->
<html>
<head>
<title><%=ewap_name%></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="/favicon.ico" rel="shortcut icon">
<meta name="Generator" content="<%=ewap_(0)%>">
<meta name="copyright" content="sunyanqing">
<link rel='stylesheet' href='Ewap.css' type='text/css'>
<body><%
dim rs,sql
set rs=server.createobject("adodb.recordset")
sql="select ntitle,nid,ntime from news order by ntime desc"
rs.open sql,cn,1,1
%>
<div class=main>
<span class=title><%=ewap_(2)%></span><br/>
<div class=body>
<%
If rs.eof and rs.bof then
response.write ewap_(23)
%>
</div>
<br/>
<!--#include file=admin_menu.asp-->
<%
response.end
else
count=ewap_top
rs.pagesize = count
rc=rs.recordcount
pgnm=rs.pagecount
page=request.QueryString("page")
If not isnumeric(page) then page=1
if page<>"" then page=clng(page)
if page="" or page=0 then page=1
if page>pgnm then page=pgnm
if pgnm>1 then rs.absolutepage=page
end if
%>
<%
do while not rs.eof and count>0
count=count-1
ntitle=uhtmlencode(rs("ntitle"))
ntime=rs("ntime")
id=rs("nid")
If len(ntitle)>15 then
ntitle=left(ntitle,15)&"…"
end if
%>
<li><a href=view.asp?id=<%=id%> title="<%=rs("ntitle")%>" target="_blank"><%=ntitle%> </a><br/>
<a href=admin_delete.asp?id=<%=id%>>『<%=ewap_(3)%>』</a>
<a href=admin_edit.asp?id=<%=id%>>『<%=ewap_(4)%>』</a>
<%=ntime%><br/>
<%
rs.movenext
loop
%>
【<%=ewap_(24)%>：<%=rc%>】<%=page%>/<%=pgnm%>
<%if page>1 and pgnm>1 then%>
<a href="?page=1"><%=ewap_(19)%></a>-<a href="?page=<%=page-1%>"><%=ewap_(22)%></a>-<%
end if
if page<pgnm and pgnm>1 then
%><a href="?page=<%=page+1%>"><%=ewap_(21)%></a>-<a href="?page=<%=pgnm%>"><%=ewap_(20)%></a>
<%
end if
rs.close
set rs=nothing
cn.close
set cn=nothing
%>
</div>
<br/>
<!--#include file=admin_menu.asp--></div>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -