📄 admin_shop.asp
字号:
<td align="center"><input name="CheckObject" type="checkbox" id="CheckObject" value="<%=rsManage("ProductID")%>"></td>
<td align="center"><%=rsManage("ProductID")%></td>
<td style="padding-left:3px;">
<%="[<a href="& EL_CurrentScriptName &"?"& ClassURL &"&ClassID="& rsManage("ClassID") &">"& rsManage("ClassName") &"</a>]"%>
<a href="<%=EL_CurrentScriptName%>?ChannelID=<%=EL_Channel.ChannelID%>&Action=Show&ProductID=<%=rsManage("ProductID")%>" title="更新日期：<%=rsManage("UpdateTime")%>"><%=EL_Common.HTMLEncode(rsManage("ProductName"))%></a></td>
<td align="center"><span class="YellowText"><%=rsManage("Points")%></span></td>
<td align="center"><%=rsManage("Num")%></td>
<td align="center"><%=EL_Common.HTMLEncode(rsManage("Inputer"))%></td>
<td align="center" nowrap>
<%
Response.Write EL_Common.ShowBoolean(rsManage("OnTop").value, "<span class=bluetext title='固顶"& EL_Channel.ItemName &"'>顶</span>", "<span class=graytext>顶</span>") &" "
Response.Write EL_Common.ShowBoolean(rsManage("Commended").value, "<span class=greentext title='推荐"& EL_Channel.ItemName &"'>荐</span>", "<span class=graytext>荐</span>")
%></td>
<td align="center"><%=EL_Common.ShowBoolean(rsManage("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(rsManage("ClassID"), 2)=True Or rsManage("Inputer")=EL_Admin.AdminName Then
Select Case ManageType
Case "", "Myself":
Response.Write "<a href='"& EL_CurrentScriptName &"?ChannelID="& EL_Channel.ChannelID &"&Action=Modify&ProductID="& rsManage("ProductID") &"'>修改</a> | "
Response.Write "<a href='"& EL_CurrentScriptName &"?ChannelID="& EL_Channel.ChannelID &"&Action=Delete&ProductID="& rsManage("ProductID") &"' onClick=""return confirm('本次操作将该"& EL_Channel.ItemUnit & EL_Channel.ItemName &"删除至回收站，以后可以从回收站中恢复\n确认要执行删除吗？')"">删除</a> | "
If rsManage("OnTop") = True Then
Response.Write "<a href='"& EL_CurrentScriptName &"?ChannelID="& EL_Channel.ChannelID &"&Action=SetOnTop&ProductID="& rsManage("ProductID") &"'>解固</a> | "
Else
Response.Write "<a href='"& EL_CurrentScriptName &"?ChannelID="& EL_Channel.ChannelID &"&Action=SetOnTop&ProductID="& rsManage("ProductID") &"'>固顶</a> | "
End If
If rsManage("Commended") = True Then
Response.Write "<a href='"& EL_CurrentScriptName &"?ChannelID="& EL_Channel.ChannelID &"&Action=SetCommended&ProductID="& rsManage("ProductID") &"'>取消推荐</a>"
Else
Response.Write "<a href='"& EL_CurrentScriptName &"?ChannelID="& EL_Channel.ChannelID &"&Action=SetCommended&ProductID="& rsManage("ProductID") &"'>设为推荐</a>"
End If
Case "Check":
Response.Write "<a href='"& EL_CurrentScriptName &"?ChannelID="& EL_Channel.ChannelID &"&Action=Modify&ProductID="& rsManage("ProductID") &"'>修改</a> | "
Response.Write "<a href='"& EL_CurrentScriptName &"?ChannelID="& EL_Channel.ChannelID &"&Action=Delete&ProductID="& rsManage("ProductID") &"' onClick=""return confirm('本次操作将该"& EL_Channel.ItemUnit & EL_Channel.ItemName &"删除至回收站，以后可以从回收站中恢复\n确认要执行删除吗？')"">删除</a> | "
If rsManage("Passed") = True Then
Response.Write "<a href='"& EL_CurrentScriptName &"?ChannelID="& EL_Channel.ChannelID &"&Action=SetPassed&ProductID="& rsManage("ProductID") &"&SetValue="& EL_False &"'>取消发布</a>"
Else
Response.Write "<a href='"& EL_CurrentScriptName &"?ChannelID="& EL_Channel.ChannelID &"&Action=SetPassed&ProductID="& rsManage("ProductID") &"&SetValue="& EL_True &"'>立即发布</a>"
End If
Case "Recycled":
Response.Write "<a href='"& EL_CurrentScriptName &"?ChannelID="& EL_Channel.ChannelID &"&Action=DeleteTrue&ProductID="& rsManage("ProductID") &"' onClick=""return confirm('本次操作将彻底删除该"& EL_Channel.ItemUnit & EL_Channel.ItemName &"，并不能恢复\n确认要执行彻底删除吗？')"">彻底删除</a> | "
Response.Write "<a href='"& EL_CurrentScriptName &"?ChannelID="& EL_Channel.ChannelID &"&Action=Restore&ProductID="& rsManage("ProductID") &"'>还原</a>"
End Select
Else
Select Case ManageType
Case "":
Response.Write "<span class=graytext>修改</span> | "
Response.Write "<span class=graytext>删除</span> | "
If rsManage("OnTop") = True Then
Response.Write "<span class=graytext>解固</span> | "
Else
Response.Write "<span class=graytext>固顶</span> | "
End If
If rsManage("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 rsManage("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 rsManage.MoveNext
Next
rsManage.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"" name=""Submit4"" value=""还原选定"& EL_Channel.ItemName &""" disabled> "
Response.Write "<input type=""button"" name=""Submit4"" value=""还原所有"& EL_Channel.ItemName &""" disabled> "
End Select
End If
%>
</td>
</tr>
</table>
</form>
<form name="search" method="get" action="<%=EL_CurrentScriptName%>">
<table width="100%" border="0" cellpadding="0" cellspacing="1" class="Border">
<tr>
<td width="8%" nowrap class="td_50"><%=EL_Channel.ItemName%>搜索：</td>
<td width="92%" class="td_50">
<select name="Search_Field" id="Search_Field">
<option value="ProductName"><%=EL_Channel.ItemName%>名称</option>
<option value="Content"><%=EL_Channel.ItemName%>内容</option>
<option value="Inputer"><%=EL_Channel.ItemName%>录入者</option>
</select>
<select name="ClassID" id="ClassID">
<option value="">所有<%=EL_Channel.ClassItemName%></option>
<%=EL_Common.ShowClassTree(EL_Channel.ChannelID, 0, 0, "")%>
</select>
<input name="Search_Keywords" type="text" id="Search_Keywords" value="关键字">
<input type="submit" name="Submit3" value="搜索">
<input name="ChannelID" type="hidden" id="ChannelID" value="<%=EL_Channel.ChannelID%>"></td>
</tr>
</table>
</form>
<table width="100%" border="0" cellspacing="1" cellpadding="0">
<tr>
<td> 属性说明：“<span class="BlueText">顶</span>” — 固顶<%=EL_Channel.ItemName%> “<span class="GreenText">荐</span>” — 推荐<%=EL_Channel.ItemName%> </td>
</tr>
</table>
<%
Set rsManage = Nothing
Set ManageCmd = Nothing
EL_Common.ShowScriptError()
End Sub
Sub AddProduct()
On Error Resume Next
%>
<script language="javascript">
function AddItem(strFileName){
var arrName = strFileName.split('.');
var FileExt = arrName[1];
if (FileExt == 'gif' || FileExt == 'jpg' || FileExt == 'jpeg' || FileExt == 'jpe' || FileExt == 'bmp' || FileExt == 'png'){
document.all.PictruePreview.src = '<%=EL_Channel.FilePath%>'+strFileName;
document.myform.DefaultPictrue.value = strFileName;
document.myform.PictrueList.options[document.myform.PictrueList.length] = new Option(strFileName, strFileName);
document.myform.PictrueList.selectedIndex += 1;
}
if(document.myform.Uploadfiles.value.trim() == ''){
document.myform.Uploadfiles.value = strFileName;
}else{
document.myform.Uploadfiles.value += '|'+ strFileName;
}
}
function Check(frm){
var CurrentMode = Editor.CurrentMode;
if (CurrentMode == 0){
frm.Content.value = Editor.HtmlEdit.document.body.innerHTML;
}else if(CurrentMode==1){
frm.Content.value = Editor.HtmlEdit.document.body.innerText;
}else{
alert('<%=EL_Channel.ItemName%>内容处于预览状态不能保存');
Editor.HtmlEdit.focus();
return false;
}
if(frm.ClassID.value.trim()=="" || frm.ClassID.selectedIndex == -1){
alert("请选择所属<%=EL_Channel.ClassItemName%>");
frm.ClassID.focus();
return false;
}
if(frm.ProductName.value.trim()==''){
alert('请输入<%=EL_Channel.ItemName%>名称');
frm.ProductName.focus();
return false;
}
if(frm.Content.value.trim()==''){
alert('请输入<%=EL_Channel.ItemName%>介绍');
Editor.HtmlEdit.focus();
return false;
}
<%=EL_Common.ShowDefinedField_Js(EL_Channel.ChannelID, "frm")%>
SubmitOnce(frm);
return;
}
</script>
<form name="myform" action="Admin_Shop.asp" method="post" onSubmit="return Check(this)">
<table width="100%" border="0" cellpadding="0" cellspacing="1" class="Border">
<tr>
<td colspan="4" class="top_25"><strong>添加<%=EL_Channel.ItemName%></strong></td>
</tr>
<tr>
<td width="19%" class="td_ItemName"><strong>所属<%=EL_Channel.ClassItemName%></strong></td>
<td colspan="3" class="td_25"><select name="ClassID" id="ClassID">
<%=EL_Common.ShowClassTree(EL_Channel.ChannelID, 0, ClassID, "")%>
</select>
<%If EL_Admin.Purview = 3 Then Response.Write "<span class=redtext>注：您只能在<span class=greentext>绿色</span>的"& EL_Channel.ClassItemName &"中操作</span>"%></td>
</tr>
<tr>
<td class="td_ItemName"><strong><%=EL_Channel.ItemName%>名称</strong></td>
<td colspan="3" class="td_25"><input name="ProductName" type="text" class="RulerInput" id="ProductName" size="65"></td>
</tr>
<tr>
<td class="td_ItemName"><strong class="BlueText">积分设置</strong><br>
购买本<%=EL_Channel.ItemName%>所需要的积分</td>
<td width="19%" class="td_25"><input name="Points" type="text" id="Points" value="0" size="10"></td>
<td width="9%" align="center" class="td_ItemName"><strong>库存量</strong></td>
<td width="53%" class="td_25"><input name="Num" type="text" id="Num" value="0" size="10"></td>
</tr>
<tr>
<td class="td_ItemName"><strong><%=EL_Channel.ItemName%>介绍</strong><br>
<div style="height:50%">
<input name="IsSaveRemoteImages" type="checkbox" class="nomargin" id="IsSaveRemoteImages" value="<%=EL_True%>" checked>
<span class="BlueText">是否保存编辑器中包含的远程图片到本地文件，当远程图片较多时保存速度较慢</span><br>
<span class="redText">在使用此功能之前必须在网站基本信息配置中打开“自动保存远程图片”功能</span> </div>
<table width="100%" height="50%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td valign="bottom"><img src="../Images/nopic.gif" name="PictruePreview" width="140" height="100" id="PictruePreview"></td>
</tr>
<tr>
<td height="10"> </td>
</tr>
</table> </td>
<td colspan="3" class="td_25">
<textarea name='Content' id="Content" style='display:none'></textarea>
<iframe id='Ed⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -