📄 admin_mztxt.asp
字号:
<!--#include file="../inc/conn.asp"-->
<!--#include file="../inc/MyFunction.Asp"-->
<% call master %>
<% l=request.QueryString("l")
select case l
case "add"
wzadd
case "edit"
wzedit
case else
wzgl
end select %>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>文章</title>
<link href="../css/admincss.css" rel="stylesheet" type="text/css">
</head>
<body>
<% sub wzgl %>
<table width="80%" border="0" align="center" cellpadding="2" cellspacing="1" bgcolor="#0099CC">
<tr bgcolor="#FFFFFF">
<td colspan="5" align="center" height="25">精品美文管理</td>
</tr>
<% set wz=server.CreateObject("adodb.recordset")
wz.open"select * from mzxx order by mzid desc",conn,1,1
if wz.eof then %>
<tr bgcolor="#FFFFFF">
<td colspan="5" align="center">暂无精品美文!</td>
</tr>
<% Else
mypage=request("page")
if mypage="" or mypage<1 then
mypage=1
end if %>
<tr bgcolor="#8EDBFF">
<td width="63%" align="center">标题</td>
<td width="17%" align="center">发布时间</td>
<td width="9%" align="center">人气</td>
<td width="11%" align="center">操作</td>
</tr>
<% wz.pagesize=20
rec=cint(wz.pagesize)
maxpage=cint(wz.pagecount)
sum=wz.recordcount
wz.absolutepage=mypage
cs=""
csz=""
i=0
do until wz.eof or i=20 %>
<tr bgcolor="#FFFFFF">
<td> <%= wz(1) %></td>
<td align="center"><%= wz(3) %></td>
<td align="center"><%= wz(4) %></td>
<td align="center"> <a href="?l=edit&id=<%= wz(0) %>">修改</a> <a href="admin_do.asp?act=mzdel&id=<%= wz(0) %>" onClick="{if(confirm('确定要删除吗？')){return true;}return false;}">删除</a></td>
</tr>
<% wz.movenext
i=i+1
loop
scriptname=request.ServerVariables("SCRIPT_NAME") %>
<tr bgcolor="#FFFFFF">
<td align="center" colspan="5"><% call pagelist(sum,rec,maxpage,mypage,scriptname,cs,csz) %></td>
</tr>
<% End If
wz.close
set wz=nothing %>
</table>
<% end sub %>
<% sub wzadd %>
<table width="80%" border="0" align="center" cellpadding="2" cellspacing="1" bgcolor="#0099CC">
<tr bgcolor="#3CBFFF">
<td height="25" colspan="2" align="center">添加精品美文</td>
</tr>
<form method="post" name="formfb" action="admin_do.asp?act=mzadd">
<tr bgcolor="#FFFFFF">
<td width="80" align="right">文章标题：</td>
<td><input name="mztit" type="text" id="mztit" size="30"></td>
</tr>
<tr bgcolor="#FFFFFF">
<td align="right">文章作者：</td>
<td><input name="zuozhe" type="text" id="zuozhe" value="不详" size="30"></td>
</tr>
<tr bgcolor="#FFFFFF">
<td align="right">文章收集：</td>
<td><input name="soji" type="text" id="soji" value="ァOnE LoVEㄣ" size="30"></td>
</tr>
<tr bgcolor="#FFFFFF">
<td align="right">文章内容：</td>
<td><textarea name="mzcon" cols="1" rows="1" style="display:none "></textarea>
<IFRAME ID="Editor1" SRC="../editor.asp?id=mzcon&style=mis8" FRAMEBORDER="0" SCROLLING="no" WIDTH="550" HEIGHT="350">
</IFRAME></td>
</tr>
<tr bgcolor="#FFFFFF">
<td align="right"> </td>
<td><input type="submit" name="Submit" value="提交"></td>
</tr></form>
</table>
<% end sub %>
<% sub wzedit
id=request.QueryString("id")
set rs=conn.execute("select * from mzxx where mzid=" & id & "") %>
<table width="80%" border="0" align="center" cellpadding="2" cellspacing="1" bgcolor="#0099CC">
<tr bgcolor="#3CBFFF">
<td height="25" colspan="2" align="center">修改精品美文</td>
</tr>
<form method="post" name="formfb" action="admin_do.asp?act=mzed">
<tr bgcolor="#FFFFFF">
<td width="80" align="right">文章标题：</td>
<td><input name="mztit" type="text" id="mztit" size="30" value="<%= rs(1) %>"></td>
</tr>
<tr bgcolor="#FFFFFF">
<td align="right">文章作者：</td>
<td><input name="zuozhe" type="text" id="zuozhe" value="<%= rs(5) %>" size="30"></td>
</tr>
<tr bgcolor="#FFFFFF">
<td align="right">文章收集：</td>
<td><input name="soji" type="text" id="soji" value="<%= rs(6) %>" size="30"></td>
</tr>
<tr bgcolor="#FFFFFF">
<td align="right">文章内容：</td>
<td><textarea name="mzcon" cols="1" rows="1" style="display:none "><%= rs(2) %></textarea>
<IFRAME ID="Editor1" SRC="../editor.asp?id=mzcon&style=mis8" FRAMEBORDER="0" SCROLLING="no" WIDTH="550" HEIGHT="350">
</IFRAME></td>
</tr>
<tr bgcolor="#FFFFFF">
<td align="right"> </td>
<td><input name="id" type="hidden" id="id" value="<%= id %>">
<input type="submit" name="Submit" value="提交"></td>
</tr></form>
</table>
<% end sub %>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -