ad.asp

时代购物系统 4.0功能升级说明 <1>完善了3.0的VIP

<!--#include file="conn.asp"-->
<%
if session("admin")="" then
response.Write "<script language='javascript'>alert('请先登录！');history.go(-1);</script>"
response.End
else
if session("rank")>1 then
response.Write "<div align=center><font size=5 color=red><b>你的权限不够！</b></font></div>"
response.End
end if
end if

if request.QueryString("action")="save" then
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from ad",conn,1,3
rs("bigpic")=trim(request.form("bigpic"))
rs("bigurl")=trim(request.form("bigurl"))
rs("top")=trim(request.form("top"))
rs("topurl")=trim(request.form("topurl"))
rs("middle")=trim(request.form("middle"))
rs("middleurl")=trim(request.form("middleurl"))
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("zuo2")=trim(request.form("zuo2"))
rs("zuo2url")=trim(request.form("zuo2url"))
rs("zuo3")=trim(request.form("zuo3"))
rs("zuo3url")=trim(request.form("zuo3url"))
rs("zuo4")=trim(request.form("zuo4"))
rs("zuo4url")=trim(request.form("zuo4url"))
rs("right1")=trim(request.form("right1"))
rs("right1url")=trim(request.form("right1url"))
rs("right2")=trim(request.form("right2"))
rs("right2url")=trim(request.form("right2url"))
rs("right3")=trim(request.form("right3"))
rs("right3url")=trim(request.form("right3url"))
rs.update
rs.close
set rs=nothing
response.write "<script language=javascript>alert('修改成功！');history.go(-1);</script>"
response.End
end if
%>
<title>广告设置</title>
<table width="98%" border="0" align="center" cellpadding="1" cellspacing="1" bgcolor="#6699cc">
  <tr> 
    <td align="center"><font color="#FFFFFF">网站广告设置</font></td>
  </tr>
  <tr> 
    <td height="200" valign="top" bgcolor="#FFFFFF"> 
	<form name="form1" method="post" action="ad.asp?action=save">
        <table width="95%" border="0" align="center" cellpadding="1" cellspacing="1" bgcolor="#CCCCCC">
          <tr bgcolor="#FFFFFF"> 
            <td WIDTH="20%"></td>
            <td WIDTH="40%" > 图片地址</td>
            <td> 图片广告链接</td>
          </tr>
          <tr> 
            <td colspan="3" bgcolor="#FFFFFF"><strong>网站首页广告设置</strong>：</td>
          </tr>
		  <%set rs=server.CreateObject("adodb.recordset")
rs.open "select * from ad",conn,1,1%> 
          <tr> 
            <td bgcolor="#FFFFFF">首页大广告：</td>
            <td bgcolor="#FFFFFF"><input name="bigpic" type="text" id="bigpic" size="28" value=<%=trim(rs("bigpic"))%>></td>
            <td bgcolor="#FFFFFF"><INPUT NAME="bigurl" TYPE="text" ID="bigurl" SIZE="28" VALUE="<% = rs("bigurl") %>"></td>
          </tr>
          <tr bgcolor="#FFFFFF"> 
            <td>中间上部：</td>
            <td> <input name="top" type="text" id="top" size="28" value=<%=trim(rs("top"))%>> 
            </td>
            <td> <input name="topurl" type="text" id="topurl" size="28" value=<%=trim(rs("topurl"))%>> 
            </td>
          </tr>
          <tr bgcolor="#FFFFFF"> 
            <td>中间中部：</td>
            <td> <input name="middle" type="text" id="middle" size="28" value=<%=trim(rs("middle"))%>> 
            </td>
            <td> <input name="middleurl" type="text" id="middleurl" size="28" value=<%=trim(rs("middleurl"))%>> 
            </td>
          </tr>
          <tr bgcolor="#FFFFFF"> 
            <td>中间下部：</td>
            <td> <input name="bottom" type="text" id="bottom" size="28" value=<%=trim(rs("bottom"))%>> 
            </td>
            <td><input name="bottomurl" type="text" id="bottomurl" size="28" value=<%=trim(rs("bottomurl"))%>> 
            </td>
          </tr>
          <tr bgcolor="#FFFFFF"> 
            <td>首页左上：</td>
            <td><input name="left1" type="text" id="left1" size="28" value=<%=trim(rs("left1"))%>></td>
            <td><input name="left1url" type="text" id="left1url" size="28" value=<%=trim(rs("left1url"))%>></td>
          </tr>
          <tr bgcolor="#FFFFFF"> 
            <td>首页左中：</td>
            <td><input name="left2" type="text" id="left2" size="28" value=<%=trim(rs("left2"))%>></td>
            <td><input name="left2url" type="text" id="left2url" size="28" value=<%=trim(rs("left2url"))%>></td>
          </tr>
          <tr bgcolor="#FFFFFF"> 
            <td>首页左下：</td>
            <td><input name="left3" type="text" id="left3" size="28" value=<%=trim(rs("left3"))%>></td>
            <td><INPUT NAME="left3url" TYPE="text" ID="left3url" SIZE="28" VALUE=<%=trim(rs("left3url"))%>></td>
          </tr>
          <tr bgcolor="#FFFFFF"> 
            <td>首页右上：</td>
            <td><input name="right1" type="text" id="right1" size="28" value=<%=trim(rs("right1"))%>></td>
            <td><input name="right1url" type="text" id="right1url" size="28" value=<%=trim(rs("right1url"))%>></td>
          </tr>
          <tr bgcolor="#FFFFFF"> 
            <td>首页右中：</td>
            <td><input name="right2" type="text" id="right2" size="28" value=<%=trim(rs("right2"))%>></td>
            <td><input name="right2url" type="text" id="right2url" size="28" value=<%=trim(rs("right2url"))%>></td>
          </tr>
          <tr bgcolor="#FFFFFF"> 
            <td>首页右下：</td>
            <td><input name="right3" type="text" id="right3" size="28" value=<%=trim(rs("right3"))%>></td>
            <td><input name="right3url" type="text" id="right3url" size="28" value=<%=trim(rs("right3url"))%>></td>
          </tr>
          <tr bgcolor="#FFFFFF"> 
            <td colspan="3"><strong>分类页面广告设置</strong>：</td>
          </tr>
          <tr bgcolor="#FFFFFF"> 
            <td>页面左侧1：</td>
            <td><input name="zuo1" type="text" id="zuo1" size="28" value=<%=trim(rs("zuo1"))%>></td>
            <td><input name="zuo1url" type="text" id="zuo1url" size="28" value=<%=trim(rs("zuo1url"))%>></td>
          </tr>
          <tr bgcolor="#FFFFFF"> 
            <td>页面左侧2：</td>
            <td><input name="zuo2" type="text" id="zuo2" size="28" value=<%=trim(rs("zuo2"))%>></td>
            <td><input name="zuo2url" type="text" id="zuo2url" size="28" value=<%=trim(rs("zuo2url"))%>></td>
          </tr>
          <tr bgcolor="#FFFFFF"> 
            <td>页面左侧3：</td>
            <td><input name="zuo3" type="text" id="zuo3" size="28" value=<%=trim(rs("zuo3"))%>></td>
            <td><input name="zuo3url" type="text" id="zuo3url" size="28" value=<%=trim(rs("zuo3url"))%>></td>
          </tr>
          <tr bgcolor="#FFFFFF"> 
            <td>页面左侧4：</td>
            <td><input name="zuo4" type="text" id="zuo4" size="28" value=<%=trim(rs("zuo4"))%>></td>
            <td><input name="zuo4url" type="text" id="zuo4url" size="28" value=<%=trim(rs("zuo4url"))%>></td>
          </tr>
          <tr bgcolor="#FFFFFF" align="center"> 
            <td height="32" colspan="3"> <input type="submit" name="Submit" value="提交更改"></td>
          </tr>
        </table>
      </form></td>
  </tr>
</table>
<!--#include file="footer.asp"-->