开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Windows编程 > 数据库编程 > 查看源码
All_label.asp
资源名称：eat.rar　[点击查看]
上传用户：jisenq
上传日期：2014-06-29
资源大小：7216k
文件大小：14k
源码类别：

数据库编程

开发平台：

ASP/ASPX

All_label.asp：源码内容
  1. <% Option Explicit %>
  2. <!--#include file="../../FS_Inc/Const.asp" -->
  3. <!--#include file="../../FS_Inc/Function.asp"-->
  4. <!--#include file="../../FS_InterFace/MF_Function.asp" -->
  5. <!--#include file="../../FS_InterFace/NS_Function.asp" -->
  6. <!--#include file="../../FS_Inc/Func_page.asp" -->
  7. <%
  8. Response.Buffer = True
  9. Response.Expires = -1
  10. Response.ExpiresAbsolute = Now() - 1
  11. Response.Expires = 0
  12. Response.CacheControl = "no-cache"
  13. Dim Conn
  14. MF_Default_Conn
  15. 'session判断
  16. MF_Session_TF 
  17. if not MF_Check_Pop_TF("MF_sPublic") then Err_Show
  18. %>
  19. <html>
  20. <head>
  21. <title>新闻标签管理</title>
  22. <meta http-equiv="Content-Type" content="text/html; charset=gb2312">
  23. <link href="../images/skin/Css_<%=Session("Admin_Style_Num")%>/<%=Session("Admin_Style_Num")%>.css" rel="stylesheet" type="text/css">
  24. <base target=self>
  25. </head>
  26. <body class="hback">
  27. <script language="JavaScript" src="../../FS_Inc/PublicJS.js" type="text/JavaScript"></script>
  28.   <form  name="form1" method="post">
  29.   <table width="98%" height="29" border="0" align=center cellpadding="3" cellspacing="1" class="table" valign=absmiddle>
  30.     <tr class="hback" > 
  31.       <td height="27"  align="Left" class="xingmu"> <table width="100%" border="0" cellspacing="0" cellpadding="0">
  32.           <tr> 
  33.             <td width="20%" class="xingmu"><strong>常规标签创建</strong></td>
  34.             <td width="80%"><div align="right"> 
  35.                 <input name="button4" type="button" onClick="window.returnValue='';window.close();" value="关闭">
  36.               </div></td>
  37.           </tr>
  38.         </table></td>
  39.     </tr>
  40.   </table>
  41.   <table width="98%" border="0" align="center" cellpadding="1" cellspacing="1" class="table">
  42.     <tr class="hback"> 
  43.       <td width="13%" height="15"><div align="center"><a href="All_Label.asp?type=PostionNavi" target="_self">位置导航</a></div></td>
  44.       <td width="13%"><div align="center"><a href="All_Label.asp?type=PageTitle" target="_self">页面标题</a><a href="News_C_Label.asp?type=OldNews" target="_self"></a></div></td>
  45.       <td width="13%" style="display:none"><div align="center"><a href="All_Label.asp?type=SiteMap" target="_self">站点地图</a></div></td>
  46.       <td width="13%"><div align="center"><a href="News_C_Label.asp?type=NorFilt" target="_self"></a><a href="All_Label.asp?type=Search" target="_self">搜索表单</a></div></td>
  47.       <td width="13%"><div align="center"><a href="All_Label.asp?type=InfoStat" target="_self">信息统计</a></div></td>
  48.       <td width="13%"><div align="center"><a href="All_Label.asp?type=UserLogin" target="_self">用户登陆</a></div></td>
  49.       <td width="13%"><div align="center"><a href="All_Label.asp?type=CopyRight" target="_self">版权信息</a></div></td>
  50.       <td width="13%"><div align="center"><a href="All_Label.asp?type=SubList" target="_self">子站导航</a></div></td>
  51.     </tr>
  52.   </table>
  53.   <%
  54.   dim str_type
  55.   str_type = Request.QueryString("type")
  56.   select case str_type
  57.    case "PostionNavi"
  58. Call PostionNavi()
  59. Case "PageTitle"
  60.    Call PageTitle()
  61. Case "SiteMap"
  62. Call SiteMap()
  63. Case "Search"
  64. Call Search()
  65. Case "InfoStat"
  66. Call InfoStat()
  67. Case "UserLogin"
  68. Call UserLogin()
  69. Case "CopyRight"
  70. Call CopyRight()
  71. Case "SubList"
  72. Call SubList()
  73. Case else
  74. Call PostionNavi()
  75.   end select
  76.   Sub PostionNavi()
  77.   %>
  78.   <table width="98%" border="0" align="center" cellpadding="5" cellspacing="1" class="table">
  79.     <tr>
  80.       <td colspan="2" class="xingmu">位置导航</td>
  81.     </tr>
  82.     <tr>
  83.       <td width="28%" class="hback"><div align="right">分割字符(图片)</div></td>
  84.       <td width="72%" class="hback"><input name="NaviChar" type="text" id="NaviChar" value=" &gt;&gt; ">
  85.       请使用html语法,请不要使用“$，┆”禁用字符</td>
  86.     </tr>
  87.     <tr>
  88.       <td class="hback"><div align="right">联接CSS</div></td>
  89.       <td class="hback"><input name="LinkCSS" type="text" id="LinkCSS">
  90.       请不要使用“$，┆”禁用字符</td>
  91.     </tr>
  92.     <tr>
  93.       <td class="hback"><div align="right">当前位置文字</div></td>
  94.       <td class="hback"><input name="Nchar" type="text" id="Nchar" value="正文">
  95.         CSS
  96.         <input name="NcharCSS" type="text" id="NcharCSS"></td>
  97.     </tr>
  98.     <tr>
  99.       <td class="hback"><div align="right"></div></td>
  100.       <td class="hback"><input name="button" type="button" onClick="ok(this.form);" value="确定创建此标签">
  101.         <input name="button" type="button" onClick="window.returnValue='';window.close();" value=" 取 消 "></td>
  102.     </tr>
  103.   </table>
  104. <script language="JavaScript" type="text/JavaScript">
  105. function ok(obj)
  106. {
  107. var retV = '{FS:MF=PostionNavi┆';
  108. retV+='分割字符$' + obj.NaviChar.value + '┆';
  109. retV+='位置文字$' + obj.Nchar.value + '┆';
  110. retV+='位置文字css$' + obj.NcharCSS.value + '┆';
  111. retV+='联接CSS$' + obj.LinkCSS.value + '';
  112. retV+='}';
  113. window.parent.returnValue = retV;
  114. window.close();
  115. }
  116. </script>
  117.  <%End Sub%>
  118.  <%Sub PageTitle()%>
  119.  <table width="98%" border="0" align="center" cellpadding="5" cellspacing="1" class="table">
  120.     <tr>
  121.       <td colspan="2" class="xingmu">页面标题</td>
  122.     </tr>
  123.     <tr>
  124.       <td width="28%" class="hback"><div align="right">附属文字</div></td>
  125.       <td width="72%" class="hback"><input name="O_Char" type="text" id="O_Char" value="风讯__Foosun.CN">
  126.       请不要使用“$，┆”禁用字符</td>
  127.     </tr>
  128.     <tr>
  129.       <td class="hback"><div align="right">附属文字位置</div></td>
  130.       <td class="hback"><select name="O_Char_dir" id="O_Char_dir">
  131.         <option value="0">前缀</option>
  132.         <option value="1" selected>后缀</option>
  133.       </select></td>
  134.     </tr>
  135.     <tr>
  136.       <td class="hback"><div align="right">分割字符</div></td>
  137.       <td class="hback"><input name="split_char" type="text" id="split_char" value="__">
  138.         请不要使用“$，┆”禁用字符</td>
  139.     </tr>
  140.     <tr>
  141.       <td class="hback"><div align="right"></div></td>
  142.       <td class="hback"><input name="button" type="button" onClick="ok(this.form);" value="确定创建此标签">
  143.         <input name="button" type="button" onClick="window.returnValue='';window.close();" value=" 取 消 "></td>
  144.     </tr>
  145.   </table>
  146. <script language="JavaScript" type="text/JavaScript">
  147. function ok(obj)
  148. {
  149. var retV = '{FS:MF=PageTitle┆';
  150. retV+='附属文字$' + obj.O_Char.value + '┆';
  151. retV+='附属文字位置$' + obj.O_Char_dir.value + '┆';
  152. retV+='分割字符$' + obj.split_char.value + '';
  153. retV+='}';
  154. window.parent.returnValue = retV;
  155. window.close();
  156. }
  157. </script>
  158.  <%End Sub%>
  159.  <%Sub SiteMap()%>
  160.  <table width="98%" border="0" align="center" cellpadding="5" cellspacing="1" class="table">
  161.     <tr>
  162.       <td colspan="2" class="xingmu">站点地图</td>
  163.     </tr>
  164.     <tr>
  165.       <td width="28%" class="hback"><div align="right">分类标题CSS</div></td>
  166.       <td width="72%" class="hback"><input name="TitleCSS" type="text" id="TitleCSS">
  167.       请不要使用“$，┆”禁用字符</td>
  168.     </tr>
  169.     <tr>
  170.       <td class="hback"><div align="right">子系统标题CSS</div></td>
  171.       <td class="hback"><input name="SubCSS" type="text" id="SubCSS"></td>
  172.     </tr>
  173.     <tr>
  174.       <td class="hback"><div align="right">同级分类分割</div></td>
  175.       <td class="hback"><input name="split_char" type="text" id="split_char">
  176.         请不要使用“$，┆”禁用字符</td>
  177.     </tr>
  178.     <tr>
  179.       <td class="hback"><div align="right"></div></td>
  180.       <td class="hback"><input name="button" type="button" onClick="ok(this.form);" value="确定创建此标签">
  181.         <input name="button" type="button" onClick="window.returnValue='';window.close();" value=" 取 消 "></td>
  182.     </tr>
  183.   </table>
  184. <script language="JavaScript" type="text/JavaScript">
  185. function ok(obj)
  186. {
  187. var retV = '{FS:MF=SiteMap┆';
  188. retV+='分类标题CSS$' + obj.TitleCSS.value + '┆';
  189. retV+='子系统标题CSS$' + obj.SubCSS.value + '┆';
  190. retV+='同级分类分割$' + obj.split_char.value + '';
  191. retV+='}';
  192. window.parent.returnValue = retV;
  193. window.close();
  194. }
  195. </script>
  196.  <%end Sub%>
  197.  <%Sub Search()%>
  198.  <table width="98%" border="0" align="center" cellpadding="5" cellspacing="1" class="table">
  199.     <tr>
  200.       <td colspan="2" class="xingmu">搜索表单</td>
  201.     </tr>
  202.     <tr>
  203.       <td width="28%" class="hback"><div align="right">日期搜索</div></td>
  204.       <td width="72%" class="hback"><select name="DateShow" id="DateShow">
  205.         <option value="1">显示</option>
  206.         <option value="0" selected>不显示</option>
  207.       </select>      </td>
  208.     </tr>
  209.     <tr>
  210.       <td class="hback"><div align="right">模糊搜索</div></td>
  211.       <td class="hback"><select name="SearchType" id="SearchType">
  212.         <option value="0" selected>否</option>
  213.         <option value="1">是</option>
  214.       </select>      </td>
  215.     </tr>
  216.     <tr>
  217.       <td class="hback"><div align="right"></div></td>
  218.       <td class="hback"><input name="button" type="button" onClick="ok(this.form);" value="确定创建此标签">
  219.         <input name="button" type="button" onClick="window.returnValue='';window.close();" value=" 取 消 "></td>
  220.     </tr>
  221.   </table>
  222. <script language="JavaScript" type="text/JavaScript">
  223. function ok(obj)
  224. {
  225. var retV = '{FS:MF=Search┆';
  226. retV+='日期搜索$' + obj.DateShow.value + '┆';
  227. retV+='模糊搜索$' + obj.SearchType.value + '';
  228. retV+='}';
  229. window.parent.returnValue = retV;
  230. window.close();
  231. }
  232. </script>
  233.  <%End Sub%>
  234.  <%Sub InfoStat()%>
  235.  <table width="98%" border="0" align="center" cellpadding="5" cellspacing="1" class="table">
  236.     <tr>
  237.       <td colspan="2" class="xingmu">信息统计</td>
  238.     </tr>
  239.     <tr>
  240.       <td width="28%" class="hback"><div align="right">排列方式</div></td>
  241.       <td width="72%" class="hback"><select name="cols" id="cols">
  242.         <option value="1">纵向</option>
  243.         <option value="0" selected>横向</option>
  244.       </select>      </td>
  245.     </tr>
  246.     <tr>
  247.       <td class="hback"><div align="right"></div></td>
  248.       <td class="hback"><input name="button" type="button" onClick="ok(this.form);" value="确定创建此标签">
  249.         <input name="button" type="button" onClick="window.returnValue='';window.close();" value=" 取 消 "></td>
  250.     </tr>
  251.   </table>
  252. <script language="JavaScript" type="text/JavaScript">
  253. function ok(obj)
  254. {
  255. var retV = '{FS:MF=InfoStat┆';
  256. retV+='排列方式$' + obj.cols.value + '';
  257. retV+='}';
  258. window.parent.returnValue = retV;
  259. window.close();
  260. }
  261. </script>
  262.  <%End Sub%>
  263.  <%Sub UserLogin()%>
  264.  <table width="98%" border="0" align="center" cellpadding="5" cellspacing="1" class="table">
  265.     <tr>
  266.       <td colspan="2" class="xingmu">会员登陆</td>
  267.     </tr>
  268.     <tr>
  269.       <td width="28%" class="hback"><div align="right">登陆方式</div></td>
  270.       <td width="72%" class="hback"><select name="LoginStyle" id="LoginStyle">
  271.         <option value="iframe">iframe</option>
  272.         <option value="ajax" selected>ajax</option>
  273.       </select>      </td>
  274.     </tr>
  275.     <tr>
  276.       <td class="hback"><div align="right"></div></td>
  277.       <td class="hback"><input name="button" type="button" onClick="ok(this.form);" value="确定创建此标签">
  278.         <input name="button" type="button" onClick="window.returnValue='';window.close();" value=" 取 消 "></td>
  279.     </tr>
  280.   </table>
  281. <script language="JavaScript" type="text/JavaScript">
  282. function ok(obj)
  283. {
  284. var retV = '{FS:MF=UserLogin┆';
  285. retV+='登陆方式$' + obj.LoginStyle.value + '';
  286. retV+='}';
  287. window.parent.returnValue = retV;
  288. window.close();
  289. }
  290. </script>
  291.  <%End Sub%>
  292.  <%Sub CopyRight()%>
  293.  <table width="98%" border="0" align="center" cellpadding="5" cellspacing="1" class="table">
  294.     <tr>
  295.       <td colspan="2" class="xingmu">版权信息</td>
  296.     </tr>
  297.     <tr>
  298.       <td class="hback"><div align="right"></div></td>
  299.       <td class="hback"><input name="button" type="button" onClick="ok(this.form);" value="确定创建此标签">
  300.         <input name="button" type="button" onClick="window.returnValue='';window.close();" value=" 取 消 "></td>
  301.     </tr>
  302.   </table>
  303.   <script language="JavaScript" type="text/JavaScript">
  304. function ok(obj)
  305. {
  306. var retV = '{FS:MF=CopyRight┆';
  307. retV+='}';
  308. window.parent.returnValue = retV;
  309. window.close();
  310. }
  311. </script>
  312.  <%End Sub%>
  313.  <%Sub SubList()%>
  314.  <table width="98%" border="0" align="center" cellpadding="5" cellspacing="1" class="table">
  315.     <tr>
  316.       <td colspan="2" class="xingmu">子系统导航</td>
  317.     </tr>
  318. <tr>
  319.       <td width="28%" class="hback"><div align="right">分割符号</div></td>
  320.       <td width="72%" class="hback"><label>
  321.         <input name="SubName" type="text" id="SubName">
  322.       </label></td>
  323.     </tr>
  324.     <tr>
  325.       <td class="hback"><div align="right">CSS</div></td>
  326.       <td class="hback"><input name="SubCSS" type="text" id="SubCSS"></td>
  327.     </tr>
  328.     <tr>
  329.       <td class="hback">&nbsp;</td>
  330.       <td class="hback"><span class="tx">(各个子系统的导航连接请在系统参数--子系统维护里设置)，特别注意：各个子站系统的前台导航连接必须与子系统的参数配置里的域名相同</span></td>
  331.     </tr>
  332.     <tr>
  333.       <td class="hback"><div align="right"></div></td>
  334.       <td class="hback"><input name="button" type="button" onClick="ok(this.form);" value="确定创建此标签">
  335.         <input name="button" type="button" onClick="window.returnValue='';window.close();" value=" 取 消 "></td>
  336.     </tr>
  337.   </table>
  338. <script language="JavaScript" type="text/JavaScript">
  339. function ok(obj)
  340. {
  341. var retV = '{FS:MF=SubList┆';
  342. retV+='分割符-可以使用html语法$' + obj.SubName.value + '┆';
  343. retV+='CSS$' + obj.SubCSS.value + '';
  344. retV+='}';
  345. window.parent.returnValue = retV;
  346. window.close();
  347. }
  348. </script>
  349.  <%End Sub%>
  350.   </form>
  351. </body>
  352. </html>
  353. <script language="JavaScript" type="text/JavaScript">
  354. function SelectClass()
  355. {
  356. var ReturnValue='',TempArray=new Array();
  357. ReturnValue = OpenWindow('../News/lib/SelectClassFrame.asp',400,300,window);
  358. if (ReturnValue.indexOf('***')!=-1)
  359. {
  360. TempArray = ReturnValue.split('***');
  361. document.all.ClassID.value=TempArray[0]
  362. document.all.ClassName.value=TempArray[1]
  363. }
  364. }
  365. function selectHtml_express(Html_express)
  366. {
  367. switch (Html_express)
  368. {
  369. case "out_Table":
  370. document.getElementById('div_id').style.display='none';
  371. document.getElementById('li_id').style.display='none';
  372. document.getElementById('ul_id').style.display='none';
  373. document.getElementById('DivID').disabled=true;
  374. break;
  375. case "out_DIV":
  376. document.getElementById('div_id').style.display='';
  377. document.getElementById('li_id').style.display='';
  378. document.getElementById('ul_id').style.display='';
  379. document.getElementById('DivID').disabled=false;
  380. break;
  381. }
  382. }
  383. </script>