📄 savead1.asp
字号:
<%@ CODEPAGE = "936" %>
<!--#include file="articleconn.asp"-->
<!--#include file="security.asp"-->
<!--#include file="../checkpost.asp"-->
<!--#include file="inc/function.asp"-->
<%if session("flag")>1 then
response.write "<script>alert('您的操作权限不够！');history.back();</script>"
response.end
end if
%>
<%
dim upad
dim upad2
dim centerad
dim downad
dim softad
dim leftxf
dim rightxf
dim fullxf
dim imgxf
dim xfimg
dim xfurl
dim xftxt
dim sql
dim rs
dim founderr
founerr=false
if founderr=false then
if request("upad")="" then
upad=null
else
upad=request("upad")
end if
if request("upad2")="" then
upad2=null
else
upad2=request("upad2")
end if
if request("centerad")="" then
centerad=null
else
centerad=request("centerad")
end if
if request("downad")="" then
downad=null
else
downad=request("downad")
end if
if request("softad")="" then
softad=null
else
softad=request("softad")
end if
'============悬浮广告判断(创新下载.xdani)==========
leftxf=request("leftxf")
rightxf=request("rightxf")
fullxf=request("fulltxf")
if request.form("leftxf")="on" then
leftxf=1
else
leftxf=0
end if
if request.form("rightxf")="on" then
rightxf=1
else
rightxf=0
end if
if request.form("fullxf")="on" then
fullxf=1
else
fullxf=0
end if
imgxf=request("imgxf")
xfimg=request("xfimg")
xfurl=request("xfurl")
xftxt=request("xftxt")
'===================结束=========================
set rs=server.createobject("adodb.recordset")
sql="select * from indexad"
rs.open sql,conn,3,3
rs("upad")=upad
rs("upad2")=upad2
rs("centerad")=centerad
rs("downad")=downad
rs("softad")=softad
rs("leftxf")=leftxf
rs("rightxf")=rightxf
rs("fullxf")=fullxf
rs("imgxf")=imgxf
rs("xfimg")=xfimg
rs("xfurl")=xfurl
rs("xftxt")=xftxt
rs.update
set rs=nothing
conn.close
set conn=nothing
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>在线支付接口设置</title>
<link href="inc/Admin_STYLE.CSS" rel="stylesheet" type="text/css">
</head>
<body>
<p align="center"> </p>
<form name="pay" method="post" action="online_pay_save.asp">
<div align="center"><br>
<table cellpadding="2" cellspacing="1" border="0" width="90%" class="border" align=center>
<tr align="center" bgcolor="#429AEF">
<td height=25 colspan=2 ><p align="center"><b><font color="#345b9c">
<%if request("action")="add" then%>
<%else%>
<%end if%>
</font></b> <strong><font color="#FFFFFF">广告修改成功</font></strong>
<tr>
<td height=117 colspan="2" class="tdbg"><div align="center"><a href="ads.asp">数据已保存请返回</a></div> </td>
</tr>
</table>
<br>
<font color="#00FFFF"> <br>
</font></div>
</form>
<%
else
response.write "由于以下的原因不能保存数据："
response.write errmsg
end if
%>
<%if makejs=1 then%>
<%end if%>
<%if classid=10 then%>
<%end if%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -