UnRegulatenewAdd.asp
上传用户:jisenq
上传日期:2014-06-29
资源大小:7216k
文件大小:12k
源码类别:

数据库编程

开发平台:

ASP/ASPX

  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="lib/cls_main.asp" -->
  7. <!--#include file="../../FS_Inc/Func_page.asp" -->
  8. <!--#include file="NF_News_Function.asp"-->
  9. <%
  10. response.buffer=true
  11. Response.CacheControl = "no-cache"
  12. Dim Conn,User_Conn
  13. MF_Default_Conn
  14. MF_User_Conn
  15. 'session判断
  16. MF_Session_TF
  17. if not MF_Check_Pop_TF("NS_UnRl") then Err_Show
  18. dim Fs_news
  19. set Fs_news = new Cls_News
  20. Dim CharIndexStr
  21. CharIndexStr=all_substring
  22. Dim UnNewsArray,ActUrl,NewsID,RsNewsObj,StrSql
  23. UnNewsArray = "new Array()"
  24. ActUrl="SetUnRegulate.asp?Action=Add"
  25. NewsID=""
  26. IF Request.QueryString("Action")="Edit" Then
  27. if not MF_Check_Pop_TF("NS046") then Err_Show
  28. NewsID=CStr(Trim(Request.QueryString("NewsID")))
  29. ActUrl="SetUnRegulate.asp?Action=Edit&MainNewsID="&NewsID
  30. Set RsNewsObj = Server.CreateObject(G_FS_RS)
  31. StrSql = "Select MainUnregNewsID,UnregNewsName,NewsTitle,Rows From FS_NS_News_Unrgl,FS_NS_News where FS_NS_News.NewsID=FS_NS_News_Unrgl.MainUnregNewsID and UnRegulatedMain='"&NewsID&"' order by FS_NS_News_Unrgl.ID ASC"
  32. RsNewsObj.Open StrSql,Conn,1,1
  33. UnNewsArray=""
  34. While Not RsNewsObj.Eof
  35. If UnNewsArray="" Then
  36. UnNewsArray="['"&RsNewsObj("MainUnregNewsID")&"','"&RsNewsObj("NewsTitle")&"','"&RsNewsObj("UnregNewsName")&"',"&RsNewsObj("Rows")&"]"
  37. Else
  38. UnNewsArray=UnNewsArray&",['"&RsNewsObj("MainUnregNewsID")&"','"&RsNewsObj("NewsTitle")&"','"&RsNewsObj("UnregNewsName")&"',"&RsNewsObj("Rows")&"]"
  39. End If
  40. RsNewsObj.MoveNext
  41. Wend
  42. UnNewsArray="["&UnNewsArray&"]"
  43. End If
  44. %>
  45. <html>
  46. <head>
  47. <title>不规则新闻 规则管理</title>
  48. <meta http-equiv="Content-Type" content="text/html; charset=gb2312">
  49. <link href="../images/skin/Css_<%=Session("Admin_Style_Num")%>/<%=Session("Admin_Style_Num")%>.css" rel="stylesheet" type="text/css">
  50. <script language="JavaScript" src="js/Public.js"></script>
  51. <script language="javascript" src="../../Fs_inc/CheckJs.js"></script>
  52. <script language="javascript" src="../../FS_INC/prototype.js"></script>
  53. <script language="javascript">
  54. <!--
  55. Array.prototype.remove = function(start,deleteCount){
  56. if(isNaN(start)||start>this.length||deleteCount>(this.length-start)){return false;}
  57. this.splice(start,deleteCount);
  58. }
  59. String.prototype.trim=function(){
  60.   return this.replace(/(^s*)|(s*$)/g,"");
  61. }
  62. moveStart = function (event, _sId)
  63. {
  64. var oObj = $(_sId);
  65. oObj.onmousemove = mousemove;
  66. oObj.onmouseup = mouseup;
  67. oObj.setCapture ? oObj.setCapture() : function(){};
  68. oEvent = window.event ? window.event : event;
  69. var dragData = {x : oEvent.clientX, y : oEvent.clientY};
  70. var backData = {x : parseInt(oObj.style.top), y : parseInt(oObj.style.left)};
  71. function mousemove()
  72. {
  73. var oEvent = window.event ? window.event : event;
  74. var iLeft = oEvent.clientX - dragData["x"] + parseInt(oObj.style.left);
  75. var iTop = oEvent.clientY - dragData["y"] + parseInt(oObj.style.top);
  76. oObj.style.left = iLeft;
  77. oObj.style.top = iTop;
  78. /* $('dialogBoxShadow').style.left = iLeft + 6;
  79. $('dialogBoxShadow').style.top = iTop + 6;
  80. if ($('dialogIframBG'))
  81. {
  82. $('dialogIframBG').style.left = iLeft;
  83. $('dialogIframBG').style.top = iTop;
  84. }*/
  85. dragData = {x: oEvent.clientX, y: oEvent.clientY};
  86. }
  87. function mouseup()
  88. {
  89. var oEvent = window.event ? window.event : event;
  90. oObj.onmousemove = null;
  91. oObj.onmouseup = null;
  92. if(oEvent.clientX < 1 || oEvent.clientY < 1 || oEvent.clientX > document.body.clientWidth || oEvent.clientY > document.body.clientHeight){
  93. oObj.style.left = backData.y;
  94. oObj.style.top = backData.x;
  95. /* $('dialogBoxShadow').style.left = backData.y + 6;
  96. $('dialogBoxShadow').style.top = backData.x + 6;
  97. if ($('dialogIframBG'))
  98. {
  99. $('dialogIframBG').style.left = backData.y;
  100. $('dialogIframBG').style.top = backData.x;
  101. }*/
  102. }
  103. oObj.releaseCapture ? oObj.releaseCapture() : function(){};
  104. }
  105. }
  106. UnNewArray=<%= UnNewsArray %>;
  107. function CheckNum(obj){
  108. if (isNaN(obj.value) || obj.value<=0){
  109. alert("您输入的不是正确的行数,n请输入一个正整数.");
  110. obj.value="";
  111. obj.focus();
  112. }
  113. }
  114. function DisplayUnNews()
  115. {
  116. var StrUnNewsList="";
  117. var ListLen=UnNewArray.length;
  118. var StrUnNewsListSub="";
  119. for (var i=0;i<ListLen;i++){
  120. StrUnNewsListSub="<div id="Arr"+i+""><input name="NewsID" type="hidden" id="NewsID_"+i+"" value=""+UnNewArray[i][0]+"" /><a href="原新闻标题" title="原新闻标题:"+UnNewArray[i][1]+"" onclick="return false;">标题</a>:<input name="NewsTitle"+UnNewArray[i][0]+"" type="text" id="NewsTitle_"+i+"" value=""+UnNewArray[i][2]+"" size="50" onkeyup="UnNewModify(this,'')" onmousedown="new Form.Element.Observer('NewsTitle"+UnNewArray[i][0]+"',1,UnNewModify);" />&nbsp;放在第<input name="Row"+UnNewArray[i][0]+"" type="text" id="Row_"+i+"" value=""+UnNewArray[i][3]+"" size="2" maxlength="2" onkeyup="UnNewModify(this,'')" onbeforepaste="clipboardData.setData('text',clipboardData.getData('text').replace(/[^d]/g,''));" onmousedown="new Form.Element.Observer('Row"+UnNewArray[i][0]+"',1,UnNewModify);" />行&nbsp;<button onclick="UnNewDel("+i+")">移除</button></div>";;
  121. if (StrUnNewsList==""){
  122. StrUnNewsList=StrUnNewsListSub;
  123. }else{
  124. StrUnNewsList+=StrUnNewsListSub;
  125. }
  126. }
  127. document.getElementById("UnNewsList").innerHTML=StrUnNewsList;
  128. }
  129. function UnNewModify(modobj,col){
  130. for (var i=0;i<UnNewArray.length;i++){
  131. UnNewArray[i][2]=$("NewsTitle_"+i).value;
  132. $("Row_"+i).value=$("Row_"+i).value.replace(/[^d]/g,'');
  133. UnNewArray[i][3]=parseInt($("Row_"+i).value);
  134. }
  135. UnNewPreviewCh();
  136. }
  137. function UnNewDel(Row){
  138. if (confirm("确定移除吗?")){
  139. UnNewArray.remove(Row,1);
  140. DisplayUnNews();
  141. UnNewPreviewCh();
  142. document.DisNews.CheckUnNews();
  143. }
  144. }
  145. function DivCenter(M_div,M_width,M_height,M_zindex)
  146. {
  147. var xposition=0,yposition=0;
  148. $(M_div).style.position='absolute';
  149. $(M_div).style.width=M_width.toString(10)+'px';
  150. $(M_div).style.height=M_height.toString(10)+'px';
  151. $(M_div).style.zIndex=M_zindex.toString(10);
  152. if (parseInt(navigator.appVersion) >= 4 )
  153. {
  154. xposition = (document.body.offsetWidth - M_width) / 2;
  155. yposition = (document.body.offsetHeight - M_height) / 2;
  156. $(M_div).style.left=xposition.toString(10)+"px";
  157. $(M_div).style.top=(yposition).toString(10)+"px";
  158. }
  159. }
  160. function UnNewPreviewCh(){
  161. if ($("preview").style.display==""){
  162. UnNewPreview();
  163. }
  164. }
  165. function UnNewPreview(){
  166. var ListLen=UnNewArray.length;
  167. var Maxrow=1;
  168. var PreviewStr="";
  169. var PreviewRowStr="";
  170. for (var i=0;i<ListLen;i++){
  171. if (UnNewArray[i][3]>Maxrow){
  172. Maxrow=UnNewArray[i][3];
  173. }
  174. }
  175. PreviewStr="<table width="100%" border="0" cellspacing="0" cellpadding="0">";
  176. for (i=1;i<=Maxrow;i++){
  177. FindFlag="";
  178. PreviewRowStr="";
  179. for (var j=0;j<ListLen;j++){
  180. if (UnNewArray[j][3]==i){
  181. if (FindFlag==""){
  182. FindFlag=j.toString(10);
  183. }else{
  184. FindFlag+=","+j;
  185. }
  186. }
  187. }
  188. PreviewStr+="<tr><td>";
  189. if (FindFlag){
  190. PreviewRowStr=FindFlag.split(",");
  191. for (var j=0;j<PreviewRowStr.length;j++){
  192. if (j==0){
  193. PreviewStr+="<a href="#" onclick="return false;">"+UnNewArray[PreviewRowStr[j]][2]+"</a>";
  194. }else{
  195. PreviewStr+="&nbsp;<a href="#" onclick="return false;">"+UnNewArray[PreviewRowStr[j]][2]+"</a>";
  196. }
  197. }
  198. }else{
  199. PreviewStr+="&nbsp;";
  200. }
  201. PreviewStr+="</td></tr>";
  202. }
  203. PreviewStr+="<tr>
  204. <td align="center"><button onclick="$('preview').style.display='none';">关闭</button></td>
  205. </tr>";
  206. PreviewStr+="</table>";
  207. if ($("preview").style.display=="none"){
  208. $("preview").style.display="";
  209. DivCenter("preview",680,200,100);
  210. }
  211. $("PreviewContent").innerHTML=PreviewStr;
  212. }
  213. function UnNewcheck(){
  214. var ListLen=UnNewArray.length;
  215. var Maxrow=1;
  216. var ErrStr="";
  217. for (var i=0;i<ListLen;i++){
  218. if (UnNewArray[i][3]==0){
  219. ErrStr=" -第 "+(i+1)+"条 存放行数不能为 0";
  220. }
  221. if (isNaN(UnNewArray[i][3])){
  222. ErrStr=" -第 "+(i+1)+"条 存放行数不能为空";
  223. }
  224. if (UnNewArray[i][2]==""){
  225. ErrStr=" -第 "+(i+1)+"条 不规则标题不能为空";
  226. }
  227. if (UnNewArray[i][3]>Maxrow){
  228. Maxrow=UnNewArray[i][3];
  229. }
  230. }
  231. var FindFlag=false;
  232. for (i=1;i<=Maxrow;i++){
  233. FindFlag=false;
  234. for (var j=0;j<ListLen;j++){
  235. if (UnNewArray[j][3]==i){
  236. FindFlag=true;
  237. break;
  238. }
  239. }
  240. if (!FindFlag){
  241. ErrStr+="n -第 "+i+" 行中没有新闻";
  242. }
  243. }
  244. if (ErrStr){
  245. alert("发生以下错误:n"+ErrStr);
  246. return false;
  247. }else{
  248. return true;
  249. }
  250. }
  251. -->
  252. </script>
  253. </head>
  254. <body>
  255. <div id="preview" style="display:none">
  256. <table width="100%" border="0" align="center" cellpadding="4" cellspacing="1" class="table">
  257. <tr>
  258. <td align="center" class="hback_1" style="cursor:move;" onMouseDown="new moveStart(event,'preview')"><strong>预览不规则新闻(点击拖动)</strong></td>
  259. </tr>
  260. <tr>
  261. <td align="center" class="hback" id="PreviewContent"  style="cursor:move;" onMouseDown="new moveStart(event,'preview')"></td>
  262. </tr>
  263. </table>
  264. </div>
  265. <table width="98%" border="0" align="center" cellpadding="5" cellspacing="1" class="table">
  266. <tr class="hback">
  267. <td class="xingmu">不规则新闻管理</td>
  268. </tr>
  269. <tr>
  270. <td height="26" valign="middle" class="hback">
  271. <table width="100%" height="20" border="0" cellpadding="0" cellspacing="0">
  272. <tr>
  273. <td width="4%" align="center" valign="bottom" class="hback" vlign="middle"><a href="UnRegulatenewAdd.asp">添加</a></td>
  274. <td width="1%" align="center" valign="bottom" class="Gray" vlign="middle">|</td>
  275. <td width="10%" align="center" valign="bottom" class="hback" vlign="middle"><a href="DefineNews_Manage.asp">返回管理页面</a></td>
  276. <td width="1%" align="center" valign="bottom" class="Gray" vlign="center">|</td>
  277. <td width="3%" align="center" valign="bottom" class="hback"  vlign="center"><a href="../../help?Lable=NS_UnRegualNewAdd" target="_blank" style="cursor:help;">帮助</a></td>
  278. <form name='SearchForm' method="post" target='DisNews' action="News_Display.asp"><td width="81%"><div align="right">搜索关键字:
  279.           <input name="SearchKey" type="text" value="" size="20">
  280. 搜索栏目:
  281. <select name="ClassID" id="ClassID">
  282.   <option value="">所有栏目</option>
  283.   <%
  284. If Request.QueryString("ClassID")<>"" then
  285. Set DefaultRs=Conn.execute("Select ClassID,ClassName From FS_NS_NewsClass Where ClassID='"&request.QueryString("ClassID")&"'")
  286. if not DefaultRs.eof then
  287. %>
  288.   <option value=<%=DefaultRs("ClassID")%>><%=DefaultRs("ClassName")%></option>
  289.   <%
  290. end if
  291. Set DefaultRs=nothing
  292. end if
  293.    Dim rs_movelist_rs,str_tmp_move
  294. Set rs_movelist_rs = server.CreateObject(G_FS_RS)
  295. rs_movelist_rs.Open "Select ID,ClassID,ClassName,ParentID,ReycleTF from FS_NS_NewsClass where ParentID='0' and ReycleTF=0 order by AddTime DESC",Conn,1,3
  296. str_tmp_move = ""
  297. do while not rs_movelist_rs.eof
  298. str_tmp_move = str_tmp_move & "<option value="""& rs_movelist_rs ("ClassID") &""">"& rs_movelist_rs ("ClassName") &"</option>"
  299.    str_tmp_move = str_tmp_move & Fs_news.News_ChildNewsList(rs_movelist_rs("ClassID"),"")
  300.   rs_movelist_rs.movenext
  301.   Loop
  302.    Response.Write str_tmp_move
  303.   rs_movelist_rs.close:set rs_movelist_rs=nothing
  304.           %>
  305.   </select>
  306. 不规则新闻
  307. <input name="UnAll" type="checkbox" value="UnNews" checked>
  308. <input name="submit" type="submit" value="搜 索">
  309.   </div></td></form>
  310. </tr>
  311. </table> </td>
  312. </tr>
  313. <form name='SearchForm' method="post" target='DisNews' action="News_Display.asp">
  314. </form>
  315. </table>
  316. <table width="98%" border="0" align="center" cellpadding="5" cellspacing="1" class="table">
  317. <form action="<%= ActUrl %>" method="post" name="GetNewsIDForm" id="GetNewsIDForm">
  318. <tr>
  319.   <td class="hback">
  320. <input type="submit" name="Submit" onClick="return UnNewcheck();" value="保存">
  321. <input name="View" type="button" id="View" onClick="if (UnNewcheck())UnNewPreview();" value="预览效果">
  322. <label></label></td>
  323. </tr>
  324. <tr>
  325. <td class="hback" id="UnNewsList"></td>
  326. </tr>
  327. </form>
  328. </table>
  329. <script language="JavaScript">
  330. <!--
  331. DisplayUnNews();
  332. //-->
  333. </script>
  334. <iframe name="DisNews" src="News_Display.asp?UnAll=UnNews" width="100%" frameborder="0" height="400" scrolling="no"></iframe>
  335. </body>
  336. <%
  337. Set Conn=nothing
  338. %>
  339. </html>