news_modi_ok.asp

来自「房地产管理系统 vb写的,很不错!!!!!!!!!!!」· ASP 代码 · 共 47 行

ASP
47
字号
<%
If session("manager")="" Then
  Response.Redirect("manage.asp")
  Response.end
 End If
%><!--#include file="../inc/conn.asp"--><%'┌─  风云ASP在线  ────────────────────────┐'│                                                                 │'│  作者:赵振波.	http://www.fyasp.com	    				    │'│                                                                 │'│   Q Q:176189168  										   	    │'│                                                                 │'│ Email:fy96@163.com                                             │'│                                                                 │'│ 程序定做,系统开发,网站制作,提供高质量的网络产品、技术和服务!│'│                                                                 │'│                                                                 │'└───────────────────  http://www.fyasp.com ──┘%>
<%
opendataconn
newsid=request("newsid")
topic=trim(request("topic"))
topic="'" & replace(topic,"'","''") & "'"
'img=trim(request("imgname"))
'if img="undefined" Then
  'img=""
 'End if
'img=Trim(img)
sort=trim(request("sort"))
fromw=trim(request("fromw"))
fromw="'" & replace(fromw,"'","''") & "'"
comment=request("comment")
comment= replace(comment,"'","''")
comment="'" & replace(comment,vbcrlf,"<br>") & "'"
sql="update  news set topic="&topic&",fromw="&fromw&",sort='"&sort&"',comment="&comment&" where newsid="&newsid&"" 
'response.write(sql)
'response.end
conn.execute sql
'response.redirect"news_del.asp"
closedataconn
%>
<script language="javascript">
alert('您的信息已修改');
history.back();
</script>

⌨️ 快捷键说明

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