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

📄 newsadd1.asp

📁 ASP+SQL2000+
💻 ASP
📖 第 1 页 / 共 5 页
字号:
		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>
<link rel="stylesheet" type="text/css" href="site.css">
</head>

<body topmargin="0"><!--#include file=top.asp-->
<%set rs5=server.CreateObject ("ADODB.RecordSet")
rs5.Source="select * from system"
rs5.Open rs5.source,conn,1,1
%><form name="form1" method="post" action="newsadd2.asp" OnSubmit="return checkdata()" onReset="return ResetForm();">
  <div align="center"><center>
      <table border="0" cellspacing="0" width="750" cellpadding="0">
        <tr align="center"> 
          <td width="100%"> 
            <table border="1" cellspacing="0" width="100%" cellpadding="0"  bordercolor="<%=border%>" style="border-collapse: collapse" height="463">
              <tr align="center">
<%if smallclassid<>"" then
dim typename,bigclassname,smallclassname
set rs1=server.createobject("adodb.recordset")
sql1="select * from smallclass where smallclassid="&smallclassid
rs1.open sql1,conn,1,3
smallclassname=rs1("smallclassname")
set rs2=server.createobject("adodb.recordset")
sql2="select * from bigclass where bigclassid="&rs1("bigclassid")
rs2.open sql2,conn,1,3
bigclassname=rs2("bigclassname")
set rs3=server.createobject("adodb.recordset")
sql3="select * from type where typeid="&rs2("typeid")
rs3.open sql3,conn,1,3
typename=rs3("typename")
%>
<input name="typeid" type="hidden" value="<%=rs2("typeid")%>">
<input name="bigclassid" type="hidden" value="<%=rs1("bigclassid")%>">
<input name="smallclassid" type="hidden" value="<%=smallclassid%>">
 <td colspan="2" height="29" class="unnamed2" valign="middle" bgcolor="<%=m_top%>" width="760">在<b class="unnamed2"><a href="bigclass.asp?typeid=<%=rs2("typeid")%>"><%=typename%></a>-<a href="smallclass.asp?bigclassid=<%=rs1("bigclassid")%>"><%=bigclassname%></a>-<a href="listnews.asp?smallclassid=<%=smallclassid%>"><%=smallclassname%></a></b>中添 加 文 章</td>
<%rs3.close
set rs3=nothing
rs2.close
set rs2=nothing
rs1.close
set rs1=nothing
else%>
<%if bigclassid="" then
response.write "<script>alert('请至少选择大类!');history.go(-1);</Script>"
response.end
else
set rs1=server.createobject("adodb.recordset")
sql1="select * from bigclass where bigclassid="&bigclassid
rs1.open sql1,conn,1,3
bigclassname=rs1("bigclassname")
set rs2=server.createobject("adodb.recordset")
sql2="select * from type where typeid="&rs1("typeid")
rs2.open sql2,conn,1,3
typename=rs2("typename")
%>
<input name="typeid" type="hidden" value="<%=rs1("typeid")%>">
<input name="bigclassid" type="hidden" value="<%=bigclassid%>">
                <td colspan="2"  height="29" class="unnamed2" valign="middle" bgcolor="<%=m_top%>" width="760">在<b class="unnamed2"><a href="bigclass.asp?typeid=<%=rs2("typeid")%>"><%=typename%></a>-<a href="smallclass.asp?bigclassid=<%=rs1("bigclassid")%>"><%=bigclassname%></a></b>中添 加 文 章</td>
<%rs2.close
set rs2=nothing
rs1.close
set rs1=nothing
end if
end if
%>
              </tr>

              <tr> 
                <td width="79" align="right" class="unnamed2" valign="middle" bgcolor="#FFFFFF" height="24">所属专题:</td>
                <td width="680" bgcolor="#FFFFFF" height="24"> &nbsp; 
                  <select name="SpecialID" size="1" onMouseOver="window.status='点击这里选择文章专题';return true;" onMouseOut="window.status='';return true;">
                    <%			
set rs3=server.CreateObject ("ADODB.RecordSet")
rs3.Source="select * from Special"
rs3.Open rs3.source,conn,1,1			
%>
                    <option value=0>不属于任何专题</option>
                    <%if rs3.EOF then %>
                    <option value=0>暂无任何专题</option>
                    <%else
while not rs3.EOF
%>
                    <option value="<%=rs3("SpecialID")%>"><%=trim(rs3("SpecialName"))%></option>
                    <%
rs3.MoveNext
wend
end if
rs3.close	
%>
                  </select>
&nbsp;第二专题:<select name="SpecialID2" size="1" onMouseOver="window.status='点击这里选择文章专题';return true;" onMouseOut="window.status='';return true;">
                    <%			
set rs3=server.CreateObject ("ADODB.RecordSet")
rs3.Source="select * from Special"
rs3.Open rs3.source,conn,1,1			
%>
                    <option value=0>不属于任何专题</option>
                    <%if rs3.EOF then %>
                    <option value=0>暂无任何专题</option>
                    <%else
while not rs3.EOF
%>
                    <option value="<%=rs3("SpecialID")%>"><%=trim(rs3("SpecialName"))%></option>
                    <%
rs3.MoveNext
wend
end if
rs3.close	
%>
                  </select>
                </td>
              </tr>
              <tr> 
                <td width="79" align="right" class="unnamed2" valign="middle" bgcolor="#FFFFFF" height="38">文章标题:</td>
                <td width="680" bgcolor="#FFFFFF" height="38"> <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"  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> <font color="#FF0000">*</font><SELECT size=1 id=title_color name=title_color LANGUAGE=javascript onchange="return title_color_onchange()" style="width:55">
<OPTION value="0" selected>颜色</OPTION>
<OPTION value="0">缺省</OPTION>
<OPTION value="#000000" style="background-color:#000000"></OPTION>
<OPTION value="#FFFFFF" style="background-color:#FFFFFF"></OPTION>
<OPTION value="#008000" style="background-color:#008000"></OPTION>
<OPTION value="#800000" style="background-color:#800000"></OPTION>
<OPTION value="#808000" style="background-color:#808000"></OPTION>
<OPTION value="#000080" style="background-color:#000080"></OPTION>
<OPTION value="#800080" style="background-color:#800080"></OPTION>
<OPTION value="#808080" style="background-color:#808080"></OPTION>
<OPTION value="#FFFF00" style="background-color:#FFFF00"></OPTION>
<OPTION value="#00FF00" style="background-color:#00FF00"></OPTION>
<OPTION value="#00FFFF" style="background-color:#00FFFF"></OPTION>
<OPTION value="#FF00FF" style="background-color:#FF00FF"></OPTION>
<OPTION value="#FF0000" style="background-color:#FF0000"></OPTION>
<OPTION value="#0000FF" style="background-color:#0000FF"></OPTION>
<OPTION value="#008080" style="background-color:#008080"></OPTION>
</SELECT>

<SELECT size=1 id=title_type name=title_type LANGUAGE=javascript onchange="return title_type_onchange()" style="width:55">
<OPTION value="0" selected>类型</OPTION>
<OPTION value="0">普通</OPTION>
<OPTION value="b">加粗</OPTION>
<OPTION value="i">倾斜</OPTION>
<OPTION value="u">下划线</OPTION>
<OPTION value="1">加粗倾斜</OPTION>

⌨️ 快捷键说明

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