📄 admin_channel.asp
字号:
<td width="86%" class="td_25"><input name="UploadFileType_Image" type="text" class="FlatInput" id="UploadFileType_Image" value="<%=arrUploadType(0)%>" size="40"></td>
</tr>
<tr>
<td class="td_ItemName">Flash文件：</td>
<td class="td_25"><input name="UploadFileType_Flash" type="text" class="FlatInput" id="UploadFileType_Flash" value="<%=arrUploadType(1)%>" size="40"></td>
</tr>
<tr>
<td nowrap class="td_ItemName">Windows媒体：</td>
<td class="td_25"><input name="UploadFileType_WindowMedia" type="text" class="FlatInput" id="UploadFileType_WindowMedia" value="<%=arrUploadType(2)%>" size="40"></td>
</tr>
<tr>
<td class="td_ItemName">Real媒体：</td>
<td class="td_25"><input name="UploadFileType_RealMedia" type="text" class="FlatInput" id="UploadFileType_RealMedia" value="<%=arrUploadType(3)%>" size="40"></td>
</tr>
<tr>
<td class="td_ItemName">其他文件：</td>
<td class="td_25"><input name="UploadFileType_Others" type="text" class="FlatInput" id="UploadFileType_Others" value="<%=arrUploadType(4)%>" size="40"></td>
</tr>
</table></td>
</tr>
<% End If %>
<tr>
<td class="td_ItemName"></td>
<td class="td_50"><input type="submit" name="Submit" value="保存配置">
<input type="button" name="Submit" value="返回上页" onClick="history.back()">
<input name="ChannelID" type="hidden" id="ChannelID" value="<%=EL_Channel.ChannelID%>">
<input name="Action" type="hidden" id="Action" value="SaveConfig"></td>
</tr>
</table>
</form>
<%
EL_Common.ShowScriptError()
End Sub
Sub ManageChannel()
On Error Resume Next
Dim ChannelCmd, rsChannel, StrFields, StrCondition, i, RowCount, MaxOrderID, MinOrderID
Call EL_Common.InitCommand(ChannelCmd, "EL_SP_ChannelList")
MinOrderID = 1
StrFields = "ChannelID,ChannelName,ChannelName_Color,Disabled,ChannelType,LinkURL,OrderID,ChannelModule,ItemName,ItemUnit,ItemCount"
StrCondition = "1=1"
With ChannelCmd
.Parameters.Append .CreateParameter("RETURN", 3, 4, 4)
.Parameters.Append .CreateParameter("@ArrFields",200, 1, Len(StrFields), StrFields)
.Parameters.Append .CreateParameter("@StrCondition",200, 1, Len(StrCondition), StrCondition)
.Parameters.Append .CreateParameter("@MaxOrderID",3, 2, 4)
Set rsChannel = .Execute()
End With
If rsChannel.State = 0 Then
RowCount = 0
Else
rsChannel.Close()
RowCount = ChannelCmd(0)
MaxOrderID = ChannelCmd(3)
End If
%>
<table width="100%" border="0" cellpadding="0" cellspacing="1" class="Border">
<tr align="center">
<td width="8%" class="top_25"><strong>ID</strong></td>
<td width="21%" class="top_25"><strong>频道名称</strong></td>
<td width="16%" class="top_25"><strong>频道模块</strong></td>
<td width="12%" class="top_25"><strong>状态</strong></td>
<td width="16%" class="top_25"><strong>信息统计</strong></td>
<td width="27%" class="top_25"><strong>操作</strong></td>
</tr>
<%
rsChannel.Open()
For i=1 To RowCount
%>
<tr align="center" class="td_25" onMouseOut="this.className='td_25'" onMouseOver="this.className='MouseOver_25'">
<td><%=rsChannel(0)%></td>
<td><font color="<%=rsChannel(2)%>"><%=rsChannel(1)%></font></td>
<td>
<%
If rsChannel(4) = 0 Then
Response.Write "<span class=bluetext>"& CN_ChannelModuleName(rsChannel(7)) &"</span>"
Else
Response.Write "<span class=redtext>外部频道："& rsChannel(5) &"</span>"
End If
%>
</td>
<td>
<%
If rsChannel(7) = -1 Then
If EnableForum Then
Response.Write "<span class=greentext>正常</span>"
Else
Response.Write "<span class=redtext>已禁用</span>"
End If
Else
Response.Write EL_Common.ShowBoolean(rsChannel(3).Value, "<span class=redtext>已禁用</span>", "<span class=greentext>正常</span>")
End If
%></td>
<td><% If rsChannel(4) = 0 And rsChannel(7)<>-1 Then %><span class="redText"><%=rsChannel(10)%></span> <%=rsChannel(9) & rsChannel(8)%><% End If%></td>
<td>
<%
If rsChannel(7) = -1 Then
If EnableForum Then
Response.Write "<span class=graytext>禁用</span>"
Else
Response.Write "<span class=graytext>启用</span>"
End If
Else
Response.Write "<a href='Admin_Channel.asp?Action=Disabled&ChannelID="& rsChannel(0) &"'>"& EL_Common.ShowBoolean(rsChannel(3).Value, "启用", "禁用") &"</a>"
End If
%> |
<% If rsChannel(7) = -1 Then %>
<span class="GrayText">配置</span> |
<% Else %>
<a href="Admin_Channel.asp?Action=Config&ChannelID=<%=rsChannel(0)%>">配置</a> |
<% End If %>
<% If rsChannel(0)<100 Then %>
<span class="GrayText">删除</span> |
<% Else %>
<a href="Admin_Channel.asp?Action=Delete&ChannelID=<%=rsChannel(0)%>" onClick="return confirm('本次操作将彻底删除频道中所有的数据，不可以恢复，确定要执行删除吗？')">删除</a> |
<% End If %>
<% If rsChannel(4) = 0 And rsChannel(7) <> -1 Then %>
<a href="Admin_Channel.asp?Action=Clear&ChannelID=<%=rsChannel(0)%>" onClick="return confirm('本次操作将彻底清除频道中所有的信息，不可以恢复，确定要执行清空吗？')">清空</a>
<% Else %>
<span class="GrayText">清空</span>
<% End If%>
<%
If rsChannel(6) = MinOrderID Then
Response.Write "<img src='Images/Up_0.gif' width='12' height='13' border='0' alt='不能移动'> "
Else
Response.Write "<a href='Admin_Channel.asp?Action=MoveUp&ChannelID="& rsChannel(0) &"'><img src='Images/Up.gif' width='12' height='13' border='0' alt='上移'></a> "
End If
If rsChannel(6) = MaxOrderID Then
Response.Write "<img src='Images/Down_0.gif' width='12' height='13' border='0' alt='不能移动'>"
Else
Response.Write "<a href='Admin_Channel.asp?Action=MoveDown&ChannelID="& rsChannel(0) &"'><img src='Images/Down.gif' width='12' height='13' border='0' alt='下移'></a>"
End If
%>
</td>
</tr>
<%
If i < RowCount Then rsChannel.MoveNext
Next
%>
</table>
<%
rsChannel.Close()
Set rsChannel = Nothing
Set ChannelCmd = Nothing
EL_Common.ShowScriptError()
End Sub
Sub AddChannel()
%>
<script language="javascript">
function foundInArray(arr, value){
for(var i=0;i<arr.length;i++){
if(arr[i].trim() == value.trim()){
return true;
}
}
return false;
}
function CreateType_Click(obj){
var CT = document.getElementById("CreateType");
var arrCT = CT.value.split(",");
if(obj.checked){
if(!foundInArray(arrCT, obj.value)){
CT.value += (","+obj.value);
}
}else{
var re = new RegExp(","+ obj.value);
var str = CT.value;
CT.value = str.replace(re, "");
}
}
function ChannelType_onClick(){
if(document.myform.ChannelType[0].checked){
document.getElementById("TR_0").style.display = "none";
for(var i=1;i<16;i++){
document.getElementById("TR_"+i).style.display = "";
}
}else{
document.getElementById("TR_0").style.display = "";
for(var i=1;i<16;i++){
document.getElementById("TR_"+i).style.display = "none";
}
}
}
function Check(frm){
if(frm.ChannelName.value.trim()==""){
alert("请输入频道名称");
frm.ChannelName.focus();
return false;
}else if(frm.ChannelName.value.trim().length>20){
alert("频道名称不可以超过20个字");
frm.ChannelName.focus();
return false;
}
if(frm.ChannelType[1].checked){
if(frm.LinkURL.value.trim()==""){
alert("请输入外部链接地址");
frm.LinkURL.focus();
return false;
}
}else{
if(frm.ChannelDir.value.trim()==""){
alert("请输入频道目录");
frm.ChannelDir.focus();
return false;
}else if(!CheckWord(frm.ChannelDir.value)){
alert("频道目录必须由英文字母、数字或下划线组成");
frm.ChannelDir.focus();
return false;
}else if(frm.ChannelDir.value.length>20){
alert("频道目录长度不能超过20个字符");
frm.ChannelDir.focus();
return false;
}
if(frm.ItemName.value.trim()==""){
alert("请输入项目名称");
frm.ItemName.focus();
return false;
}else if(frm.ItemName.value.length>10){
alert("项目名称长度不能超过10个字符");
frm.ItemName.focus();
return false;
}
if(frm.ItemUnit.value.trim()==""){
alert("请输入项目单位");
frm.ItemUnit.focus();
return false;
}else if(frm.ItemUnit.value.length>10){
alert("项目单位长度不能超过10个字符");
frm.ItemUnit.focus();
return false;
}
if(frm.ClassItemName.value.trim()==""){
alert("请输入分类项目名称");
frm.ClassItemName.focus();
return false;
}else if(frm.ClassItemName.value.length>10){
alert("分类项目名称长度不能超过10个字符");
frm.ClassItemName.focus();
return false;
}
if(frm.ShowPageSize.value.trim()==""){
alert("请输入分页数");
frm.ShowPageSize.focus();
return false;
}else if(!CheckNum(frm.ShowPageSize.value) || parseInt(frm.ShowPageSize.value)<1){
alert("分页数必须为大于0的数字");
frm.ShowPageSize.focus();
return false;
}
if(frm.UploadDir.value.trim()==""){
alert("请输入文件上传保存目录");
frm.UploadDir.focus();
return false;
}else if(!CheckWord(frm.UploadDir.value)){
alert("文件上传保存目录必须由英文字母、数字或下划线组成");
frm.UploadDir.focus();
return false;
}else if(frm.UploadDir.value.length>20){
alert("文件上传保存目录长度不能超过20个字符");
frm.UploadDir.focus();
return false;
}
if(frm.UploadMaxSize.value.trim()==""){
alert("请输入允许上传文件大小限制");
frm.UploadMaxSize.focus();
return false;
}else if(!CheckNum(frm.UploadMaxSize.value) || parseInt(frm.UploadMaxSize.value)<1){
alert("允许上传文件大小限制必须为大于0的数字");
frm.UploadMaxSize.focus();
return false;
}
if(frm.UploadFileType_Image.value.trim()==""){
frm.UploadFileType.value = "\$";
}else if(frm.UploadFileType_Image.value.indexOf("\$")>0){
alert("文件格式中的图片类型包含了非法字符‘\$’");
frm.UploadFileType_Image.focus();
return false;
}else{
frm.UploadFileType.value = frm.UploadFileType_Image.value +"\$";
}
if(frm.UploadFileType_Flash.value.trim()==""){
frm.UploadFileType.value += "\$";
}else if(frm.UploadFileType_Flash.value.indexOf("\$")>0){
alert("文件格式中的Flash文件类型包含了非法字符‘\$’");
frm.UploadFileType_Flash.focus();
return false;
}else{
frm.UploadFileType.value += frm.UploadFileType_Flash.value +"\$";
}
if(frm.UploadFileType_WindowMedia.value.trim()==""){
frm.UploadFileType.value += "\$";
}else if(frm.UploadFileType_WindowMedia.value.indexOf("\$")>0){
alert("文件格式中的Windows媒体类型包含了非法字符‘\$’");
frm.UploadFileType_WindowMedia.focus();
return false;
}else{
frm.UploadFileType.value += frm.UploadFileType_WindowMedia.value +"\$";
}
if(frm.UploadFileType_RealMedia.value.trim()==""){
frm.UploadFileType.value += "\$";
}else if(frm.UploadFileType_RealMedia.value.indexOf("\$")>0){
alert("文件格式中的Real媒体类型包含了非法字符‘\$’");
frm.UploadFileType_RealMedia.focus();
return false;
}else{
frm.UploadFileType.value += frm.UploadFileType_RealMedia.value +"\$";
}
if(frm.UploadFileType_Others.value.trim()!=""){
if(frm.UploadFileType_Others.value.indexOf("\$")>0){
alert("文件格式中的其他文件类型包含了非法字符 ‘\$’");
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -