?? addannounce.asp
字號:
<!--#include file="conn.asp"-->
<!--#include file="Cookies.asp"-->
<%
if request.QueryString("xingxing")="add" then
call add
response.End()
end if
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>無標題文檔</title>
<style type="text/css">
<!--
.style1 {
font-size: 36px;
font-family: "華文行楷";
color: #0000FF;
}
-->
</style>
</head>
<body>
<div align="center"><span class="style1">公告添加</span>
<form name="form1" method="post" action="addannounce.asp?xingxing=add">
<div align="center">
<table width="506" height="97" border="1" bgcolor="#999933">
<tr>
<th width="43" scope="row">標題</th>
<td width="447">
<div align="left">
<input type="text" name="tile" value="">
</div></td>
</tr>
<tr>
<th scope="row">內容</th>
<td><div align="left">
<textarea name="announce" cols="40" rows="10" > </textarea>
</div></td>
</tr>
</table>
</div>
<input name="add" type="submit" value="提交">
</form>
</div>
<div align="center"></div>
</body>
</html>
<%
sub add
tile=request.Form("tile")
announce=request.Form("announce")
sql="insert into announce(tile,announce,pub_date) values('"& tile &"','"& announce &"',#" & Now() &"#)"
conn.execute(sql)
response.write "<li>添加公告信息成功。"
response.write "<meta http-equiv=refresh content=""1;URL=announce_manage.asp"">"
response.End()
end sub
%>?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -