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

📄 admin_news_lm2_add_save.asp

📁 迅时后台可以 对新闻栏目进行管理
💻 ASP
字号:

<!--#include file = admin_chk.asp -->


<head>
<!--#include file = language.asp -->
<style>
<!--
a:link       { font-size: 9pt; font-family: 宋体; color: #000000;text-decoration: none; }
a:visited    { color: #000000; font-family: 宋体; font-size: 9pt;text-decoration: none; }
a:hover      { font-size: 9pt; font-family: 宋体; color: #000000;TEXT-DECORATION: underline; }
body         { font-family: 宋体; color: #000000; font-size: 9pt }
p            { color: #000000; font-family: 宋体; font-size: 9pt }
td           { font-size: 9pt; font-family: 宋体; color: #000000 }
input        { font-size: 9pt; font-family: 宋体; color: #000000 }

-->
</style>

</head>

<!--#include file = admin_conn.asp -->


<%
id=trim(request("id"))
lm2=trim(request("lm2"))
fontcolor=trim(request("fontcolor"))
if fontcolor="" then fontcolor="000000"
lm=trim(request("lm"))
sql = "select * from newsmb order by id asc"
Set rs = Server.CreateObject("ADODB.RecordSet")
rs.Open sql,conn,1,1
mb=rs("ID")
rs.close
set rs=nothing
if id<>"" or lm2<>"" then 
   sql = "select * from lm"
   Set rs = Server.CreateObject("ADODB.RecordSet")
   rs.Open sql,conn,1,2
   rs.addnew
   rs("lm2")=lm2
   rs("lmid")=id
   rs("mb")=mb
   rs("fontcolor")=fontcolor
   rs.update

   rs.close
   set rs=nothing

end if 

conn.close
set conn=nothing

Response.Redirect "admin_news_lm2.asp?id="&id&"&lm="&lm
%>

⌨️ 快捷键说明

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