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

📄 newsedit.asp

📁 ASP+SQL2000+
💻 ASP
📖 第 1 页 / 共 5 页
字号:

	document.form1.title.value+=br;
	document.form1.title.focus();
}

function insertbr1(br){

	document.form1.hongtou.value+=br;
	document.form1.hongtou.focus();
}

function title_color_onchange() {
	var title_colorIndex;
	title_colorIndex = form1.title_color.selectedIndex;
	form1.title.select ();
	switch (title_colorIndex)
	{
		case 1: form1.title.style.color = "#000000";
				break;
		case 2:	form1.title.style.color = "#000000";
				break;
		case 3:	form1.title.style.color = "#FFFFFF";
				break;
		case 4:	form1.title.style.color = "#008000";
				break;
		case 5:	form1.title.style.color = "#800000";
				break;
		case 6:	form1.title.style.color = "#808000";
				break;
		case 7:	form1.title.style.color = "#000080";
				break;
		case 8:	form1.title.style.color = "#800080";
				break;
		case 9:	form1.title.style.color = "#808080";
				break;
		case 10:form1.title.style.color = "#FFFF00";
				break;
		case 11:form1.title.style.color = "#00FF00";
				break;
		case 12:form1.title.style.color = "#00FFFF";
				break;
		case 13:form1.title.style.color = "#FF00FF";
				break;
		case 14:form1.title.style.color = "#FF0000";
				break;
		case 15:form1.title.style.color = "#0000FF";
				break;
		case 16:form1.title.style.color = "#008080";
				break;
	}
	form1.title.focus ();
}

function title_size_onchange() {
	var title_sizeIndex;
	title_sizeIndex = form1.title_size.selectedIndex;
	form1.title.select ();
	switch (title_sizeIndex)
	{
		case 1: form1.title.style.fontSize = "9pt";
				break;
		case 2:	form1.title.style.fontSize = "8px";
				break;
		case 3:	form1.title.style.fontSize = "10px";
				break;
		case 4:	form1.title.style.fontSize = "12px";
				break;
		case 5:	form1.title.style.fontSize = "14px";
				break;
		case 6:	form1.title.style.fontSize = "18px";
				break;
		case 7:	form1.title.style.fontSize = "24px";
				break;
		case 8:	form1.title.style.fontSize = "36px";
				break;
	}
	form1.title.focus ();
}

function title_type_onchange() {
	var title_typeIndex;
	title_typeIndex = form1.title_type.selectedIndex;
	form1.title.select ();
	switch (title_typeIndex)
	{
		case 1: form1.title.style.removeAttribute ("fontWeight");
				form1.title.style.removeAttribute ("fontStyle");
				form1.title.style.removeAttribute ("textDecoration");
				break;
		case 2:	form1.title.style.removeAttribute ("fontStyle");
				form1.title.style.removeAttribute ("textDecoration");
				form1.title.style.fontWeight = "bolder";
				break;
		case 3:	form1.title.style.removeAttribute ("fontWeight");
				form1.title.style.removeAttribute ("textDecoration");
				form1.title.style.fontStyle = "italic";
				break;
		case 4:	form1.title.style.removeAttribute ("fontStyle");
				form1.title.style.removeAttribute ("fontWeight");
				form1.title.style.textDecoration = "underline";
				break;
		case 5: form1.title.style.removeAttribute ("textDecoration");
				form1.title.style.fontWeight = "bolder";
				form1.title.style.fontStyle = "italic";
				break;
	}
	form1.title.focus ();
}

function title_face_onchange() {
	var title_faceIndex;
	title_faceIndex = form1.title_face.selectedIndex;
	form1.title.select ();
	switch (title_faceIndex)
	{
		case 1: form1.title.style.family = "宋体";
				break;
		case 2:	form1.title.style.family = "楷体_GB2312";
				break;
		case 3:	form1.title.style.family = "新宋体";
				break;
		case 4:	form1.title.style.family = "黑体";
				break;
		case 5:	form1.title.style.family = "隶书";
				break;
		case 6:	form1.title.style.family = "幼圆";
				break;
	}
	form1.title.focus ();
}

function IsDigit()
{
  return ((event.keyCode >= 48) && (event.keyCode <= 57));
}


</script>
</head>

<body topmargin="0"><!--#include file=top.asp--><br>
<%set rs5=server.CreateObject("ADODB.RecordSet")
rs5.Source="select * from system"
rs5.Open rs5.source,conn,1,1
dim typename
set rs6=server.CreateObject("ADODB.RecordSet")
rs6.Source="select * from type where typeid="&rs("typeid")
rs6.Open rs6.source,conn,1,1
typename=rs6("typename")
rs6.close
set rs6=nothing
%>
<div align="center">
  <center>
<table border="1" width="750" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="<%=border%>">
  <tr> 
    <td colspan="4" height="30" width="760" bgcolor=<%=m_top%>> 
      <div align="center">在<b><a href="bigclass.asp?typeid=<%=rs("typeid")%>"><%=typename%></a>-<a href="smallclass.asp?bigclassid=<%=rs("bigclassid")%>"><%=rs2("bigclassname")%></a><%if rs("smallclassid")<>"" then%>-<a href="listnews.asp?smallclassid=<%=rs("smallclassid")%>"><%=rs3("smallclassname")%></a><%end if%></b>中修改文章,ID号为<%=newsid%></div>
    </td>
  </tr>
  <%if request.cookies("key")="super" or request.cookies("key")="typemaster" or request.cookies("key")="selfreg" then%>
  <form action=newsclassedit1.asp?NewsID=<%=NewsID%> method=post>
    <tr> 
      <td width="78" bgcolor="#FFFFFF"></td>
      <td width="681" bgcolor="#FFFFFF" colspan="3" align=right> &nbsp; 
        <input name=btn_Modi_class type=submit value="修改文章类别" onMouseOver="window.status='按这个按钮修改文章类别';return true;" onMouseOut="window.status='';return true;" title="按这个按钮修改文章类别">
      </td>
    </tr>
  </form><%end if%>
  <form method="POST" OnSubmit="return checkdata()" onReset="return ResetForm();" name="form1" action="newseditok.asp?NewsID=<%=NewsID%>">
    <tr> 
      <td width="78" align="right" bgcolor="#FFFFFF">所属专题:</td>
      <td width="681" bgcolor="#FFFFFF" colspan="3"> &nbsp; 
        <select size="1" name="SpecialID" onMouseOver="window.status='点这里选择文章专题';return true;" onMouseOut="window.status='';return true;">
        <%  set rs4=server.CreateObject ("ADODB.RecordSet")
rs4.Source="select * from Special"
rs4.Open rs4.source,conn,1,1%>
          <option value=0 <%if rs("SpecialID")=0 then Response.Write "selected"%>>-----------------</option>
          <%if rs4.EOF then %>
          <option value=0>暂无任何专题</option>
          <%else
while not rs4.EOF
SpecialID=rs4("SpecialID")
%>
          <option value=<%=SpecialID%> <%if rs("SpecialID")=SpecialID then Response.Write " selected"%>><%=trim(rs4("SpecialName"))%></option>
          <%
rs4.MoveNext
wend
end if
rs4.close 
set rs4=nothing  
%>
        </select>
         &nbsp;第二专题 
        <select size="1" name="SpecialID2" onMouseOver="window.status='点这里选择文章专题';return true;" onMouseOut="window.status='';return true;">
           <%  set rs4=server.CreateObject ("ADODB.RecordSet")
rs4.Source="select * from Special"
rs4.Open rs4.source,conn,1,1%>
          <option value=0 <%if rs("SpecialID2")=0 then Response.Write "selected"%>>-----------------</option>
          <%if rs4.EOF then %>
          <option value=0>暂无任何专题</option>
          <%else
while not rs4.EOF
SpecialID2=rs4("SpecialID")
%>
          <option value=<%=SpecialID2%> <%if rs("SpecialID2")=SpecialID2 then Response.Write " selected"%>><%=trim(rs4("SpecialName"))%></option>
          <%
rs4.MoveNext
wend
end if
rs4.close 
set rs4=nothing  
%>
        </select>
      </td>
    </tr>
    <tr> 
      <td width="78" align="right" class="unnamed2" valign="middle" bgcolor="#FFFFFF">文章标题:</td>
      <td width="681" bgcolor="#FFFFFF" colspan="3"> <span style='cursor:hand' title='缩短对话框' onClick='if (me.size>10)me.size=me.size-2'>-</span> 
        <input name="title" id=me type="TEXT" size=60 maxlength=100 style="background-color:ffffff;border: 1 double" value="<%=trim(rs("Title"))%>" onMouseOver="window.status='在这里修改文章标题';return true;" onMouseOut="window.status='';return true;" title="在这里修改文章标题">
        <span style='cursor:hand' title='加长对话框' onClick='if (me.size<102)me.size=me.size+2'>+</span>
<SELECT size=1 id=title_color name=title_color LANGUAGE=javascript onchange="return title_color_onchange()" style="width:55">
<OPTION value="0">颜色</OPTION>
<OPTION <%if rs("titlecolor")="0" then%>selected<%end if%> value="0">缺省</OPTION>
<OPTION <%if rs("titlecolor")="#000000" then%>selected<%end if%> value="#000000" style="background-color:#000000"></OPTION>
<OPTION <%if rs("titlecolor")="#FFFFFF" then%>selected<%end if%> value="#FFFFFF" style="background-color:#FFFFFF"></OPTION>
<OPTION <%if rs("titlecolor")="#008000" then%>selected<%end if%> value="#008000" style="background-color:#008000"></OPTION>
<OPTION <%if rs("titlecolor")="#800000" then%>selected<%end if%> value="#800000" style="background-color:#800000"></OPTION>

⌨️ 快捷键说明

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