📄 label_creat.asp
字号:
<title>标签管理</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../images/skin/Css_<%=Session("Admin_Style_Num")%>/<%=Session("Admin_Style_Num")%>.css" rel="stylesheet" type="text/css">
</head>
<script language="JavaScript" type="text/javascript" src="../../FS_Inc/Get_Domain.asp"></script>
<script language="JavaScript" src="../../FS_Inc/PublicJS.js" type="text/JavaScript"></script>
<script language="JavaScript" src="../../FS_Inc/Prototype.js" type="text/JavaScript"></script>
<script language="JavaScript" src="../../FS_Inc/CheckJs.js" type="text/JavaScript"></script>
<script language="JavaScript" type="text/javascript" src="../../Editor/FS_scripts/editor.js"></script>
<body>
<table width="98%" height="56" border="0" align="center" cellpadding="4" cellspacing="1" class="table">
<tr class="hback" >
<td width="100%" height="20" align="Left" class="xingmu">标签库</td>
</tr>
<tr class="hback" >
<td height="27" align="center" class="hback"><div align="left"><a href="All_Label_Stock.asp">所有标签</a>┆<a href="../FreeLabel/FreeLabelList.asp"><font color="#FF0000">自由标签</font></a>┆<a href="All_Label_Stock.asp?isDel=1">备份库</a>┆<a href="label_creat.asp">创建标签</a>┆<a href="Label_Class.asp" target="_self">标签分类</a> ┆<a href="All_label_style.asp">样式管理</a> <a href="../../help?Label=MF_Label_Stock" target="_blank" style="cursor:help;"><img src="../Images/_help.gif" width="50" height="17" border="0"></a></div></td>
</tr>
</table>
<table width="98%" border="0" align="center" cellpadding="4" cellspacing="1" class="table">
<tr class="xingmu">
<td colspan="2" class="xingmu">创建标签</td>
</tr>
<form name="NewsForm" method="post" action="" target="_self" onSubmit="return CheckForm(this);">
<tr class="hback">
<td width="8%">
<div align="right">标签名称</div>
</td>
<td width="92%"><span class="tx">{FS400_
<input name="LableName" type="text" value="<%=tmp_LableName%>" id="LableName" size="18" style="border-top-width: 0px;border-right-width: 0px;border-bottom-width: 0px;border-left-width:0px;border-bottom-color: #000000;" onFocus="Do.these('LableName',function(){return CheckContentLen('LableName','span_LableName','2-30')})" onKeyUp="Do.these('LableName',function(){return CheckContentLen('LableName','span_LableName','2-30')})">
}</span><span id="span_LableName"></span>
<select name="LableClassID" id="LableClassID">
<option value="0">选择所属栏目</option>
<%
dim class_rs_obj
set class_rs_obj=Conn.execute("select id,ParentID,ClassName From FS_MF_LableClass where ParentID=0 order by id desc")
do while not class_rs_obj.eof
If CStr(tmp_LableClassID)=CStr(class_rs_obj("id")) Then
response.Write "<option value="""&class_rs_obj("id")&""" selected >"&class_rs_obj("ClassName")&"</option>"
Else
response.Write "<option value="""&class_rs_obj("id")&""">"&class_rs_obj("ClassName")&"</option>"
End If
response.Write get_childList(class_rs_obj("id"),"")
class_rs_obj.movenext
loop
class_rs_obj.close:set class_rs_obj=nothing
%>
</select>
<label>
<input name="isDel" type="checkbox" id="isDel" value="1" <%if tmp_isDel=1 then response.Write"checked"%>>
放入备份库</label>
</td>
</tr>
<tr class="hback" <%if request.QueryString("Label_Sub")<>"DS" then response.Write("style=""display:'none';""") else response.Write("style=""display:'';"" ") end if%>> </tr>
<tr class="hback">
<td> </td>
<td>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="16" valign="top">
<!--<OBJECT ID="Lable"
CLASSID="CLSID:389961B3-2025-4E6D-92E8-AE75352096E2"
CODEBASE="Foosun.CAB#version=1,0,0,0">
</OBJECT>
-->
<td height="16" valign="top"> <span onClick="Insertlabel_News('../<%=G_ADMIN_DIR%>/label/News_label.asp',500,450,'obj');" style="cursor:hand;"> <a href="#" title="新闻列表类标签">新闻列表</a> | </span><span onClick="Insertlabel_News('../<%=G_ADMIN_DIR%>/label/News_C_label.asp',500,350,'obj');" style="cursor:hand;"> <a href="#" title="新闻常规类标签">新闻常规</a> | </span><span onClick="Insertlabel_News('../<%=G_ADMIN_DIR%>/label/News_Un_label.asp',500,350,'obj');" style="cursor:hand;"> <a href="#" title="新闻不规则新闻标签">不规则新闻</a> | </span><%if Request.Cookies("FoosunSUBCookie")("FoosunSUBMS")=1 then%><span onClick="Insertlabel_News('../<%=G_ADMIN_DIR%>/label/Mall_label.asp',500,450,'obj');" style="cursor:hand;"> <a href="#" title="商城列表类标签">商城列表</a> | </span><span onClick="Insertlabel_News('../<%=G_ADMIN_DIR%>/label/Mall_C_label.asp',450,350,'obj');" style="cursor:hand;"> <a href="#" title="商城常规类标签">商城常规</a> | </span><%end if%><span onClick="Insertlabel_News('../<%=G_ADMIN_DIR%>/label/down_label.asp',500,450,'obj');" style="cursor:hand;"><a href="#" title="下载列表类标签">下载列表</a> | </span><span onClick="Insertlabel_News('../<%=G_ADMIN_DIR%>/label/down_C_label.asp',400,320,'obj');" style="cursor:hand;"><a href="#" title="下载常规类标签">下载常规</a> | </span><span onClick="Insertlabel_News('../<%=G_ADMIN_DIR%>/label/All_label.asp',500,400,'obj');" style="cursor:hand;display:;"><a href="#" title="通用类标签-所有子系统都可使用">通用标签</a> | </span><a href="All_label_style.asp" target="_self" title="样式管理"> 样式管理</a> | <span id=item$pval[CatID]) style="CURSOR: hand" onmouseup="opencat(id_templet);" onMouseOver="this.className='bg'" onMouseOut="this.className='bg1'" language=javascript><a href="#" title="更多标签">更多标签</a></span></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0" id="id_templet" style="display:none;">
<tr>
<td valign="top"> <%if Request.Cookies("FoosunSUBCookie")("FoosunSUBAP")=1 then%><span onClick="Insertlabel_News('../<%=G_ADMIN_DIR%>/label/job_label.asp',500,380,'obj');" style="cursor:hand;"><a href="#" title="人才类标签">人才标签</a> | </span><span onClick="Insertlabel_News('../<%=G_ADMIN_DIR%>/label/job_Search_label.asp',500,260,'obj');" style="cursor:hand;"><a href="#" title="人才类标签">人才搜索</a> | </span><span onClick="Insertlabel_News('../<%=G_ADMIN_DIR%>/label/job_C_label.asp',300,250,'obj');" style="cursor:hand;display:none"><a href="#" title="人才类标签">人才类标签</a> | </span><%End if%><%if Request.Cookies("FoosunSUBCookie")("FoosunSUBSD")=1 then%><span onClick="Insertlabel_News('../<%=G_ADMIN_DIR%>/label/supply_C_label.asp',480,460,'obj');" style="cursor:hand;"><a href="#" title="供求类标签">供求标签</a> | </span><%end if%><%if Request.Cookies("FoosunSUBCookie")("FoosunSUBHS")=1 then%><span onClick="Insertlabel_News('../<%=G_ADMIN_DIR%>/label/house_label.asp',500,400,'obj');" style="cursor:hand;"><a href="#" title="房产类标签">房产标签</a> | </span><span onClick="Insertlabel_News('../<%=G_ADMIN_DIR%>/label/house_C_label.asp',350,350,'obj');" style="cursor:hand;"><a href="#" title="房产类常规标签">房产常规</a> | </span><%end if%><span onClick="Insertlabel_News('../<%=G_ADMIN_DIR%>/label/FL_C_label.asp',300,350,'obj');" style="cursor:hand;"><a href="#" title="友情连接类标签">友情连接</a> | </span><span onClick="Insertlabel_News('../<%=G_ADMIN_DIR%>/label/st_C_label.asp',300,250,'obj');" style="cursor:hand;"><a href="#" title="常规统计类标签">常规统计</a> | </span><span onClick="Insertlabel_News('../<%=G_ADMIN_DIR%>/label/vote_C_label.asp',380,200,'obj');" style="cursor:hand;"><a href="#" title="投票类标签">投票</a> | </span><span onClick="Insertlabel_News('../<%=G_ADMIN_DIR%>/label/ads_C_label.asp',300,250,'obj');" style="cursor:hand;"><a href="#" title="广告常规类标签">广告</a> | </span><span onClick="Insertlabel_News('../<%=G_ADMIN_DIR%>/label/book_C_label.asp',400,420,'obj');" style="cursor:hand;"><a href="#" title="留言类标签">留言</a> | </span> </span><span onClick="Insertlabel_News('../<%=G_ADMIN_DIR%>/label/log_C_label.asp',400,400,'obj');" style="cursor:hand;"><a href="#" title="日志类标签">日志</a> | </span><span onClick="Insertlabel_News('../<%=G_ADMIN_DIR%>/label/photo_C_label.asp',320,350,'obj');" style="cursor:hand;"><a href="#" title="相册类标签">相册</a> </span></td>
</tr>
</table>
</td>
</tr>
<tr class="hback">
<td>
<div align="right">标签内容</div>
</td>
<td>
<!--编辑器开始-->
<pre id="idTemporary" name="idTemporary" style="display:none"><%=Server.HTMLEncode(tmp_LableContent)%></pre>
<script language="JavaScript">
<!--
var FS_Edit1 = new InnovaEditor("FS_Edit1");
FS_Edit1.cmdAssetManager="modalDialogShow('../../<% = G_ADMIN_DIR %>/CommPages/SelectManageDir/SelectPic.asp?CurrPath=<% = str_CurrPath %>',670,450)";
FS_Edit1.width="100%";
FS_Edit1.height="280";
FS_Edit1.btnFlash=true;
FS_Edit1.btnMedia=true;
FS_Edit1.RENDER($("idTemporary").innerHTML);
//-->
</script>
<textarea name="TxtFileds" style="display:none" ></textarea>
<!--编辑器结束-->
</td>
</tr>
<tr class="hback">
<td> </td>
<td>
<input type="submit" name="Submit" value="确认保存标签">
<input name="Action" type="hidden" id="Action" value="<%=tmp_action%>">
<input name="id" type="hidden" id="Action" value="<%=tmp_id%>">
<input type="reset" name="Submit2" value="重置">
</td>
</tr>
</form>
</table>
<%
Function get_childList(TypeID,f_CompatStr)
Dim f_ChildNewsRs,ChildTypeListStr,f_TempStr,f_isUrlStr,lng_GetCount
Set f_ChildNewsRs = Conn.Execute("Select id,ParentID,ClassName from FS_MF_LableClass where ParentID=" & TypeID & " order by id desc" )
f_TempStr =f_CompatStr & "┄"
do while Not f_ChildNewsRs.Eof
get_childList = get_childList & "<option value="""& f_ChildNewsRs("id")&""""
If CStr(tmp_LableClassID)=CStr(f_ChildNewsRs("id")) then
get_childList = get_childList & " selected" & Chr(13) & Chr(10)
End If
get_childList = get_childList & ">├" & f_TempStr & f_ChildNewsRs("ClassName")
get_childList = get_childList & "</option>" & Chr(13) & Chr(10)
get_childList = get_childList &get_childList(f_ChildNewsRs("id"),f_TempStr)
f_ChildNewsRs.MoveNext
loop
f_ChildNewsRs.Close
Set f_ChildNewsRs = Nothing
End Function
Set Conn=nothing
%>
</html>
<script language="JavaScript" type="text/JavaScript">
function Insertlabel_News(URL,widthe,heighte,obj)
{
var obj=window.OpenWindowAndSetValue("../../Fs_Inc/convert.htm?"+URL,widthe,heighte,'window',obj)
if (obj==undefined)return false;
if (obj!='')InsertEditor(obj);
}
function InsertEditor(InsertValue)
{
FS_Edit1.insertHTML(InsertValue);
}
function opencat(cat)
{
if(cat.style.display=="none"){
cat.style.display="";
} else {
cat.style.display="none";
}
}
function CheckForm(FormObj)
{
FormObj.TxtFileds.value = FS_Edit1.getXHTMLBody();
return true;
}
</script>
<!-- Powered by: FoosunCMS4.0系列,Company:Foosun Inc. -->
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -