📄 admin_advadd.asp
字号:
<%
Option Explicit
Response.buffer=true
const purviewlevel=3
%>
<!--#include file="admin_PurviewChe.asp" -->
<!--#include file="conn.asp" -->
<!--#include file="admin_Function.asp" -->
<%
dim rsadv,advadd,sitename,siteurl,siteintro,imgurl,imgwidth,imgheight,isflash,inpape,showsite,isnew
dim errmsg,successmsg
advadd=trim(request.form("advadd"))
if advadd="add" then
sitename=trim(request.form("sitename"))
siteurl=trim(request.form("siteurl"))
siteintro=trim(request.form("siteintro"))
imgurl=trim(request.form("imgurl"))
imgwidth=trim(request.form("imgwidth"))
imgheight=trim(request.form("imgheight"))
isflash=trim(request.form("isflash"))
inpape=trim(request.form("inpape"))
showsite=trim(request.form("showsite"))
isnew=trim(request.form("isnew"))
set rsadv=server.createobject("ADODB.Recordset")
rsadv.open"select * from advertisement where imgurl='"&imgurl&"'",conn,1,3
if rsadv.bof or rsadv.eof then
rsadv.addnew
rsadv("sitename")=sitename
rsadv("siteurl")=siteurl
rsadv("siteintro")=siteintro
rsadv("imgurl")=imgurl
rsadv("imgwidth")=imgwidth
rsadv("imgheight")=imgheight
rsadv("isflash")=isflash
rsadv("inpape")=inpape
rsadv("showsite")=showsite
if isnew="ok" then
rsadv("isnew")=true
else
rsadv("isnew")=false
end if
rsadv.update
rsadv.close
set rsadv=nothing
call closeconn()
successmsg=successmsg + "<br><br><li>添加成功！</li>"
successmsg=successmsg +"<br><br><li>你可以【<a href='admin_AdvAdd.asp'>继续添加</a>】</li>"
successmsg=successmsg +"<br><br><li>【<a href='admin_AdvMan.asp'>返回广告管理面板</a>】</li>"
call ShowSuccessMsg()
else
rsadv.close
set rsadv=nothing
call closeconn()
errmsg=errmsg + "<br><br><li>添加失败!</li>"
errmsg=errmsg + "<br><br><li>已有相同的广告！</li>"
errmsg=errmsg + "<br><br><li>你可以：【<a href='admin_AdvAdd.asp'>继续添加</a>】</li>"
errmsg=errmsg + "<br><br><li>【<a href='admin_AdvMan.asp'>返回广告管理面板</a>】</li>"
call ShowErrMsg()
end if
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>添加新广告</title>
<link href="Style.css" rel="stylesheet" type="text/css">
<script language=javascript>
function OpenWindow(url)
{
window.open(url,"_blank","height=200,width=350,top=180,left=200,titlebar=no,directories=no,status=no,toolbar=no,menubar=no,location=no,scrollbars=no");
}
function checkform()
{
if(document.form1.sitename.value=="")
{
alert("网站名称不能为空！");
return false;
}
if(document.form1.siteurl.value=="")
{
alert("链接地址不能为空！");
return false;
}
if(document.form1.siteintro.value=="")
{
alert("网站简介不能为空！");
return false;
}
if(document.form1.imgurl.value=="")
{
alert("广告地址不能为空！");
return false;
}
if(document.form1.imgwidth.value=="")
{
alert("广告宽度不能为空！");
return false;
}
if(document.form1.imgheight.value=="")
{
alert("广告高度不能为空！");
return false;
}
if(document.form1.isflash.value=="")
{
alert("广告类型不能为空！");
return false;
}
if(document.form1.showsite.value=="")
{
alert("广告显示位置不能为空！");
return false;
}
}
</script>
</head>
<body>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td align="center" class="txt1">欢迎添加新广告（带<span class="txt04">*</span>号必填）</td>
</tr>
<tr>
<td align="center" class="tbbgtitle">［<a href="admin_AdvMan.asp">返回广告管理面板</a>］</td>
</tr>
<tr>
<td><form name="form1" method="post" action="" onsubmit="return checkform();">
<table width="99%" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="F5F8F5" class="border">
<tr>
<td class="txt05">网站名称：
<input name="sitename" type="text" class="but" id="sitename" maxlength="50">
<span class="txt06">*</span></td>
</tr>
<tr>
<td class="txt05">链接地址：
<input name="siteurl" type="text" class="but" id="siteurl" size="60" maxlength="255">
<span class="txt06">*</span></td>
</tr>
<tr>
<td class="txt05">网站简介：
<input name="siteintro" type="text" class="but" id="siteintro" size="60" maxlength="255">
<span class="txt06">*</span></td>
</tr>
<tr>
<td class="txt05">广告地址：
<input name="imgurl" type="text" class="but" id="imgurl" size="40" maxlength="255">
<span class="txt06">*</span> ［<a href="#" onclick="OpenWindow('FlaUpload.asp');">广告上传</a>］（只能是swf、bmp、jpg、gif格式，否则不能正常显示）</td>
</tr>
<tr>
<td class="txt05">广告宽度：
<input name="imgwidth" type="text" class="but" id="imgwidth" size="6" maxlength="10">
<span class="txt06">*</span>广告高度：
<input name="imgheight" type="text" class="but" id="imgheight" size="6" maxlength="10">
<span class="txt06">*</span> </td>
</tr>
<tr>
<td class="txt05">广告类型：
<select name="isflash" class="but" id="select">
<option>请选择</option>
<option value="1">Flash动画</option>
<option value="2">图片</option>
</select>
<span class="txt06">*</span></td>
</tr>
<tr>
<td class="txt05">显示页面位置：
<select name="inpape" class="but" id="inpape">
<option value="1">首页</option>
<option value="2">论坛</option>
</select>
<span class="txt06">*</span></td>
</tr>
<tr>
<td class="txt05">广告显示的位置：
<select name="showsite" class="but" id="showsite">
<option>请选择广告显示的位置</option>
<option value="1">页面顶部</option>
<option value="2">页面开头</option>
<option value="3">页面中部</option>
<option value="4">页面底部</option>
<option value="5">弹出广告</option>
<option value="6">首页左侧</option>
<option value="7">首页右侧</option>
</select>
<span class="txt06">*</span> </td>
</tr>
<tr>
<td class="txt05">是否设为新广告：
<input name="isnew" type="checkbox" id="isnew2" value="ok" checked></td>
</tr>
<tr>
<td align="center" class="tbbgtitle"><input name="advadd" type="hidden" id="advadd" value="add"> <input name="Submit" type="submit" class="but" value="添加">
<input name="Submit2" type="reset" class="but" value="重置"></td>
</tr>
</table>
</form></td>
</tr>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -