📄 admin_article.asp
字号:
if(!CheckObject()){
alert("请至少选定1<%=EL_Channel.ItemUnit & EL_Channel.ItemName%>");
return false;
}
if(getObject("TargetClassID").value == 0 || getObject("TargetClassID").selectedIndex == -1){
alert("请选择目标<%=EL_Channel.ClassItemName%>");
getObject("TargetClassID").focus();
return false;
}
frm.action = JURL + "&Action=Move";
if(confirm("确认要将选定的<%=EL_Channel.ItemName%>移动至 ["+ getObject("TargetClassID").options[getObject("TargetClassID").selectedIndex].text.replace(/[└├]+/, "").trim() +" ]？")){
frm.submit();
return;
}
return false;
}
function doPassed(){
var frm = getObject("myform");
if(!CheckObject()){
alert("请至少选定1<%=EL_Channel.ItemUnit & EL_Channel.ItemName%>");
return false;
}
frm.action = JURL + "&Action=SetPassed&SetValue=<%=EL_True%>";
if(confirm("确认要发布选定的<%=EL_Channel.ItemName%>吗？")){
frm.submit();
return;
}
return false;
}
function doCancelPassed(){
var frm = getObject("myform");
if(!CheckObject()){
alert("请至少选定1<%=EL_Channel.ItemUnit & EL_Channel.ItemName%>");
return false;
}
frm.action = JURL + "&Action=SetPassed&SetValue=<%=EL_False%>";
if(confirm("确认要取消发布选定的<%=EL_Channel.ItemName%>吗？")){
frm.submit();
return;
}
return false;
}
function doDeleteTrue(){
var frm = getObject("myform");
if(!CheckObject()){
alert("请至少选定1<%=EL_Channel.ItemUnit & EL_Channel.ItemName%>");
return false;
}
frm.action = JURL + "&Action=DeleteTrue";
if(confirm("本次删除后将不能恢复，确认要彻底删除选定的<%=EL_Channel.ItemName%>吗？")){
frm.submit();
return;
}
return false;
}
function doDeleteAllTrue(){
var frm = getObject("myform");
frm.action = JURL + "&Action=DeleteAllTrue";
if(confirm("本次将彻底清空回收站中所有的<%=EL_Channel.ItemName%>，确认要清空吗？")){
frm.submit();
return;
}
return false;
}
function doRestore(){
var frm = getObject("myform");
if(!CheckObject()){
alert("请至少选定1<%=EL_Channel.ItemUnit & EL_Channel.ItemName%>");
return false;
}
frm.action = JURL + "&Action=Restore";
if(confirm("确认要还原选定的<%=EL_Channel.ItemName%>吗？")){
frm.submit();
return;
}
return false;
}
function doRestoreAll(){
var frm = getObject("myform");
frm.action = JURL + "&Action=RestoreAll";
if(confirm("确认要还原所有的<%=EL_Channel.ItemName%>吗？")){
frm.submit();
return;
}
return false;
}
function doBatchSetup(){
var frm = getObject("myform");
if(!CheckObject()){
alert("请至少选定1<%=EL_Channel.ItemUnit & EL_Channel.ItemName%>");
return false;
}
frm.action = JURL + "&Action=Batch";
frm.submit();
return;
}
</script>
<%=EL_Common.ShowClassList(ClassURL, 0, ClassID)%>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="88%"><%=CurrentPath%></td>
<td width="12%" align="right">
<select name="select" id="select" onChange="location.href='<%=EL_CurrentScriptName &"?"& ClassURL%>&ClassID='+this.value">
<option><%=EL_Channel.ClassItemName%>跳转至……</option>
<%=EL_Common.ShowClassTree(EL_Channel.ChannelID, 0, 0, "")%>
</select> </td>
</tr>
</table>
<form name="myform" action="" method="post" onSubmit="return Check(this)">
<table width="100%" border="0" cellpadding="0" cellspacing="1" class="Border">
<tr>
<td width="2%" align="center" nowrap class="top_item"><strong>选择</strong></td>
<td width="5%" align="center" class="top_item"><strong>ID</strong></td>
<td align="center" class="top_item"><strong><%=EL_Channel.ItemName%>标题</strong></td>
<td width="8%" align="center" nowrap class="top_item"><strong>录入者</strong></td>
<td width="7%" align="center" nowrap class="top_item"><strong>属性</strong></td>
<td width="5%" align="center" nowrap class="top_item"><strong>发布</strong></td>
<td width="15%" align="center" class="top_item"><strong>相关操作</strong></td>
</tr>
<%
If RowCount = 0 Then
Response.Write "<tr><td colspan=7 class=""td_50"" align=""center"">没有任何"& EL_Channel.ItemName &"数据</td></tr>"
Else
Dim i
rsArticle.Open()
For i = 1 To RowCount
%>
<tr class="td_25" onMouseOut="this.className='td_25'" onMouseOver="this.className='MouseOver_25'">
<td align="center"><input name="CheckObject" type="checkbox" id="CheckObject" value="<%=rsArticle("ArticleID")%>"></td>
<td align="center"><%=rsArticle("ArticleID")%></td>
<td style="padding-left:3px;">
<%="[<a href="& EL_CurrentScriptName &"?"& ClassURL &"&ClassID="& rsArticle("ClassID") &">"& rsArticle("ClassName") &"</a>]"%>
<a href="<%=EL_CurrentScriptName%>?ChannelID=<%=EL_Channel.ChannelID%>&Action=Show&ArticleID=<%=rsArticle("ArticleID")%>" title="作 者：<%=rsArticle("Author")%> 来 源：<%=rsArticle("Copyfrom")%> 更新日期：<%=rsArticle("UpdateTime")%> 点 击 数：<%=rsArticle("Hits")%> 次"><%=EL_Common.HTMLEncode(rsArticle("Title"))%></a></td>
<td align="center"><%=EL_Common.HTMLEncode(rsArticle("Inputer"))%></td>
<td align="center" nowrap>
<%
Response.Write EL_Common.ShowBoolean(rsArticle("OnTop").value, "<span class=bluetext title='固顶"& EL_Channel.ItemName &"'>顶</span>", "<span class=graytext>顶</span>") &" "
Response.Write EL_Common.ShowBoolean(rsArticle("Commended").value, "<span class=greentext title='推荐"& EL_Channel.ItemName &"'>荐</span>", "<span class=graytext>荐</span>")
%></td>
<td align="center"><%=EL_Common.ShowBoolean(rsArticle("Passed").value, "<strong>√</strong>", "<span class=redtext><strong>×</strong></span>")%></td>
<td align="center" nowrap>
<%
If EL_Admin.Purview = 1 Or EL_Admin.Purview = 2 Or EL_Admin.CheckAdminPurview(rsArticle("ClassID"), 2)=True Or rsArticle("Inputer")=EL_Admin.AdminName Then
Select Case ManageType
Case "", "Myself":
Response.Write "<a href='Admin_Article.asp?ChannelID="& EL_Channel.ChannelID &"&Action=Modify&ArticleID="& rsArticle("ArticleID") &"'>修改</a> | "
Response.Write "<a href='Admin_Article.asp?ChannelID="& EL_Channel.ChannelID &"&Action=Delete&ArticleID="& rsArticle("ArticleID") &"' onClick=""return confirm('本次操作将该"& EL_Channel.ItemUnit & EL_Channel.ItemName &"删除至回收站，以后可以从回收站中恢复\n确认要执行删除吗？')"">删除</a> | "
If rsArticle("OnTop") = True Then
Response.Write "<a href='Admin_Article.asp?ChannelID="& EL_Channel.ChannelID &"&Action=SetOnTop&ArticleID="& rsArticle("ArticleID") &"'>解固</a> | "
Else
Response.Write "<a href='Admin_Article.asp?ChannelID="& EL_Channel.ChannelID &"&Action=SetOnTop&ArticleID="& rsArticle("ArticleID") &"'>固顶</a> | "
End If
If rsArticle("Commended") = True Then
Response.Write "<a href='Admin_Article.asp?ChannelID="& EL_Channel.ChannelID &"&Action=SetCommended&ArticleID="& rsArticle("ArticleID") &"'>取消推荐</a>"
Else
Response.Write "<a href='Admin_Article.asp?ChannelID="& EL_Channel.ChannelID &"&Action=SetCommended&ArticleID="& rsArticle("ArticleID") &"'>设为推荐</a>"
End If
Case "Check":
Response.Write "<a href='Admin_Article.asp?ChannelID="& EL_Channel.ChannelID &"&Action=Modify&ArticleID="& rsArticle("ArticleID") &"'>修改</a> | "
Response.Write "<a href='Admin_Article.asp?ChannelID="& EL_Channel.ChannelID &"&Action=Delete&ArticleID="& rsArticle("ArticleID") &"' onClick=""return confirm('本次操作将该"& EL_Channel.ItemUnit & EL_Channel.ItemName &"删除至回收站，以后可以从回收站中恢复\n确认要执行删除吗？')"">删除</a> | "
If rsArticle("Passed") = True Then
Response.Write "<a href='Admin_Article.asp?ChannelID="& EL_Channel.ChannelID &"&Action=SetPassed&ArticleID="& rsArticle("ArticleID") &"&SetValue="& EL_False &"'>取消发布</a>"
Else
Response.Write "<a href='Admin_Article.asp?ChannelID="& EL_Channel.ChannelID &"&Action=SetPassed&ArticleID="& rsArticle("ArticleID") &"&SetValue="& EL_True &"'>立即发布</a>"
End If
Case "Recycled":
Response.Write "<a href='Admin_Article.asp?ChannelID="& EL_Channel.ChannelID &"&Action=DeleteTrue&ArticleID="& rsArticle("ArticleID") &"' onClick=""return confirm('本次操作将彻底删除该"& EL_Channel.ItemUnit & EL_Channel.ItemName &"，并不能恢复\n确认要执行彻底删除吗？')"">彻底删除</a> | "
Response.Write "<a href='Admin_Article.asp?ChannelID="& EL_Channel.ChannelID &"&Action=Restore&ArticleID="& rsArticle("ArticleID") &"'>还原</a>"
End Select
Else
Select Case ManageType
Case "":
Response.Write "<span class=graytext>修改</span> | "
Response.Write "<span class=graytext>删除</span> | "
If rsArticle("OnTop") = True Then
Response.Write "<span class=graytext>解固</span> | "
Else
Response.Write "<span class=graytext>固顶</span> | "
End If
If rsArticle("Commended") = True Then
Response.Write "<span class=graytext>取消推荐</span>"
Else
Response.Write "<span class=graytext>设为推荐</span>"
End If
Case "Check":
Response.Write "<span class=graytext>修改</span> | "
Response.Write "<span class=graytext>删除</span> | "
If rsArticle("Passed") = True Then
Response.Write "<span class=graytext>取消发布</span>"
Else
Response.Write "<span class=graytext>立即发布</span>"
End If
Case "Recycled":
Response.Write "<span class=graytext>彻底删除</span> | "
Response.Write "<span class=graytext>还原</span>"
End Select
End If
%> </td>
</tr>
<%
If i<RowCount Then rsArticle.MoveNext
Next
rsArticle.Close()
End If
%>
</table>
<table width="100%" border="0" cellspacing="1" cellpadding="0">
<tr>
<td width="12%"><span id="myselect">[<a href="javascript:CheckedAll()">全选</a>]</span></td>
<td width="88%" align="right" nowrap><%Call EL_Common.ShowPage(URLParameters, CurrentPage, PageSizes, PageCounts, TotalRowCount, EL_Channel.ItemName, EL_Channel.ItemUnit)%></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="1" cellpadding="0">
<tr>
<td height="40" align="center" class="td_topline">
<%
If (EL_Admin.Purview = 1 Or EL_Admin.Purview = 2 Or EL_Admin.CheckAdminPurview(ClassID, 2)) And RowCount>0 Then
Select Case ManageType
Case "", "Myself":
Response.Write "<input type=""button"" name=""Submit4"" value=""删除选定"& EL_Channel.ItemName &""" onClick=""doDelete()""> "
Response.Write "<input type=""button"" name=""Submit4"" value=""设置选定"& EL_Channel.ItemName &""" onClick=""doBatchSetup()""> "
Response.Write "<input type=""button"" name=""Submit4"" value=""移动选定"& EL_Channel.ItemName &"至>>"" onClick=""doMove()"">"
Response.Write "<select name=""TargetClassID"" id=""TargetClassID"">"
Response.Write "<option value='0'>选择目标"& EL_Channel.ClassItemName &"</option>"
Response.Write EL_Common.ShowClassTree(EL_Channel.ChannelID, 0, 0, "")
Response.Write "</select> "
Case "Check":
Response.Write "<input type=""button"" name=""Submit4"" value=""删除选定"& EL_Channel.ItemName &""" onClick=""doDelete()""> "
Response.Write "<input type=""button"" name=""Submit4"" value=""发布选定"& EL_Channel.ItemName &""" onClick=""doPassed()""> "
Response.Write "<input type=""button"" name=""Submit4"" value=""取消发布选定"& EL_Channel.ItemName &""" onClick=""doCancelPassed()""> "
Case "Recycled":
Response.Write "<input type=""button"" name=""Submit4"" value=""彻底删除选定"& EL_Channel.ItemName &""" onClick=""doDeleteTrue()""> "
Response.Write "<input type=""button"" name=""Submit4"" value=""清空回收站"" onClick=""doDeleteAllTrue()""> "
Response.Write "<input type=""button"" name=""Submit4"" value=""还原选定"& EL_Channel.ItemName &""" onClick=""doRestore()""> "
Response.Write "<input type=""button"" name=""Submit4"" value=""还原所有"& EL_Channel.ItemName &""" onClick=""doRestoreAll()""> "
End Select
Else
Select Case ManageType
Case "", "Myself":
Response.Write "<input type=""button"" name=""Submit4"" value=""删除选定"& EL_Channel.ItemName &""" disabled> "
Response.Write "<input type=""button"" name=""Submit4"" value=""设置选定"& EL_Channel.ItemName &""" disabled> "
Response.Write "<input type=""button"" name=""Submit4"" value=""移动选定"& EL_Channel.ItemName &"至>>"" disabled>"
Response.Write "<select name=""TargetClassID"" id=""TargetClassID"" disabled>"
Response.Write "<option value='0'>选择目标"& EL_Channel.ClassItemName &"</option>"
Response.Write EL_Common.ShowClassTree(EL_Channel.ChannelID, 0, 0, "")
Response.Write "</select> "
Case "Check":
Response.Write "<input type=""button"" name=""Submit4"" value=""删除选定"& EL_Channel.ItemName &""" disabled> "
Response.Write "<input type=""button"" name=""Submit4"" value=""发布选定"& EL_Channel.ItemName &""" disabled> "
Response.Write "<input type=""button"" name=""Submit4"" value=""取消发布选定"& EL_Channel.ItemName &""" disabled> "
Case "Recycled":
Response.Write "<input type=""button"" name=""Submit4"" value=""彻底删除选定"& EL_Channel.ItemName &""" disabled> "
Response.Write "<input type=""button"" name=""Submit4"" value=""清空回收站"" disabled> "
Response.Write "<input type=""button"" ⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -