📄 admin_photo.asp
字号:
If Search_Keywords<>"" And Search_Field<>"" Then
CurrentPath = CurrentPath &">> "& EL_Channel.ItemName &"搜索 >> "
Select Case LCase(Search_Field)
Case "photoname": CurrentPath = CurrentPath & EL_Channel.ItemName & "名称："
Case "content": CurrentPath = CurrentPath & EL_Channel.ItemName & "简介："
Case "author": CurrentPath = CurrentPath & EL_Channel.ItemName & "作者："
Case "inputer": CurrentPath = CurrentPath & EL_Channel.ItemName & "录入者："
End Select
CurrentPath = CurrentPath &"<span class=redtext>"& Search_Keywords &"</span>"
Else
Select Case ManageType
Case "":
CurrentPath = CurrentPath & EL_Common.GetParentPath(ClassURL, ClassID) &">> 所有<span class=bluetext>"& TempString &"</span>"& EL_Channel.ItemName
Case "Myself":
CurrentPath = CurrentPath & EL_Common.GetParentPath(ClassURL, ClassID) &">> <span class=redtext>"& EL_Admin.AdminName &" 添加的<span class=bluetext>"& TempString &"</span>"& EL_Channel.ItemName &"</span>"
Case "Check":
CurrentPath = CurrentPath & ">> "& EL_Channel.ItemName &"发布管理 "
CurrentPath = CurrentPath & EL_Common.GetParentPath(ClassURL, ClassID) &">> 所有<span class=bluetext>"& TempString &"</span>"& EL_Channel.ItemName
Case "Recycled":
CurrentPath = CurrentPath & ">> "& EL_Channel.ItemName &"回收站管理 "
CurrentPath = CurrentPath & EL_Common.GetParentPath(ClassURL, ClassID) &">> 所有<span class=redtext>已删除的"& TempString &"</span>"& EL_Channel.ItemName
End Select
End If
%>
<script language="javascript">
function CheckedAll(){
for (var i=0;i<document.myform.elements.length;i++){
var e = document.myform.elements[i];
if (e.type == 'checkbox' && e.name=='CheckObject' && e.disabled == false){
e.checked = true;
}
}
getObject("myselect").innerHTML = "[<a href='javascript:CancelAll()'>取消</a>]";
}
function CancelAll(){
for (var i=0;i<document.myform.elements.length;i++){
var e = document.myform.elements[i];
if (e.type == 'checkbox' && e.name=='CheckObject' && e.disabled == false){
e.checked = false;
}
}
getObject("myselect").innerHTML = "[<a href='javascript:CheckedAll()'>全选</a>]";
}
function CheckObject(){
var frm = getObject("myform");
for (var i=0;i<frm.elements.length;i++){
var e = frm.elements[i];
if (e.type == 'checkbox' && e.name=='CheckObject' && e.disabled == false && e.checked == true ){
return true
}
}
return false;
}
function Check(frm){
SubmitOnce(frm);
return true;
}
var JURL = "<%=EL_CurrentScriptName%>?ChannelID=<%=EL_Channel.ChannelID%>";
function doDelete(){
var frm = getObject("myform");
if(!CheckObject()){
alert("请至少选定1<%=EL_Channel.ItemUnit & EL_Channel.ItemName%>");
return false;
}
frm.action = JURL + "&Action=Delete";
if(confirm("本次操作将选定<%=EL_Channel.ItemName%>删除至回收站，以后可以从回收站中恢复\n确认要执行选定删除吗？")){
frm.submit();
return;
}
return false;
}
function doMove(){
var frm = getObject("myform");
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="2" class="Border">
<tr>
<%
If RowCount = 0 Then
Response.Write "<td class='td_50' align=center>没有任何"& EL_Channel.ItemName &"数据</td>"
Else
rsPhoto.Open()
For i = 1 To RowCount
Response.Write "<td class='td_25' width='25%' align='center' style='padding:4px;' onmouseover=""this.className='MouseOver_25'"" onmouseout=""this.className='td_25'"">"
Response.Write "<table width='140' border='0' cellpadding='0' cellspacing='1'>"
Response.Write "<tr><td align='center'><a href='"& EL_CurrentScriptName &"?ChannelID="& EL_Channel.ChannelID &"&Action=Show&PhotoID="& rsPhoto("PhotoID") &"'>"
Response.Write "<img src='"& EL_Common.PictrueURL(rsPhoto("DefaultPictrue"), EL_Channel.FilePath) &"' border='0' width='140' height='100'>"
Response.Write "</a></td></tr>"
Response.Write "<tr><td>所属"& EL_Channel.ClassItemName &"：<a href='"& EL_CurrentScriptName &"?"& ClassURL &"&ClassID="& rsPhoto("ClassID") &"'>"& rsPhoto("ClassName") &"</td></tr>"
Response.Write "<tr><td>"& EL_Channel.ItemName &"名称：<a href='"& EL_CurrentScriptName &"?ChannelID="& EL_Channel.ChannelID &"&Action=Show&PhotoID="& rsPhoto("PhotoID") &"'>"& rsPhoto("PhotoName") &"</a></td></tr>"
Response.Write "<tr><td>录 入 者："& rsPhoto("Inputer") &"</td></tr>"
Response.Write "<tr><td>点 击 数："& rsPhoto("Hits") &" 次</td></tr>"
Response.Write "<tr><td>属 性："
Response.Write EL_Common.ShowBoolean(rsPhoto("OnTop").value,"<span class='bluetext'>顶</span>", "<span class='graytext'>顶</span>") &" "
Response.Write EL_Common.ShowBoolean(rsPhoto("Commended").value,"<span class='greentext'>荐</span>", "<span class='graytext'>荐</span>")
Response.Write "</td></tr>"
Response.Write "<tr><td>审 核："& EL_Common.ShowBoolean(rsPhoto("Passed").value, "<strong>√</strong>", "<span class=redtext><strong>×</strong></span>") &"</td></tr>"
Response.Write "<tr><td>选 择：<input name=""CheckObject"" type=""checkbox"" id=""CheckObject"" value="& rsPhoto("PhotoID") &" class='nomargin'></td></tr>"
Response.Write "</table>"
Response.Write "<div>"
If EL_Admin.Purview = 1 Or EL_Admin.Purview = 2 Or EL_Admin.CheckAdminPurview(rsPhoto("ClassID"), 2)=True Or rsPhoto("Inputer")=EL_Admin.AdminName Then
Select Case ManageType
Case "", "Myself":
Response.Write "<a href='"& EL_CurrentScriptName &"?ChannelID="& EL_Channel.ChannelID &"&Action=Modify&PhotoID="& rsPhoto("PhotoID") &"'>修改</a> "
Response.Write "<a href='"& EL_CurrentScriptName &"?ChannelID="& EL_Channel.ChannelID &"&Action=Delete&PhotoID="& rsPhoto("PhotoID") &"' onClick=""return confirm('本次操作将该"& EL_Channel.ItemUnit & EL_Channel.ItemName &"删除至回收站，以后可以从回收站中恢复\n确认要执行删除吗？')"">删除</a> "
If rsPhoto("OnTop") = True Then
Response.Write "<a href='"& EL_CurrentScriptName &"?ChannelID="& EL_Channel.ChannelID &"&Action=SetOnTop&PhotoID="& rsPhoto("PhotoID") &"'>解固</a> "
Else
Response.Write "<a href='"& EL_CurrentScriptName &"?ChannelID="& EL_Channel.ChannelID &"&Action=SetOnTop&PhotoID="& rsPhoto("PhotoID") &"'>固顶</a> "
End If
If rsPhoto("Commended") = True Then
Response.Write "<a href='"& EL_CurrentScriptName &"?ChannelID="& EL_Channel.ChannelID &"&Action=SetCommended&PhotoID="& rsPhoto("PhotoID") &"'>取消推荐</a> "
Else
Response.Write "<a href='"& EL_CurrentScriptName &"?ChannelID="& EL_Channel.ChannelID &"&Action=SetCommended&PhotoID="& rsPhoto("PhotoID") &"'>设为推荐</a> "
End If
Case "Check":
Response.Write "<a href='"& EL_CurrentScriptName &"?ChannelID="& EL_Channel.ChannelID &"&Action=Modify&PhotoID="& rsPhoto("PhotoID") &"'>修改</a> "
Response.Write "<a href='"& EL_CurrentScriptName &"?ChannelID="& EL_Channel.ChannelID &"&Action=Delete&PhotoID="& rsPhoto("PhotoID") &"' onClick=""return confirm('本次操作将该"& EL_Channel.ItemUnit & EL_Channel.ItemName &"删除至回收站，以后可以从回收站中恢复\n确认要执行删除吗？')"">删除</a> "
If rsPhoto("Passed") = True Then
Response.Write "<a href='"& EL_CurrentScriptName &"?ChannelID="& EL_Channel.ChannelID &"&Action=SetPassed&PhotoID="& rsPhoto("PhotoID") &"&SetValue="& EL_False &"'>取消发布</a> "
Else
Response.Write "<a href='"& EL_CurrentScriptName &"?ChannelID="& EL_Channel.ChannelID &"&Action=SetPassed&PhotoID="& rsPhoto("PhotoID") &"&SetValue="& EL_True &"'>立即发布</a> "
End If
Case "Recycled":
Response.Write "<a href='"& EL_CurrentScriptName &"?ChannelID="& EL_Channel.ChannelID &"&Action=DeleteTrue&PhotoID="& rsPhoto("PhotoID") &"' onClick=""return confirm('本次操作将彻底删除该"& EL_Channel.ItemUnit & EL_Channel.ItemName &"，并不能恢复\n确认要执行彻底删除吗？')"">彻底删除</a> | "
Response.Write "<a href='"& EL_CurrentScriptName &"?ChannelID="& EL_Channel.ChannelID &"&Action=Restore&PhotoID="& rsPhoto("PhotoID") &"'>还原</a>"
End Select
Else
Select Case ManageType
Case "", "Myself":
Response.Write "<span class=graytext>修改</span> "
Response.Write "<span class=graytext>删除</span> "
If rsPhoto("OnTop") = True Then
Response.Write "<span class=graytext>解固</span> "
Else
Response.Write "<span class=graytext>固顶</span> "
End If
If rsPhoto("Commended") = True Then
Response.Write "<span class=graytext>取消推荐</span> "
Else⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -