c_hxiugai.asp

来自「BBS电子公告系统」· ASP 代码 · 共 25 行

<!--#include file="d_lj.asp" -->
<%
	tiezi=request("tiezi")
	set czhutie=lj.execute("select tiezi from tiezi where xuhao="& tiezi &"")
	ztiezi=cint(czhutie("tiezi"))
	xinqing=Request.Form("xinqing")
	neirong=Trim(Request.Form("neirong"))
	mingzi=request.Cookies("mingzi")
	cmima=request.Cookies("mima")
		if Instr(mingzi,"=")>0 or Instr(mingzi,"'")>0 or Instr(mingzi,"(")>0 or Instr(mingzi,")")>0 then
			response.Redirect("b_bankuai.asp")
		end if
	set yz=lj.execute("select mima from huiyuan where mingzi='"& mingzi &"'")
	if yz("mima")<>cmima then
		response.Redirect("b_bankuai.asp")
	end if
		if neirong="" then
			response.Redirect("b_hxiugai.asp?fanhui=kong")
		end if
		if len(neirong)>65535 then
			response.Redirect("b_hxiugai.asp?fanhui=duo")
		end if
	lj.execute("update tiezi set xinqing="& xinqing &",neirong='"& neirong &"' where xuhao="& tiezi &"")
	response.Redirect("b_kantie.asp?tiezi="& ztiezi &"")
%>