admin_news_lm2_add_save.asp

来自「1．理解Winsock编程模型； 2．掌握Winsock编程的基本方法」· ASP 代码 · 共 77 行

ASP
77 行
字号 

<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<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>

<%
 if session("uname")="" then
%>
<script language="javascript">
				if 	(confirm("您进行的是非法登录，请重新登录!"))
				  location.href="admin.asp";			
				</script>
<%
end if
%><!--#include file = conn.asp -->
<%
id=trim(request("id"))
sql3 = "select * from lm where id="&id
Set rs3 = Server.CreateObject("ADODB.RecordSet")
rs3.Open sql3,conn,3,2
if rs3("url1")<>"" then
%>
<script language="javascript">
				if 	(confirm("您已经在该栏目上添加了网址，请您修改该栏目后重新添加!"))
				  location.href="admin_news_lm.asp";			
				</script>

<%
elseif rs3("moban")<>"" then
%>
<script language="javascript">
				if 	(confirm("您已经把该栏目做为一级摸版连接页面，请您修改该栏目后重新添加!"))
				  location.href="admin_news_lm.asp";			
				</script>

<%

lm2=trim(request("lm2"))
fontcolor=trim(request("fontcolor"))
lm=trim(request("lm"))
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("fontcolor")=fontcolor
   rs("url")=request("url")
   rs.update
   rs.close
   set rs=nothing

end if 

conn.close
set conn=nothing


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

admin_news_lm2_add_save.asp - 源码说明

本页面展示了「1．理解Winsock编程模型； 2．掌握Winsock编程的基本方法」中的 admin_news_lm2_add_save.asp 源码文件，采用 ASP 编程语言编写，共 77 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与Winsock相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

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