📄 boardadd.asp
字号:
<!--#include file="../inc/CheckUser.inc"-->
<!--#include file="../inc/Constant.inc"-->
<html>
<head>
<title>
综合信息发布
</title>
</head>
<body background="<%=App_BgImg%>" VLINK="BLUE">
<table CELLPADDING="0" CELLSPACING="0">
<tr><td>
<img src="../Images/bullet_h.gif" WIDTH="31" HEIGHT="14"><a href="Boardframe.asp" name="fanhui">返 回</a></td>
</tr>
</table>
<font FACE="楷体_GB2312" SIZE="3">
<p>
<p>
<form method="post" action="BoardUpdate.asp" id=form1 name=form1>
<center><font FACE="楷体_GB2312" SIZE="6" color=red><b>发布公告</b></font>
<br><br>
<font SIZE="2">
<table width="90%" border="0">
<tr>
<td Valign="Top" nowrap>标 题：</td>
<td COLSPAN=3><input type="Text" Name="Title" size="75" value=""></td>
</tr>
<tr>
<td Valign=Top>内容:</td>
<td>
<textarea name="Content" rows="15" cols="75" WRAP="VIRTUAL"></textarea>
</td>
</tr>
</table>
<table Width="80%">
<tr>
<td> </td>
<td>
<input type="Button" Name="BoardSave" value="保 存">
</td>
<td>
<input type="Reset" Name="cancel" value="取 消">
</td>
</tr>
</table>
</center>
</form>
</body>
</html>
<script language="VBSCRIPT">
sub BoardSave_OnClick()
If document.forms(0).elements("TiTle").value="" Then
Msgbox "标题不能为空!",,"提示"
document.forms(0).elements("TiTle").focus()
Exit Sub
End If
document.forms(0).submit
end sub
</script>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -