📄 boardedit.asp
字号:
<!--#include File="../ConnDB.asp"-->
<!--#include file="isAdmin.asp"-->
<html>
<head>
<title>网上商城公告</title>
<link href=../style.css rel=STYLESHEET type=text/css>
<script language="javascript">
function checkFields()
{
if (myform.title.value=="") {
alert("公告题目不能为空");
myform.title.onfocus();
return false;
}
if (myform.content.value=="") {
alert("公告内容不能为空");
myform.content.onfocus();
return false;
}
return true;
}
</script>
</head>
<body bgcolor="#BEDCFA">
<%
'从数据库中取得此公告信息
Dim id,rs,sql
'读取参数id
id = Request.QueryString("id")
'根据参数id设置sql语句,读取指定的公告信息
sql = "SELECT * FROM Board WHERE id = " & id
'执行SQL语句,将公告信息读取到rs记录集中草药
Set rs = Server.CreateObject("ADODB.RecordSet")
rs.Open sql,conn,1,1
'如果记录集为空,则显示没有此公告
If rs.EOF Then
Response.Write "没有此公告"
'结束网页输出
Response.End
Else
'替换公告内容中的特殊字符
content=Replace(rs("content"),"<br>",chr(13))
content=Replace(content," "," ")
'下面内容是在表格中显示公告内容
%>
<form name="myform" method="POST" action="BoardSave.asp?action=update&id=<%=id%>" OnSubmit="return checkFields()">
<table border="0" width="100%" cellspacing="1">
<tr>
<td width="100%">公告标题
<input type="text" name="title" size="20" value="<%=rs("title")%>"></td>
</tr>
<tr>
<td width="100%">公告内容</td>
</tr>
<tr>
<td width="100%"><textarea rows="12" name="content" cols="55"><%=content%></textarea></td>
</tr>
</table>
<p align="center"><input type="submit" value=" 提 交 " name="B1">
<input type="reset" value=" 重写 " name="B2"></p>
<%
End If
%>
</form>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -