b2b_webad.asp

信运网店系统是一套功能完善、简洁美观

<!--#include file="conn.asp"-->
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<%
if session("admin")="" then
conn.close
set conn = nothing
response.Write "<script language='javascript'>alert('请先登录！');history.go(-1);</script>"
response.End
else
if request.cookies("Buy2Buy")("admin")="" then
conn.close
set conn = nothing
response.Write "<script language='javascript'>alert('请先登录！');history.go(-1);</script>"
response.End
end if
end if
'所有无权限
if session("rank")>1 then
conn.close
set conn = nothing
response.Write "<script language='javascript'>alert('您的管理权限未达到此操作等级!');history.go(-1);</script>"
response.End
end if


if request.form("action") = "save" then
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from ad",conn,1,3
rs("best1")=trim(request.form("best1"))
rs("best1url")=trim(request.form("best1url"))
rs("best2")=trim(request.form("best2"))
rs("best2url")=trim(request.form("best2url"))
rs("best3")=trim(request.form("best3"))
rs("best3url")=trim(request.form("best3url"))
rs("best4")=trim(request.form("best4"))
rs("best4url")=trim(request.form("best4url"))
rs("best5")=trim(request.form("best5"))
rs("best5url")=trim(request.form("best5url"))

rs("zf1")=trim(request.form("zf1"))
rs("zf1url")=trim(request.form("zf1url"))
rs("zf2")=trim(request.form("zf2"))
rs("zf2url")=trim(request.form("zf2url"))
rs("zf3")=trim(request.form("zf3"))
rs("zf3url")=trim(request.form("zf3url"))

rs("bigpic")=trim(request.form("bigpic"))
rs("bigurl")=trim(request.form("bigurl"))
rs("bigpic2")=trim(request.form("bigpic2"))
rs("bigpic2url")=trim(request.form("bigpic2url"))
rs("bigpic3")=trim(request.form("bigpic3"))
rs("bigpic3url")=trim(request.form("bigpic3url"))

rs("top")=trim(request.form("top"))
rs("topurl")=trim(request.form("topurl"))
rs("ll0326")=trim(request.form("ll0326"))
rs("ll0326url")=trim(request.form("ll0326url"))
rs("bottom")=trim(request.form("bottom"))
rs("bottomurl")=trim(request.form("bottomurl"))
rs("left1")=trim(request.form("left1"))
rs("left1url")=trim(request.form("left1url"))
rs("left2")=trim(request.form("left2"))
rs("left2url")=trim(request.form("left2url"))
rs("left3")=trim(request.form("left3"))
rs("left3url")=trim(request.form("left3url"))
rs("zuo1")=trim(request.form("zuo1"))
rs("zuo1url")=trim(request.form("zuo1url"))
rs("zf2")=trim(request.form("zf2"))
rs("zf2url")=trim(request.form("zf2url"))
rs("zf3")=trim(request.form("zf3"))
rs("zf3url")=trim(request.form("zf3url"))
rs("zuo4")=trim(request.form("zuo4"))
rs("zuo4url")=trim(request.form("zuo4url"))

rs("verad")=trim(request.form("verad"))
rs("veradurl")=trim(request.form("veradurl"))
rs("ddad")=trim(request.form("ddad"))
rs("ddadurl")=trim(request.form("ddadurl"))
rs.update
rs.close
set rs=nothing
conn.close
set conn = nothing
response.write "<script language=javascript>alert('修改成功！');history.go(-1);</script>"
response.End
end if
%>
<style type="text/css">
<!--
body {
	margin-left: 0px;
	margin-top: 0px;
	margin-right: 0px;
	margin-bottom: 0px;
}
.STYLE4 {color: #000000;
	font-weight: bold;
}
.style4 {color: #FF0000}
-->
</style>
<table width="99%" border="5" align="center" cellpadding="5" cellspacing="5" bordercolor="#CCCCCC" bgcolor="#FFFFFF">
  <tr> 
    <td background="images/topbg.gif"><span class="STYLE4"><img src="images/pic5.gif" width="28" height="22" align="absmiddle" />您现在所在的位置是： <a href="adminhelp.asp">管理首页</a> -&gt; <span class="style4">广告管理</span></span></td>
  </tr>
  <tr> 
    <td height="200" valign="top" bgcolor="#FFFFFF"> 
	<form name="form1" method="post" action="b2b_cs.asp">
        <br>
        <table width="95%" border="2" align="center" cellpadding="1" cellspacing="1" bordercolor="#FFFFFF" bgcolor="#CCCCCC">
          <tr bgcolor="#F7F7F7"> 
            <td WIDTH="20%" height="25" align="center" background="images/topbg.gif"><strong>对应位置</strong></td>
            <td WIDTH="36%" height="25" align="center" background="images/topbg.gif" ><strong> 图片地址</strong></td>
            <td width="31%" height="25" align="center" background="images/topbg.gif"><strong> 图片链接(外部网址前面请加<font color="#FF0000">http://</font>)</strong></td>
            <td width="13%" height="25" align="center" background="images/topbg.gif"><strong>图片尺寸</strong></td>
          </tr>
		  <%set rs=server.CreateObject("adodb.recordset")