user_articlemanage.asp
来自「利用C++编写的网络跟踪代码」· ASP 代码 · 共 453 行 · 第 1/2 页
ASP
453 行
<%@language=vbscript codepage=936 %>
<%
'请勿改动下面这三行代码
const ChannelID=2
Const ShowRunTime="Yes"
response.buffer=true
%>
<!--#include file="inc/conn.asp"-->
<!--#include file="inc/Conn_User.asp"-->
<!--#include file="inc/config.asp"-->
<!--#include file="inc/ubbcode.asp"-->
<!--#include file="inc/function.asp"-->
<!--#include file="inc/admin_code_article.asp"-->
<%
if CheckUserLogined()=False then
response.Redirect "User_Login.asp"
end if
dim strFileName,FileName
const MaxPerPage=10
dim totalPut,CurrentPage,TotalPages
dim i,j
dim keyword,strField
dim sql,rsArticleList
dim ClassID
dim ManageType
dim PurviewChecked
dim strAdmin,arrAdmin
dim AdminPurview,AdminPurview_Article
dim tClass,ClassName,RootID,ParentID,Depth,ParentPath,Child,ChildID,tID,tChild,ClassMaster
FileName="User_ArticleManage.asp"
ClassID=Trim(request("ClassID"))
keyword=trim(request("keyword"))
if keyword<>"" then
keyword=ReplaceBadChar(keyword)
end if
strField=trim(request("Field"))
UserName=Trim(Request.Cookies("asp163")("UserName"))
if ClassID="" then
ClassID=0
else
ClassID=CLng(ClassID)
end if
if ClassID>0 then
set tClass=conn.execute("select ClassName,RootID,ParentID,Depth,ParentPath,Child,ClassMaster From ArticleClass where ClassID=" & ClassID)
if tClass.bof and tClass.eof then
founderr=True
ErrMsg=ErrMsg & "<br><li>找不到指定的栏目</li>"
Call WriteErrMsg()
response.end
else
ClassName=tClass(0)
RootID=tClass(1)
ParentID=tClass(2)
Depth=tClass(3)
ParentPath=tClass(4)
Child=tClass(5)
end if
end if
strFileName=FileName & "?ClassID=" & ClassID & "&strField=" & strField & "&keyword=" & keyword
if request("page")<>"" then
currentPage=cint(request("page"))
else
currentPage=1
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>会员控制面板</title>
<STYLE type=text/css></STYLE>
<SCRIPT language=javascript>
function unselectall()
{
if(document.myform.chkAll.checked){
document.myform.chkAll.checked = document.myform.chkAll.checked&0;
}
}
function CheckAll(form)
{
for (var i=0;i<form.elements.length;i++)
{
var e = form.elements[i];
if (e.Name != "chkAll"&&e.disabled==false)
e.checked = form.chkAll.checked;
}
}
function ConfirmDel()
{
if(confirm("确定要删除选中的文章吗？一旦删除将不能恢复！"))
return true;
else
return false;
}
</SCRIPT>
<link href="new/css.CSS" rel="stylesheet" type="text/css">
</head>
<body bgcolor="#edebe4" topmargin="0">
<!--#include file="top.asp"-->
<table class="4" width="860" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="f2f2f2">
<tr valign="top">
<td width="244" class="tdb"> <div align="left">
<table width="100%" height="10" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="12"></td>
</tr>
</table>
<table width="220" height="26" border="0" align="center" class="4" cellpadding="0" cellspacing="0" background="new/ccd.jpg">
<tr>
<td height="12"> <table width="220" height="22" border="0" align="center" cellpadding="0" cellspacing="0"">
<tr>
<td width="18" height="15"> <div align="right"><img src="new/ee.gif" width="10" height="12">
</div></td>
<td width="195" style="FILTER: dropshadow(color=#cccccc,offx=1,offy=1);color:#333333">
<table width="100%" height="1" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="1"></td>
</tr>
</table>
字体搜索</td>
</tr>
</table></td>
</tr>
</table>
<table width="100%" height="10" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="12"></td>
</tr>
</table>
<table width="222" height="125" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="F7F7F7" class="44">
<tr>
<td height="12" valign="top" class="w4"> <table width="100%" height="10" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="15"></td>
</tr>
</table>
<% call ShowSearchForm("soft_search.asp",1) %>
</td>
</tr>
</table>
<table width="100%" height="10" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="12"></td>
</tr>
</table>
<table width="220" height="70" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#CC0000">
<tr>
<td height="12"><div align="center"><font color="#FFFFFF">广告位(220*70)</font></div></td>
</tr>
</table>
<table width="100%" height="10" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="12"></td>
</tr>
</table>
</div></td>
<td width="616" class="tda"><table width="100%" height="10" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="12"></td>
</tr>
</table>
<table width="592" height="26" border="0" align="center" class="4" cellpadding="0" cellspacing="0" background="new/ccd.jpg">
<tr>
<td height="12"> <table width="99%" border="0" align="right" cellpadding="0" cellspacing="0">
<tr>
<td style="FILTER: dropshadow(color=#cccccc,offx=0,offy=0);color:#333333">
<table width="100%" height="22" border="0" align="left" cellpadding="0" cellspacing="0"">
<tr>
<td width="18" height="15"> <div align="center"><img src="new/ee.gif" width="10" height="12">
</div></td>
<td width="10" style="FILTER: dropshadow(color=#cccccc,offx=1,offy=1);color:#333333">
</td>
<td style="FILTER: dropshadow(color=#cccccc,offx=1,offy=1);color:#333333"><table width="100%" height="1" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="1"></td>
</tr>
</table>
<font color="#666666">
<%call Admin_ShowPath("文章管理")%>
</font></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table>
<table width="100%" height="2" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="2"></td>
</tr>
</table>
<table width="100%" height="150" border="0" align="center" cellpadding="10" cellspacing="0" >
<tr>
<td height="12" valign="top"> <table width="592" border="0" align="center" cellpadding="0" cellspacing="0" class="4">
<tr>
<td height="12"> <table width="100%" border="0" align="right" cellpadding="0" cellspacing="0">
<tr>
<td colspan="3" valign="top"> <div align="right">
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td valign="top">
<table width="100%" height="10" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="10" valign="top" >
<table width="100%" height="10" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="10" ></td>
</tr>
</table>
<table width="98%" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#E4E4E4" class="border">
<tr class="title">
<td height="22">
<%call Admin_ShowRootClass()%>
</td>
</tr>
</table>
<table width="100%" height="10" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="10" ></td>
</tr>
</table>
<%
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?