edittopic.asp

一个超市管理系统

<!-- #include file="setup.asp" -->
<%
if Request.Cookies("username")="" then
error("<li>您还还未<a href=login.asp>登陆</a>社区")
end if



id=Request("id")
if isnumeric(""&id&"") = flase then
error("<li>非法操作")
end if
forumid=Conn.Execute("Select forumid From forum where id="&id)(0)


if instr(Request.ServerVariables("http_referer"),""&Request.ServerVariables("server_name")&"") = 0 then
error("<li>来源错误")
end if

'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''

if Request.ServerVariables("request_method") = "POST" then

content=server.htmlencode(Trim(Request("content")))
content=replace(content,vbCrlf,"<br>")
content=replace(content,"\","\\")


if content="" then
message=message&"<li>内容没有填写"
end if

if instr(content,"ヴ") > 0 or instr(content,"ヂ") > 0 or instr(content,"ゼ") or instr(content,"ヅ") > 0 then
message=message&"<li>内容中不能含有“ヴ ヂ ゼ ヅ”字符"
end if

''''''''''''''''''''

if Len(content)>50000 then
message=message&"<li>文章内容不能大于 50000 字节"
end if

if message<>"" then
error(""&message&"")
end if











if Request("retopicid")<>"" then
sql="select * from reforum where id="&Request("retopicid")&""
else
sql="select * from forum where ID="&ID&" and forumid="&forumid&""
end if

rs.Open sql,Conn,1,3
if rs("username")<>Request.Cookies("username") then
error2("对不起，您不是原贴的作者，无法编辑文章！")
end if

content=""&content&"<br><br>［此帖子已被 "&Request.Cookies("username")&" 在 "&now&" 编辑过］"
rs("content")=content
rs.update
rs.close

 
succtitle="修改帖子成功"
message="<li><a onclick=min_yuzi() target=message href=ShowPost.asp?id="&id&">返回主题</a><li><a href=ShowForum.asp?forumid="&forumid&">返回论坛</a><li><a href=Default.asp?menu=listtitle>返回社区首页</a>"
succeed(""&message&"<meta http-equiv=refresh content=3;url=ShowForum.asp?forumid="&forumid&">")

end if
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''










sql="select * from bbsconfig where id="&forumid&""
rs.Open sql,Conn
top
%>


<script>function runEx(){var winEx = window.open('', '', 'resizable,scrollbars');winEx.document.write(unescape(event.srcElement.parentElement.children[0].value));}</script>


<title>编辑帖子</title>

<CENTER>

<table width=97% align="center" border="0">
<tr>
<td vAlign="top" width="30%"><img src="images/logo.gif" border="0"></td>
<td vAlign="center" align="top">　<img src="images/closedfold.gif" border="0">　<a href=Default.asp?menu=listtitle><%=clubname%></a><br>
　<img src="images/bar.gif" border="0"><img src="images/closedfold.gif" border="0">　<a href="ShowForum.asp?forumid=<%=forumid%>"><%=rs("bbsname")%></a><br>
<%
rs.close


if Request("retopicid")<>"" then
sql="select * from reforum where id="&Request("retopicid")&""
rs.Open sql,Conn
else
sql="select * from forum where ID="&Request("id")&" and forumid="&forumid&""
rs.Open sql,Conn
end if

if rs.eof then
error2("数据库中不存在此帖子的数据")
end if

if rs("username")<>Request.Cookies("username") then
error2("对不起，您不是原贴的作者，无法编辑文章！")
end if

content =rs("content")


%>
　　 <img src=images/bar.gif><img src=images/openfold.gif>　<a onclick=min_yuzi() target=message href=ShowPost.asp?id=<%=Request("id")%>><%=Request("topic")%></a>
</td>
</tr>
</table>
<br>
<TABLE cellSpacing=1 cellPadding=5 width=670 border=0 class=a2>
<form method=post name=form onsubmit="return ValidateForm()">
<TBODY>
<TR>
<TD id=titlelarge vAlign=left colSpan=2 height=25 width="618" class=a1><b>编辑帖子</b></TD></TR>
<TR>
<TD vAlign=top width=126 class=a3 rowSpan=2>
<TABLE cellSpacing=0 cellPadding=0 width=97 align=left border=0>
<TBODY>
<TR>
<TD vAlign=top align=left width=125 class=a3><B>文章内容</B><BR>(<a href="javascript:CheckLength();">查看内容长度</a>)<BR><BR></TD></TR>
<TR>
<TD vAlign=center align=left width=125>
<TABLE
style="BORDER-RIGHT: 1px inset; BORDER-TOP: 1px inset; BORDER-LEFT: 1px inset; WIDTH: 125px; BORDER-BOTTOM: 1px inset"
cellSpacing=1 cellPadding=3 align=left class=a4 border=0>
<TBODY>
<TR align=middle>
<TD><A href="javascript:emoticon('/:)')"><IMG alt=笑脸
src="images/brow/regular_smile.gif" border=0></A></TD>
<TD><A href="javascript:emoticon('/:d')"><IMG alt=开口笑脸
src="images/brow/teeth_smile.gif" border=0></A></TD>
<TD><A href="javascript:emoticon('/:o')">
<IMG alt="惊讶的笑脸"
src="images/brow/omg_smile.gif" border=0></A></TD></TR>
<TR align=middle>
<TD><A href="javascript:emoticon('/:p')">
<IMG alt=吐舌笑脸
src="images/brow/tounge_smile.gif" border=0></A></TD>
<TD><A href="javascript:emoticon('/;)')"><IMG alt=眨眼微笑
src="images/brow/wink_smile.gif" border=0></A></TD>
<TD><A href="javascript:emoticon('/:(')">
<IMG alt=难过的脸
src="images/brow/sad_smile.gif" border=0></A></TD></TR>
<TR align=middle>
<TD><A href="javascript:emoticon('/:s')">
<IMG alt=困惑的笑脸
src="images/brow/confused_smile.gif" border=0></A></TD>
<TD><A href="javascript:emoticon('/:|')">
<IMG alt=失望的脸
src="images/brow/whatchutalkingabout_smile.gif"
border=0></A></TD>
<TD><a href="javascript:emoticon('/:$')">
<IMG alt=尴尬的笑脸
src="images/brow/embaressed_smile.gif"
border=0></a></TD></TR></TBODY></TABLE>
<TR>
<TD class=a3>
<br>
<script>
document.write("<BR>YBB 代码：")
if (getCookie('ybbcode')!='0'){
document.write("支持")
}else{
document.write("禁止")
}


document.write("<BR>表情字符：")
if (getCookie('ybbbrow')!='0'){
document.write("支持")
}else{
document.write("禁止")
}


document.write("<BR>[IMG]代码：")
if (getCookie('ybbimg')!='0'){
document.write("支持")
}else{
document.write("禁止")
}

document.write("<BR>[FLASH]代码：")
if (getCookie('ybbflash')!='0'){
document.write("支持")
}else{
document.write("禁止")
}

</script>




</TD></TR></TD></TR></TBODY></TABLE></TD>
<SCRIPT src="images/post.js"></SCRIPT>
<SCRIPT src="images/ybbcode.js"></SCRIPT>
<TD width=481 class=a3>

<img border=0 src=images\ybb\bold.gif onclick=YBBbold() alt="粗体">
<img border=0 src=images\ybb\italicize.gif onclick=YBBitalic() alt="斜体">
<img border=0 src=images\ybb\underline.gif onclick=YBBunder() alt="下划线">
<img border=0 src=images\ybb\center.gif onclick=YBBcenter() alt="居中">
<img border=0 src=images\ybb\url.gif onclick=YBBurl() alt="插入超链接">
<img border=0 src=images\ybb\email.gif onclick=YBBemail() alt="插入电子邮件地址">
<img border=0 src=images\ybb\image.gif onclick=YBBimage() alt="插入图片">
<img border=0 src=images\ybb\flash.gif onclick=YBBflash() alt="插入FLASH文件">
<img border=0 src=images\ybb\rm.gif onclick=YBBrm() alt="插入RealPlayer文件">
<img border=0 src=images\ybb\mp.gif onclick=YBBmp() alt="插入Media Player文件">
<img border=0 src=images\ybb\quote.gif onclick=YBBquote() alt="引用">
<br>

<font color=333333>颜色：</font>
<select onchange=COLOR(this.options[this.selectedIndex].value)>
<option style=COLOR:000000;BACKGROUND-COLOR:000000 value=000000>黑色</option>
<option style=COLOR:FFFFFF;BACKGROUND-COLOR:FFFFFF value=FFFFFF>白色</option>
<option style=COLOR:008000;BACKGROUND-COLOR:008000 value=008000>绿色</option>
<option style=COLOR:800000;BACKGROUND-COLOR:800000 value=800000>褐色</option>
<option style=COLOR:808000;BACKGROUND-COLOR:808000 value=808000>橄榄色</option>
<option style=COLOR:000080;BACKGROUND-COLOR:000080 value=000080>深蓝色</option>
<option style=COLOR:800080;BACKGROUND-COLOR:800080 value=800080>紫色</option>
<option style=COLOR:808080;BACKGROUND-COLOR:808080 value=808080>灰色</option>
<option style=COLOR:FFFF00;BACKGROUND-COLOR:FFFF00 value=FFFF00>黄色</option>
<option style=COLOR:00FF00;BACKGROUND-COLOR:00FF00 value=00FF00>浅绿色</option>
<option style=COLOR:00FFFF;BACKGROUND-COLOR:00FFFF value=00FFFF>浅蓝色</option>
<option style=COLOR:FF00FF;BACKGROUND-COLOR:FF00FF value=FF00FF>粉红色</option>
<option style=COLOR:C0C0C0;BACKGROUND-COLOR:C0C0C0 value=C0C0C0>银白色</option>
<option style=COLOR:FF0000;BACKGROUND-COLOR:FF0000 value=FF0000>红色</option>
<option style=COLOR:0000FF;BACKGROUND-COLOR:0000FF value=0000FF>蓝色</option>
<option style=COLOR:008080;BACKGROUND-COLOR:008080 value=008080>蓝绿色</option>
</select>　<font color=333333>字体：</font>
<select onchange=ybbfont(this.options[this.selectedIndex].value)>
<option value="隶书">隶书</option>
<option value="幼圆">幼圆</option>
<OPTION value="方正舒体">方正舒体</OPTION>
<OPTION value="方正姚体">方正姚体</OPTION>
<OPTION value="黑体">黑体</OPTION>
<OPTION value="华文彩云">华文彩云</OPTION>
<OPTION value="华文细黑">华文细黑</OPTION>
<OPTION value="华文新魏">华文新魏</OPTION>
<OPTION value="华文行楷">华文行楷</OPTION>
<OPTION value="华文中宋">华文中宋</OPTION>
<OPTION value="隶书">隶书</OPTION>
<OPTION value="宋体" selected>宋体</OPTION>
<OPTION value="新宋体">新宋体</OPTION>
<OPTION value="幼圆">幼圆</OPTION>
</SELECT>　<font color=333333>字体大小：</font>
<select onchange=ybbsize(this.options[this.selectedIndex].value)>
<OPTION value=1>1</OPTION>
<OPTION value=2>2</OPTION>
<OPTION value=3>3</OPTION>
<OPTION value=4>4</OPTION>
<OPTION value=5>5</OPTION>
<OPTION value=6>6</OPTION>
<OPTION value=7>7</OPTION>
</SELECT>

</TD></TR>
<TR>
<TD width=481 class=a3 align="center">
<TEXTAREA onkeydown=presskey(); name=content rows=10 cols=70><%=content%></TEXTAREA><br>
『 <a href="javascript:replac()">替换文本</a> 』 『  
<a href="javascript:HighlightAll('form.content')">复制到剪贴板</a> 』</TD></TR>
<TR>
<TD align=middle class=a3 colSpan=2 height=27 width="618"><INPUT tabIndex=4 type=submit value=确定编辑 name=submit1>&nbsp; <INPUT type=reset value=" 重 写 "></TD></TR></TBODY></TABLE></FORM>








<Script>
document.form.content.value = unybbcode(document.form.content.value);
document.form.content.focus();
function unybbcode(temp) {
temp = temp.replace(/<br>/ig,"\n");
return (temp);
}
</Script>




<%
rs.close
htmlend
%>