save_replymodify.asp

来自「云师大商学院目前正在使用的oa」· ASP 代码 · 共 38 行

ASP
38
字号
<%response.expires=0
 re_content=request("re_content")
   re_content=replace(re_content,"<","&lt;")
   re_content=replace(re_content,">","&gt;")
   re_content=replace(re_content," ","&nbsp;")
   re_content=replace(re_content,chr(13),"<BR>")

 re_department=request("re_department")
 re_time=cstr(now)
 re_advace_id=request("advice_id")%>
<!-- #include file="asp/ynnuci_dbo.asp" -->

 <%set rs=server.createobject("adodb.recordset")
       rs.open"select * from reply where re_advace_id="&re_advace_id,dbc,2,3
	   if not rs.eof then
	   rs.movelast
	   end if
	   
	  
	   rs("re_content")=re_content
	   rs("re_department")=re_department
	   rs("re_time")=re_time
	   'rs("re_advace_id")=re_advace_id
	   'rs("re_subtime")=now
	   rs.update

	   rs.close
	   set rs=nothing
	   dbc.close
	   set dbc=nothing
	   %>
	   <SCRIPT LANGUAGE="JavaScript">
<!--
alert("修改成功!")
 document.location="reply.asp"

//-->
</SCRIPT>

⌨️ 快捷键说明

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