⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 act.add.asp

📁 PDA,若你死昂师傅你说的附件是打开附件上课的附件四度空间就大方快速减肥
💻 ASP
📖 第 1 页 / 共 2 页
字号:
		 Loop
		 rs3.close:set rs3=Nothing
	 End if
 %></select><input type="checkbox" id="addauthor" name="addauthor" value="1" checked>
 <label for="addauthor" title="添加格式(以-分割): 作者-作者电子信箱">添加至作者列表中</label> 
 <span class="h" style="cursor:help;" title="点击显示帮助" onclick="Help('Article_006',this)">帮助</span></td>
  </tr>
  <%Else
  	response.write "<input type=""hidden"" id=""author"" name=""author"" value="""&author&""">"
  	response.write "<input type=""hidden"" id=""addauthor"" name=""addauthor"" value=""1"">"
    End If
	If ActCMS_DIY(9)="0" Then
  %>
  <tr>
    <td height="23" align="right"><%=ModeName%>来源:</td>
    <td height="23" colspan="2" align="left">
	<input name="CopyFrom" type="text" value="<%= CopyFrom %>">
	<select name="" onchange="document.tcjdxr.CopyFrom.value=this.value">
	<option>常用来源列表</option>
	<% Set  rs3=ACTCMS.ActExe("Select Field1,Field2 from  AC_ACT where Types=0")
	  If Not  rs3.eof Then
		 Do While Not rs3.eof
			.Write  "<option value="&rs3("Field1") &">" & rs3("Field1") & "</option>"
			rs3.movenext
		 loop
		End if
	 %></select><input type="checkbox" id="addCopyFrom" name="addCopyFrom" value="1" checked>
 <label for="addCopyFrom" title="添加格式(以-分割): 来源-来源网站地址">添加至来源列表中</label>
 <span class="h" style="cursor:help;" title="点击显示帮助" onclick="Help('Article_007',this)">帮助</span></td>
  </tr>
  <%Else
		response.write "<input type=""hidden"" id=""CopyFrom"" name=""CopyFrom"" value="""&CopyFrom&""">"
  		response.write "<input type=""hidden"" id=""addCopyFrom"" name=""addCopyFrom"" value=""1"">"
    End If
    If ActCMS_DIY(11)="0" Then%>
  <tr>
    <td height="23" align="right"><%=ModeName%>导读:</td>
    <td height="23" colspan="2" align="left">
	<textarea name="Intro" cols="75" rows="4" id="Intro"><%= Intro %></textarea>
	 <span class="h" style="cursor:help;" title="点击显示帮助" onclick="Help('Article_008',this)">帮助</span></td>
  </tr>
   <% Else
		response.write "<input type=""hidden"" id=""Intro"" name=""Intro"" value="""&Intro&""">"
	  End If 
   If Action="edit" Then Call M.ACT_MXEdit(ModeID,ID) Else Call M.ACT_MXList(ModeID) %>
  <tr>
    <td height="23" align="right"><%=ModeName%>内容:<br>
<input name="button"  type="button"  class="ACT_btn" style="cursor:hand;" onClick="insertHTMLToEditor('[NextPage]');" value="[NextPage]"><br><br>
注:手动分页符标记为:点击插入,注意大小写</td>
    <td height="23" colspan="2">
     <div>
	  <input type="hidden" id="content" name="content" value="<%=Content%>" style="display:none" />
	  <input name="hidden" type="hidden" id="cont___Config" style="display:none" value="" />
	  <iframe id="cont___Frame" src="../../editor/fckeditor/editor/fckeditor.html?InstanceName=content&amp;Toolbar=<%=ActCMS_DIY(12)%>" width="688" height="450" frameborder="0" scrolling="no"> </iframe>
        </div>	

	</td>
  </tr>
<%

If ActCMS_DIY(21)="0" Then %>
<tr>
<td  align="right">上传文件:</td>
<td>
			<iframe src="../Upload_Admin.asp?ModeID=<%=ModeID%>&amp;instr=0&amp;instrname=PicUrl&amp;YNContent=1&amp;instrct=content&file=yes" name="image" width='75%' height="25" scrolling="No" frameborder="0" id="image"></iframe>
</td>
</tr>
<%End If %>
<%
if ActCMS_DIY(18)="0"  Or ActCMS_DIY(20)="0" Then %>
  <tr>
    <td height="23" align="right">附加选项:</td>
    <td height="23" colspan="2" align="left">
	<%If ActCMS_DIY(18)="0" Then %>
	<input <%IF Request.QueryString("Action") = "edit"  Then Response.write " disabled=true "%> name="FileName" type="text" id="FileName" value="<% =FileName%>" /> 生成的文件名
      <span class="h" style="cursor:help;" title="点击显示帮助" onclick="Help('Article_009',this)">帮助</span>
	 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
	   <%End If %>
	   <%If ActCMS_DIY(20)="0" Then %>
	 <input  <%if ActCMS_DIY(19)= "1" Then Response.Write "Checked "%>  type="checkbox" id="dellink" name="dellink" value="1"><label for="dellink">除去内容中的超级链接</label>
	 <span class="h" style="cursor:help;" title="点击显示帮助" onclick="Help('Article_dellink',this)">帮助</span>
	 <%End If %>
	 </td>
    </tr>
  <tr>
  <%End If %>
    <td height="23" align="right">添加日期:</td>
    <td height="23" colspan="2" align="left">
	<input name="UpdateTime"  type="text" id="UpdateTime" value="<%=UpdateTime%>" onfocus="WdatePicker()"  />
	  &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;初始点击数:
      <input name="Hits" type="text" id="Hits" value="<%= Hits %>" />
	  <span class="h" style="cursor:help;" title="点击显示帮助" onclick="Help('Article_010',this)">帮助</span></td>
    </tr>
	<%if ActCMS_DIY(15)="0" Then %>
  <tr>
    <td height="23" align="right">阅读权限:</td>
    <td height="23" colspan="2" align="left">	 
	<%= actcms.GetGroup_CheckBox("GroupID_ACT",GroupID_ACT,5)  %>					
	<span class="h" style="cursor:help;" title="点击显示帮助" onclick="Help('Article_011',this)">帮助</span>  </td>
  </tr>
  <%
  Else
  		response.write "<input type=""hidden"" id=""GroupID_ACT"" name=""GroupID_ACT"" value="""&GroupID_ACT&""">"
  End If
if ActCMS_DIY(17)="0" Then
  %>
  <tr>
  <td align="right">消费点数:</td>
  <TD>
<input name="Score_ACT" type="text" id="Score_ACT" value="<%= Score_ACT %>" size="10">
  <span class="h" style="cursor:help;" title="点击显示帮助" onclick="Help('Article_012',this)">帮助</span></td>
  </tr>
  <%Else  
  		response.write "<input type=""hidden"" id=""Score_ACT"" name=""Score_ACT"" value="""&Score_ACT&""">"
  End If %>
  <tr>
    <td height="23" align="right">模板地址:</td>
    <td height="23" colspan="2" align="left">
	<input <% IF TemplateUrl = "" Then Response.Write " checked=""checked""" %> onclick='Templates(this.value);' id="Templates2"   type="radio" name="TemplateUrl`" value="1" /><label for="Templates2">继承栏目设定</label>
      <input <% IF TemplateUrl <> "" Then Response.Write " checked=""checked""" %>  onclick='Templates(this.value);' id="Templates1" type="radio" name="TemplateUrl`" value="2" /><label for="Templates1">自定义</label>
      <div id='Templatefs' 
	   <% 	
  if TemplateUrl <> "" Then 
	 .Write "style=""'DISPLAY: none'"""
	else
	 .Write "style=""DISPLAY: none;text-align: left;"""
	End if
 %>  >
       <input name='TemplateUrl' readonly="readonly" size="30"  value='<%=TemplateUrl%>' />
          &nbsp;
          <input class="ACT_btn" type="button"  onClick="OpenWindowAndSetValue('../include/print/SelectPic.asp?CurrPath=<%=ACTCMS.ActCMS_Sys(3)%>templets',500,320,window,document.tcjdxr.TemplateUrl);" value="选择模板..."> 
      
	  
	  </div><span class="h" style="cursor:help;" title="点击显示帮助" onclick="Help('Article_013',this)">帮助</span></td>
  </tr>

  <tr>
    <td height="23" colspan="3" align="center" >
	<input type=button onclick=CheckForm() class="ACT_btn"  name=Submit1 value="  保存  " />
      &nbsp;&nbsp; <input type="reset" class="ACT_btn" name="Submit2" value="  重置  "></td>
    </tr>
</table>
<br><br>
<p>
</form>
<% end With
	
%>
<script language="JavaScript" type="text/javascript">

function FormatTitle(obj, obj2, def_value)
{
    var FormatFlag = obj.options[obj.selectedIndex].value;
    var tmp_Title = FilterHtmlStr(obj2.value);
    switch(FormatFlag)
    {
        case "1" :
            obj2.value = "<b>" + tmp_Title + "</b>";
            break;
        case "2" :
            obj2.value = tmp_Title + "[图文]";
            break;
        case "3" :
            obj2.value = "<font color=\"red\">" + tmp_Title + "</font>";
            break;
        case "4" :
            obj2.value = "<font color=\"blue\">" + tmp_Title + "</font>";
            break;
        case "5" :
            obj2.value = "<em>" + tmp_Title + "</em>";
            break;
        case "-1" :
            if(confirm("确定要清除样式?"))
            {
                obj2.value = tmp_Title;
            }
            break;
        case "-2" :
            obj2.value = def_value;
            break;
    }
    obj.selectedIndex = 0;
}
function FilterHtmlStr(str)
{
    str = str.replace(/<.*?>/ig, "");
    return str;
}


		function OpenWindowAndSetValue(Url,Width,Height,WindowObj,SetObj)
		{
			var ReturnStr=showModalDialog(Url,WindowObj,'dialogWidth:'+Width+'pt;dialogHeight:'+Height+'pt;status:yes;help:no;scroll:yes;');
			if (ReturnStr!='') SetObj.value=ReturnStr;
			return ReturnStr;
		}	
	
		function OpenWindow(Url,Width,Height,WindowObj)
		{
			var ReturnStr=showModalDialog(Url,WindowObj,'dialogWidth:'+Width+'pt;dialogHeight:'+Height+'pt;status:no;help:no;scroll:no;');
			return ReturnStr;
		}	
		
	function Getcolor(img_val,Url,input_val){
		var arr = showModalDialog(Url, "", "dialogWidth:18.5em; dialogHeight:17.5em; status:0; help:0");
		if (arr != null){
		document.getElementById(input_val).value = arr;
		img_val.style.backgroundColor = arr;
		}
		}		

		function ChangesLinks()
				{ if (document.tcjdxr.ChangesLink.checked==true)
				  {
				  ChangesUrl.style.display="";
				  }
				  else
					{
					 ChangesUrl.style.display="none";
					 }
				}
			
function SetValue(type,objname,strvalue)
{ 
	var obj=document.getElementById(objname)
	if (type=="add"){
		obj.value=',,,'+obj.value
		obj.value=obj.value.replace(strvalue,'');
		obj.value=obj.value+strvalue;
		obj.value=obj.value.replace(',,,','');
		obj.value=obj.value.replace(',,','');
		}
	else if (type=="+"){obj.value=parseInt(obj.value)+parseInt(strvalue);}
	else{obj.value=strvalue;}
	obj.focus(); 
 return; 
}		
	function insertHTMLToEditor(codeStr){
	  var oEditor = FCKeditorAPI.GetInstance("content");
	  if (oEditor.EditMode==FCK_EDITMODE_WYSIWYG){
		oEditor.InsertHtml(codeStr);
	  }else{
		return false;
	  }
	}	
		function Templates(Templatef)
			{   if (Templatef==2)
			  {
			  Templatefs.style.display="";
			  }
			  else
				{
				 Templatefs.style.display="none";
				 }
			}
			
		function ArticlePics(AC)
			{   if (AC==1)
			  {
			  ArticlePic.style.display="";
			  }
			  else
				{
				 ArticlePic.style.display="none";
				 }
			}	
		function CheckForm()
	{ var form=document.tcjdxr;
	  
	 if (form.ClassID.value=='')
		{ alert("请选择栏目!");   
		  return false;
		}
		
	 if (form.Title.value=='')
		{ alert("请输入简短标题!");   
		  form.Title.focus();    
		   return false;
		}
	    form.Submit1.value="正在提交数据,请稍等...";
		form.Submit1.disabled=true;	
		form.Submit2.disabled=true;	
	    form.submit();
        return true;
	}	
	</script>
<script language="javascript">ArticlePics(<%= ArticlePic %>);</script>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -