?? newsedit.asp
字號(hào):
<!--#include file="ConnDB.asp"-->
<!--#include file="isAuthor.asp"-->
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>修改新聞</title>
<link rel="stylesheet" href="style.css">
<script language="javascript">
function form_onsubmit(obj)
{
ValidationPassed = true;
if(obj.Cate.selectedIndex <0) {
alert("請選擇新聞?lì)悇e")
ValidationPassed = false;
return ValidationPassed;
}
if(obj.title.value == "") {
alert("請?zhí)顚懶侣剺?biāo)題");
ValidationPassed = false;
return ValidationPassed;
}
if(obj.txtcontent.value == "") {
alert("請?zhí)顚懶侣剝?nèi)容！");
ValidationPassed = false;
return ValidationPassed;
}
}
</script>
</head>
<body>
<html>
<%
Set rsNews = Server.CreateObject("ADODB.RecordSet")
Set rsCate = Server.CreateObject("ADODB.RecordSet")
'讀取指定新聞數(shù)據(jù)
Set rsNews = Conn.Execute("SELECT * FROM News WHERE id = " & Request.QueryString("id"))
If Not rsNews.EOF Then
'對(duì)新聞內(nèi)容進(jìn)行替換
txtcontent = rsNews("content")
txtcontent = replace(txtcontent, "<br>", chr(13))
txtcontent = replace(txtcontent, " ", " ")
rqtContent = replace(txtcontent, "''", "'")
%>
<p align="center"><font color=red style="font-family: 宋體; font-size: 11pt"><b>修改新聞</b></font></p>
<form action="newsUpdate.asp" method="POST" name="myform" align="center" onsubmit="return ValidationPassed">
<input type="hidden" name="id" value="<%=rsNews("id")%>">
<table border="0" width="98%" align=center>
<tr><td>類別</td><td>
<select name="Cate">
<%
'顯示新聞?lì)悇e
Set rsCate = conn.Execute("Select * from Category order by CateId")
DO WHILE Not rsCate.EOF
'如果當(dāng)前類別等于新聞?lì)悇e，則將其設(shè)置為當(dāng)前下拉菜單的顯示內(nèi)容
If CInt(rsNews("CateId")) = rsCate("CateId") Then
%>
<option value="<%=rsCate("CateId")%>" selected><%=rsCate("CateName")%></option>
<% Else %>
<option value="<%=rsCate("CateId")%>"><%=rsCate("CateName")%></option>
<% End If
rsCate.MoveNext()
LOOP
%>
</select>
</td> </tr>
<tr>
<td>題目</td><td> <input type="text" name="title" size="40" value="<%=rsNews("title")%>" style="font-family: 宋體; font-size: 9pt">
<input type="checkbox" name="attpic" value="1" <%if rsNews("attpic")=true then%> checked <%end if%> >附圖</td>
</tr>
<tr>
<td width="19%" height="30" align=left><b>照片上傳:</b></td>
<td width="81%" height="30"><iframe frameborder="0" width="400" height="50" scrolling="no" src="upload.asp" ></iframe>
</td>
</tr>
<tr>
<td align="center" height="30" colspan=2>
<!--#include file="template.asp"-->
</td>
</tr>
<tr>
<td align="left" width="20%">內(nèi)容介紹</td>
<td>
<textarea rows="22" name="txtcontent" cols="60"><%=rqtContent%></textarea>
</td>
</tr>
</table>
<p align=center><input type="submit" value="確定" name="B1" onclick="form_onsubmit(this.form)" style="font-family: 宋體; font-size: 9pt">
<input type="reset" value="取消" name="cmdcancel" style="font-family: 宋體; font-size: 9pt"></p>
</form>
<%end if%>
</body>
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -