📄 wz_add.asp
字号:
<!--#include file="config.Asp"-->
<html>
<head>
<title>添加文章-<%= SysName %>-<%= SysUrl %></title>
<!--#include file="top.asp" -->
<script language="javascript">
var onecount;
function CheckForm()
{
if (formfb.BClassID.value=="")
{
alert("请选择大类");
formfb.BClassID.focus();
return false;
}
if (formfb.SClassID.value=="")
{
alert("请选择小类");
formfb.SClassID.focus();
return false;
}
if (formfb.wz_title.value=="")
{
alert("题目不能为空");
formfb.wz_title.focus();
return false;
}
if (document.formfb.Content.value=="")
{
alert("内容不能为空");
formfb.Content.focus();
return false;
}
return true;
}
</script>
<%set rs=conn.execute("Select * From munexx where m_type=2 Order by m_order Asc")%>
<script language = "JavaScript">
var onecount;
onecount=0;
subcat = new Array();
<%
count = 0
do while not rs.eof
%>
subcat[<%=count%>] = new Array("<%= trim(rs(1))%>","<%= trim(rs(3))%>","<%= trim(rs(0))%>");
<%
count = count + 1
rs.movenext
loop
rs.close
%>
onecount=<%=count%>;
function changelocation(locationid)
{
document.formfb.SClassID.length = 0;
var locationid=locationid;
var i;
for (i=0;i < onecount; i++)
{
if (subcat[i][1] == locationid)
{
document.formfb.SClassID.options[document.formfb.SClassID.length] = new Option(subcat[i][0], subcat[i][2]);
}
}
}
</script>
<div id="content"><br>
<br>
<br>
<table width="80%" border="0" align="center" cellpadding="2" cellspacing="1" bgcolor="#3097D1">
<tr>
<td height="25" bgcolor=#3097D1 align="center"><font color="#FFFFFF"><b>添加文章 </b></font><font color="#FF0000">(未通过审核的文章将不显示)</font></td>
</tr>
<tr bgcolor="#FFFFFF">
<td>
<table width="100%" border="1" align="center" cellpadding="0" cellspacing="0" bordercolorlight="#cccccc" bordercolordark="#FFFFFF">
<form action="mis_do.asp?act=wzadd" method="post" name="formfb" id="formfb">
<tr>
<td width="180" height="25" align="right">选择分类: </td>
<td width="752"> <select name="BClassID" id="BClassID" onChange="changelocation(document.formfb.BClassID.options[document.formfb.BClassID.selectedIndex].value)">
<option value="" selected>=请选择大类=</option>
<%set rs=conn.execute("Select m_id,m_name From munexx where m_type=1")
Do while Not rs.eof
response.write "<option value='"&rs(0)&"'>"&rs(1)&"</option>"
rs.MoveNext()
loop
rs.Close()
set rs=Nothing%>
</select>
<select name="SClassID">
<option value="" selected>=请选择小类=</option>
</select>
<font color="#FF0000">*</font></td>
</tr>
<tr> <td height="25" align="right">文章题目: </td>
<td> <input name="wz_title" type="text" id="wz_title" size="60">
<font color="#FF0000">*</font></td>
</tr>
<tr> <td height="25" align="right">文章作者: </td>
<td> <input name="zuozhe" type="text" id="zuozhe" size="30"></td>
</tr>
<tr> <td height="25" align="right">文章收集: </td>
<td> <input name="soji" type="text" id="soji" size="30"></td>
</tr>
<tr>
<td align="right">文章正文: </td>
<td> <textarea name="content" cols="100" rows="20"></textarea></td>
</tr>
<tr><td height="25" align="center" colspan="2"><input type="submit" name="Submit" value=" 现在添加" onClick="return CheckForm();">
<input type="button" name="aaa" value="取消添加" onClick="javascript:window.close()"></td></tr>
</form>
</table></td>
</tr>
</table>
<br>
<br>
</div>
<!--#include file="bottom.asp"-->
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -