<% tiezi=clng(Request("tiezi")) set querenfatie=lj.execute("select mingzi from tiezi where xuhao="& tiezi &"") if mingzi="" or mima="" then response.Redirect("b_bankuai.asp") elseif touyz.eof then response.Redirect("b_bankuai.asp") elseif touyz("mima")<>mima then response.Redirect("b_bankuai.asp") elseif touyz("mima")<>mima then response.Redirect("b_bankuai.asp") elseif querenfatie("mingzi")<>mingzi then response.Redirect("b_bankuai.asp") end if set zhutie=lj.execute("select bankuai from tiezi where xuhao="& tiezi &"") xuhao=zhutie("bankuai") if request("dongzuo")="xiugai" then set zhutie=lj.execute("select biaoti,neirong,bankuai from tiezi where xuhao="& tiezi &"") xuhao=zhutie("bankuai") set bankuai=lj.execute("select mingzi from bankuai where xuhao="& xuhao &"") %>

论坛版块 → <%=server.HTMLEncode(bankuai("mingzi"))%> → 您的帖子 → 修改帖子

<% if request("fanhui")="" then response.Write("修改帖子") elseif request("fanhui")="kong" then response.Write("您刚才的表单没填完，请填好以后再提交。") elseif request("fanhui")="duo" then response.Write("帖子内容不能超过65535个文字。") end if %>

<% elseif request("dongzuo")="shanchu" then lj.execute("delete from tiezi where xuhao="& tiezi &"") lj.execute("delete from tiezi where tiezi='"& tiezi &"'") response.Redirect("b_luntan.asp?bankuai="& xuhao &"") end if %>