📄 post_edit.asp

📁 购物系统(本版为正式商业版
💻 ASP
字号:
<%response.buffer=true%>
<!--#include file="../fuction.asp"-->
<!--#include file="conn.asp"-->
<!--#include file="inc/config.asp"-->
<!--#include file="../webconfig.asp"-->
<html>
<head>
<title><%=bbsname%>-论坛中心</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="SHORTCUT ICON" href="/shortcut.ico">
<meta name="generator" content="snsn-shop">
<meta name=keywords content="<%=webgjz%>">
<meta name="description" content="<%=webmx%>">
<meta name="MSSmartTagsPreventParsing" content="TRUE">
<meta http-equiv="MSThemeCompatible" content="Yes">
<link href="/css.css" rel="stylesheet" type="text/css">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<!--#include file="../webtop.asp"-->

<table width="940" align="center" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td height="6" colspan="3"></td>
  </tr>
  <tr>
    <td width="17"><img src="/img/index_1.gif" width="15" height="16"></td>
    <td valign="bottom">您现在的位置是：<a href="<%=weburl%>"><%=webname%></a> -> <span class="table-shangxia"><span class="b14"><a href=index.asp><%=bbsname%></a> → <a href=list.asp?bid=<%=bid%>><%=bidname%></a>→ 编辑帖子</span></span></td>
    <td valign="bottom"></td>
  </tr>
  <tr>
    <td height="6" colspan="3"></td>
  </tr>
</table>
<!--#include file="top.asp"-->

<% 

 username=nosql(session("username"))
    password=nosql(session("userpassword"))
   
    if username="" or password="" then
    response.redirect"login.asp"
    end if
bid=int(Request.querystring("bid"))
sql="select * from board where bid="&bid&""
Set Rs=Conn.Execute(sql)
bidname=rs("bidname")
rs.close
id=int(request.querystring("id"))
set editreco=server.createobject("adodb.recordset")
sqlstr="select * from book where id=" &id
editreco.open sqlstr,conn,1,1
if editreco("username")<>username and session("manbid")<>20000  then
response.write"<script language='javascript'>alert('只有作者本人才能编辑该帖子！')</script>"
response.write "<script language='javascript'>history.back(-1)</script>"
response.end
end if%>
   



<body topmargin="0" leftmargin="0">
<table width="900" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
  <tr>
    <td>
      <table width="100%"  border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td valign="top">
            <p>&nbsp;</p>
            <form method="post" action="save_post_edit.asp?id=<%=editreco("id")%>"  name="esung" onSubmit="return CheckForm(this);">
              <table width="745" height="401" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="73D1E9">
                <tr bgcolor="C0E9F5">
                  <input name="body" type="hidden" value='<%=server.htmlencode(editreco("body"))%>'>
                  <TD width="146" height=26 align="left">&nbsp;<B>帖子主题：</B></TD>
                  <TD width="589" height="26"><b><%=editreco("title")%></b> </TD>
                </tr>
                <tr bgcolor="#FFFFFF">
                  <input type="hidden" name="url" value="<%=request.serverVariables("Http_REFERER")%> ">
                  <TD width="146" height=53 align="left" bgcolor="F7FEFF">
                    <P                                                                           
      style="LINE-HEIGHT: 150%; MARGIN-LEFT: 5px; MARGIN-TOP: 5px"><B>你的表情：</B> <BR>
          ·放在帖子前面。</P></TD>
                  <TD width="589" height="53">
                    <%For I=1 to 57%>
                    <input type="radio" name="faceimg" value="<%=i%>" checked>
                    <img src="images/Mood/<%=i%>.gif" width="20" height="20">
                    <%                                 
Next                                 
%>
                  </TD>
                </tr>
                <tr bgcolor="#FFFFFF">
                  <TD width="146" height=287 align="left" vAlign=top bgcolor="F7FEFF"><BR>
                      <B>&nbsp;帖子内容:</b> <BR>
        ·HTML标签： 不可用<BR>
        ·UBB标签： 可用<BR>
        ·贴图标签： 可用<BR>
        ·Flash标签：可用<BR>
        ·表情字符转换：可用<BR>
        ·上传图片：可用<br>
        <br>
        · <a href="javascript:CheckLength();">查看内容长度</a> <BR>
        <BR>                  </TD>
                  <TD width="589" vAlign=center height="287">
                    <p align="center">
                     <%if tp=0 then%><IFRAME name=ad src="/upload.asp?infoname=bbs" frameBorder=0  width="100%" scrolling=no height=25 ></IFRAME>
						  <%elseif tp=1 then%>
						  <%if session("manbid")<>0 then%><IFRAME name=ad src="/upload.asp?infoname=bbs" frameBorder=0  width="100%" scrolling=no height=25 ></IFRAME><%end if%>
						  <%elseif tp=2 then%>
						  <%if session("manbid")=20000 then%><IFRAME name=ad src="/upload.asp?infoname=bbs" frameBorder=0  width="100%" scrolling=no height=25 ></IFRAME><%end if%>
						  <%end if%>
                      <BR>
                      <SCRIPT src="post.js"></SCRIPT>
                      <BR>
                </tr>
                <TR>
                  <TD width="146" height="27" bgcolor="F7FEFF"></TD>
                  <TD width="589" height="27" bgcolor="F7FEFF">
                    <p align="center">
                      <input name="submit1" type="submit" class="go-wenbenkuang" value="修 改" >
&nbsp;
          <input name=preview type="Button" value="预 览" onclick="Gopreview()" class="go-wenbenkuang">
&nbsp;
          <input name="return" type="button" class="go-wenbenkuang" onclick="javascript:history.go(-1)" value="返 回" >
                  </TD>
                </TR>
              </table>
            </form>
            <form name=preview action=view.asp method=post target=preview_page>
              <input name="body" type="hidden">
          </form>            <p>&nbsp;</p></td>
        </tr>
    </table></td>
  </tr>
</table>
<!--#include file="../copyright.asp"-->
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -