⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 ads_add.asp

📁 使用Asp+Access+FSO+Jmail+Servu开发
💻 ASP
字号:
<!--#include file="admin.asp"-->
<%chk_admin_login(1)%>
<%
if request("action")="add" then
if Request.Form("adstype")="" then
Response.Write "<script>alert('请选择广告类型!');location.href='javascript:history.back()'</script>"
Response.end
end if
if Request.Form("picurl")="" then
Response.Write "<script>alert('请填写广告地址!');location.href='javascript:history.back()'</script>"
Response.end
end if
if Request.Form("page")="" then
Response.Write "<script>alert('广告所在位置不能为空!');location.href='javascript:history.back()'</script>"
Response.end
end if
if Request.Form("height")="" or Request.Form("width")="" then
Response.Write "<script>alert('请填写广告尺寸!');location.href='javascript:history.back()'</script>"
Response.end
end if
set rs=server.CreateObject("ADODB.Recordset")
sql="select * from ads"
rs.open sql,conn,1,3
rs.addnew
rs("type")=Request.Form("adstype")
rs("picurl")=Request.Form("picurl")
rs("intro")=Request.Form("intro")
rs("link")=Request.Form("link")
rs("page")=Request.Form("page")
rs("width")=Request.Form("width")
rs("height")=Request.Form("height")
rs("hits")=0
rs.update
rs.close
response.write "<script>alert('广告位添加成功!');location.href='ads_admin.asp'</script>"
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" type="text/css" href="../css/admin.css">
</head>
<body>
<table width="460" border="1" align="center" cellpadding="4" cellspacing="0" class="table-line">
  <form name="form1" method="post" action="?action=add">
    <tr align="center">
      <td colspan="2" class="td-title-color"><table  border="0" cellpadding="0" cellspacing="0">
          <tr>
            <td class="shadow">增加广告 </td>
          </tr>
        </table></td>
    </tr>
    <tr onmouseout="this.style.backgroundColor=''" onmouseover="this.style.backgroundColor='#BFDFFF'"> 
      <td width="81">广告类型:</td>
      <td width="362"> <select name="adstype">
          <option value="">请选择</option>
          <option value="pic">图片</option>
          <option value="flash">Flash</option>
      </select></td>
    </tr>
    <tr onmouseout="this.style.backgroundColor=''" onmouseover="this.style.backgroundColor='#BFDFFF'"> 
      <td width="81">图片网址:</td>
      <td width="362"> <font color="#ff6600"> 
        <input name="picurl" type="text" size="40">
      (gif包括jpg格式)</font></td>
    </tr>
    <tr onmouseout="this.style.backgroundColor=''" onmouseover="this.style.backgroundColor='#BFDFFF'"> 
      <td width="81">链接URL:</td>
      <td width="362"> <input  name="link" type=text value="http://" size="40"></td>
    </tr>
    <tr onmouseout="this.style.backgroundColor=''" onmouseover="this.style.backgroundColor='#BFDFFF'"> 
      <td width="81">简要说明:</td>
      <td width="362"> <input type=text name="intro" size="40"> 
      <font color="ff6600">(可不填)</font></td>
    </tr>
    <tr onmouseout="this.style.backgroundColor=''" onmouseover="this.style.backgroundColor='#BFDFFF'"> 
      <td width="81">广告位置:</td>
      <td width="362"> <select name="page">
          <option>选择广告位置</option>
          <option value="1">首页顶部Banner</option>
          <option value="2">首页通栏Banner</option>
          <option value="3">首页中间Banner</option>
          <option value="4">首页左侧LOGO</option>
          <option value="5">用户WEB管理页</option>
          <option value="6">首页右侧LOGO</option>
        </select> 
      注:同一位置显示多个广告采用随机显示 </td>
    </tr>
    <tr onmouseout="this.style.backgroundColor=''" onmouseover="this.style.backgroundColor='#BFDFFF'">
      <td>广告尺寸:</td>
      <td>高:
        <input name="height" type=text size="10"> 
        宽: 
        <input name="width" type=text size="10"> 
        单位:像素,只需填写数字 </td>
    </tr>
    <tr> 
      <td colspan="2" align="center"> <input name="submit" type="submit" value="增加">
          
        <input name="button" type="button" onclick="history.back()" value="返回"> 
      </td>
    </tr>
  </form>
</table>
</body>
</html>

⌨️ 快捷键说明

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