📄 saveedit.asp
字号:
<%@ codepage ="936" %><!--#include file="../../inc/config.asp"-->
<!--#include file="../../conn/dbconn2.asp" -->
<%
if instr(session("flag_fyadmin"),"51")=0 then
response.redirect "../login.asp"
response.end
end if
%>
<link rel="stylesheet" type="text/css" href="../style.css">
<%
dim sql1,rs1,typename1
sql1="select type from hyxxtype where typeid="&request("typeid")&""
set rs1=server.createobject("adodb.recordset")
rs1.open sql1,conn,1,1
typename1=rs1("type")
set rs=server.createobject("adodb.recordset")
sql="select * from hyxx where Newsid="&request("Newsid")&""
rs.open sql,conn,1,3
rs("title")=request("title")
rs("content")=request("content")
rs("typeid")=request("typeid")
rs("typename")=typename1
rs("tjnews")=request("tj")
rs("nfrom")=request("nfrom")
rs("Selectpic")=request("Selectpic")
if request("upfile")<>"" then
rs("picurl")=request("upfile")
end if
rs.update
rs.close
set rs=noting
conn.close
set conn=nothing
response.write "<br>"+"信息修改成功,点此<a href=../../hyxx/shownews.asp?newsid="&request("newsid")&" target=_blank><font color=#ff000>预览</font></a>,请<a href=default.asp><font color=#ff000>继续</font></a>其他操作。"
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -