⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 admin_newsupdate.asp

📁 十分好的音乐网站源码 十分好的音乐网站源码十分好的音乐网站源码十分好的音乐网站源码十分好的音乐网站源码
💻 ASP
字号:
<%response.Buffer=true %>
<%
if session("cjuser")="" and session("pwdd")="" then
response.write"<SCRIPT language=JavaScript>alert('你没有登录,无权进入!');"
response.write"this.location.href='error.htm';</SCRIPT>" 
response.end 
end if
%>
<!--#include file=../conn/adodb1.asp -->
<%
dim id,title,lx,link,content,dd
id=session("dd")
title=trim(REQUEST.form("title"))
lx=trim(REQUEST.form("lx"))
link=trim(REQUEST.form("link"))
content=trim(REQUEST.form("content"))

dim rs,sql
set rs=server.createobject("adodb.recordset")
sql="select * from news where id=cstr('"&id&"')"
rs.open sql,db,3,2
if link="" then
rs("title")=title
rs("lx")=lx
rs("content")=content
rs("timm")=now()
else
rs("title")=title
rs("lx")=lx
rs("link")=link
rs("timm")=now()
end if
rs.update
rs.close
db.close
set db=nothing
response.write"<SCRIPT language=JavaScript>alert('恭喜你修改成功!!');"
response.write"this.location.href='admin_newsmanage.asp';</SCRIPT>" 
response.end 
%>

⌨️ 快捷键说明

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