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

📄 newsclassedit3.asp

📁 zheng fu wang zhan gong neng qi quan
💻 ASP
字号:
<!--#include file="conn.asp"-->
<!--#include file="ConnUser.asp"-->
<!--#include file="config.asp" -->
<!--#include file="chkuser.asp" -->
<!--#include file="char.inc"-->
<!--#include file="ChkURL.asp"-->
<%
NewsID=ChkRequest(Request.QueryString("NewsID"),1)	'防注入
typeid=trim(request.form("typeid"))
BigClassid=trim(Request.Form("BigClassid"))
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from "& db_News_Table &" where newsid="&newsid
rs.open sql,conn,3,3
dim title
title=rs("title")
rs.close
set rs=nothing
if typeid="" then
%>
<script language=javascript>
history.back()
alert("请选择该文章所属的总栏,如果系统中还没有文章总栏的话,请在《总栏管理》中添加新总栏!" )
</script>
<%
Response.End
end if

SmallClassid=trim(Request.Form("SmallClassid"))

set rs13=server.createobject("adodb.recordset")
sql13="select * from "& db_News_Table &" where NewsID="&NewsID
rs13.open sql13,conn,3,3

if bigclassid="" then
rs13("bigclassid")=null
else
rs13("bigclassid")=bigclassid
end if

if smallclassid="" then
rs13("smallclassid")=null
else
rs13("smallclassid")=smallclassid
end if

rs13("typeid")=typeid
rs13.update
rs13.close
set rs13=nothing


Response.Redirect "newsedit.asp?NewsID="&NewsID
%>

⌨️ 快捷键说明

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