开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 行业应用 > 家庭/个人应用 > 查看源码
ads.asp
资源名称：qnmov30.rar　[点击查看]
上传用户：qyswxdl
上传日期：2013-06-01
资源大小：1373k
文件大小：3k
源码类别：

家庭/个人应用

开发平台：

ASP/ASPX

ads.asp：源码内容
  1. <!--#include file="articleconn.asp"-->
  2. <!--#include file="security.asp"-->
  4. <!--#include file="../checkpost.asp"-->
  5. <!--#include file="inc/function.asp"-->
  6. <%if session("flag")>1 then
  7.     response.write "<script>alert('您的操作权限不够！');history.back();</script>"
  8.     response.end
  9. end if
  10. %>
  12. <html>
  13. <head>
  14. <meta http-equiv="Content-Type" content="text/html; charset=gb2312">
  15. <title>广告管理</title>
  16. <link href="inc/Admin_STYLE.CSS" rel="stylesheet" type="text/css">
  17. <style type="text/css">
  18. <!--
  19. .样式1 {color: #000000}
  20. -->
  21. </style>
  22. </head>
  23. <%
  24. dim rs
  25. dim sql
  26. dim count
  27. set rs=server.createobject("adodb.recordset")
  28. sql = "select * from indexad"
  29. rs.open sql,conn,1,1
  30. %>
  31. <body>
  32. <p align="center">&nbsp;</p>
  33. <form method="POST" action="savead1.asp?action=add">
  34.   <div align="center"><br>
  35.     <table cellpadding="2" cellspacing="1" border="0" width="90%" class="border" align=center>
  36.       <tr align="center" bgcolor="#429AEF"> 
  37.         <td height=25 colspan=2 ><strong><font color="#FFFFFF">广告位管理</font></strong> 
  38.       <tr> 
  39.         <td width="24%"  class="tdbg" height=23><div align="center">首页广告：</div></td>
  40.         <td width="76%" class="tdbg"><font color="#00FFFF"><font color="#FFFFFF"> 
  41.           <textarea rows="4" name="upad" cols="50"><%=rs("upad")%></textarea>
  42.           </font></font></td>
  43.       </tr>
  44.       <tr> 
  45.         <td width="24%" class="tdbg" height=23><div align="center">播放页一号广告：</div></td>
  46.         <td width="76%" class="tdbg"><font color="#00FFFF"> 
  47.           <textarea rows="4" name="centerad" cols="50"><%=rs("centerad")%></textarea>
  48.         </font>          <span class="样式1"> 如不开广告插件默认为播放页广告
  49.           </span> </td>
  50.       </tr>
  51.       <tr> 
  52.         <td class="tdbg" height=23><div align="center">播放页二号广告：</div></td>
  53.         <td class="tdbg"><font color="#00FFFF"><font color="#FFFFFF"> 
  54.           <textarea rows="4" name="upad2" cols="50"><%=rs("upad2")%></textarea>
  55.           </font><font color="#00FFFF"><font color="#FFFFFF"></font></font></font></td>
  56.       </tr>
  57.       <tr> 
  58.         <td width="24%" class="tdbg" height=23><div align="center">播放页三号广告：</div></td>
  59.         <td width="76%" class="tdbg"><font color="#00FFFF"><font color="#FFFFFF"> 
  60.           <textarea rows="4" name="downad" cols="50"><%=rs("downad")%></textarea>
  61.           <font color="#00FFFF"></font></font></font></td>
  62.       </tr>
  63.     </table>
  64.     <br>
  65.     <font color="#00FFFF"> <br>
  66.     <input type="submit" name="cmdok" value="确 定">
  67.     　 
  68.     <input type="reset" name="Submit2" value="重 执" class="bt">
  69.     </font></div>
  70. </form>
  71. </body>
  72. <%
  73.  rs.close
  74. set rs = nothing
  75. conn.Close
  76. set conn = nothing
  77. %>
  78. </html>