save_replymodify.asp
来自「云师大商学院目前正在使用的oa」· ASP 代码 · 共 38 行
ASP
38 行
<%response.expires=0
re_content=request("re_content")
re_content=replace(re_content,"<","<")
re_content=replace(re_content,">",">")
re_content=replace(re_content," "," ")
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 + -
显示快捷键?