📄 admin_advertisement.asp
字号:
str += " width='" + Width + "'";
str += " height='" + Height + "'";
str += ">";
str += "<param name='movie' value='" + AdURL + "'>";
str += "<param name='wmode' value='Transparent'>";
str += "<param name='quality' value='autohigh'></object>";
str = "<embed ";
str += " name='AD_" + AdID + "' id='AD_" + AdID + "'";
str += " width='" + Width + "'";
str += " height='" + Height + "'";
str += " src='" + AdURL + "'";
str += " quality='autohigh'"
str += " pluginspage='http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash' type='application/x-shockwave-flash'></embed>";
str += "</object>";
} else if(AdType == 0) {
str += "<img ";
str += " name='AD_" + AdID + "' id='AD_" + AdID + "'";
str += " src='" + AdURL + "'";
str += " width='" + Width + "'";
str += " height='" + Height + "'";
str += " border='0'>";
}
return str;
}
</script>
<div id="AdPreview" style="position:absolute; visibility:hidden;width:200px;height:115px;z-index:1024; border:1px solid blue;"></div>
<table width="100%" border="0" cellspacing="1" cellpadding="0">
<tr>
<td><%=CurrentPath%></td>
</tr>
</table>
<form name="myform" action="Admin_Advertisement.asp" method="post">
<table width="100%" border="0" cellpadding="0" cellspacing="1" class="Border">
<tr>
<td width="4%" align="center" nowrap class="top_item"><strong>选择</strong></td>
<td width="4%" align="center" class="top_item"><strong>ID</strong></td>
<td width="19%" align="center" class="top_item"><strong>版位</strong></td>
<td width="33%" align="center" class="top_item"><strong>广告名称</strong></td>
<td width="6%" align="center" nowrap class="top_item"><strong>广告类型</strong></td>
<td width="5%" align="center" nowrap class="top_item"><strong>权重</strong></td>
<td width="5%" align="center" nowrap class="top_item"><strong>点击</strong></td>
<td width="5%" align="center" nowrap class="top_item"><strong>审核</strong></td>
<td width="19%" align="center" class="top_item"><strong>相关操作</strong></td>
</tr>
<%
If RowCount = 0 Then
Response.Write "<tr><td class='td_50' colspan=9 align=center>没有任何广告</td></tr>"
Else
Dim i
rsAd.Open()
For i = 1 To RowCount
%>
<tr class="td_25" onMouseOut="this.className='td_25'" onMouseOver="this.className='MouseOver_25'">
<td align="center"><input name="CheckObject" type="checkbox" id="CheckObject" value="<%=rsAd("AdID")%>"></td>
<td align="center"><%=rsAd("AdID")%></td>
<td align="center"><a href="<%=EL_CurrentScriptName%>?Action=AdList&ZoneID=<%=rsAd("ZoneID")%>"><%=rsAd("ZoneName")%></a></td>
<td style="padding-left:3px;"><%=rsAd("AdName")%></td>
<td align="center"><%=ArrAdType(rsAd("AdType"))%></td>
<td align="center"><%=rsAd("AdRight")%></td>
<td align="center"><%=rsAd("Hits")%></td>
<td align="center"><%=EL_Common.ShowBoolean(rsAd("Passed").value, "<strong>√</strong>", "<strong class=redtext>×</strong>")%></td>
<td align="center" nowrap>
<a href="<%=EL_CurrentScriptName%>?Action=ModifyAd&AdID=<%=rsAd("AdID")%>">修改</a> |
<a href="<%=EL_CurrentScriptName%>?Action=DeleteAd&AdID=<%=rsAd("AdID")%>">删除</a> |
<% If rsAd("Passed") Then %>
<a href="<%=EL_CurrentScriptName%>?Action=SetPassed&AdID=<%=rsAd("AdID")%>&SetValue=<%=EL_False%>">取消审核</a> |
<% Else %>
<a href="<%=EL_CurrentScriptName%>?Action=SetPassed&AdID=<%=rsAd("AdID")%>&SetValue=<%=EL_True%>">通过审核</a> |
<% End If %>
<a href="#" onClick="return false" onMouseOut="HidePreviewer();" onMouseOver="AdPreview(<%=rsAd("AdID")%>, '<%=rsAd("AdFileURL")%>', <%=rsAd("AdType")%>, <%=rsAd("AdWidth")%>, <%=rsAd("AdHeight")%>);">预览</a></td>
</tr>
<%
If i<RowCount Then rsAd.MoveNext
Next
rsAd.Close()
End If
%>
</table>
<table width="100%" border="0" cellspacing="1" cellpadding="0">
<tr>
<td width="12%"><span id="myselect">[<a href="javascript:CheckedAll()">全选</a>]</span></td>
<td width="88%" align="right" nowrap><%Call EL_Common.ShowPage("Action=AdList&ZoneID="& ZoneID , CurrentPage, PageSizes, PageCounts, TotalRowCount, "广告", "个")%></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="1" cellpadding="0">
<tr>
<td height="50" align="center"><input type="button" name="Submit6" value="删除选定广告" onClick="doDelete()">
<input type="button" name="Submit62" value="通过审核选定广告" onClick="doSetPassedTrue()">
<input type="button" name="Submit622" value="取消审核选定广告" onClick="doSetPassedFalse()">
</td>
</tr>
</table>
</form>
<form name="search" method="get" action="<%=EL_CurrentScriptName%>">
<table width="100%" border="0" cellpadding="0" cellspacing="1" class="Border">
<tr>
<td width="8%" nowrap class="td_50">广告搜索：</td>
<td width="92%" class="td_50">
<select name="Search_Field" id="Search_Field">
<option value="AdName">广告名称</option>
</select>
<input name="Search_Keywords" type="text" id="Search_Keywords" value="关键字">
<input type="submit" name="Submit3" value="搜索">
<input name="Action" type="hidden" id="Action" value="AdList">
</td>
</tr>
</table>
</form>
<%
Set rsAd = Nothing
Set ManageCmd = Nothing
EL_Common.ShowScriptError()
End Sub
Sub AddAd()
On Error Resume Next
Dim ZoneID
ZoneID = EL_Common.ELRequest("ZoneID", 2)
%>
<script language="javascript">
function AddPicture(strFileName){
var arrName = strFileName.split('.');
var FileExt = arrName[1];
if (FileExt == 'gif' || FileExt == 'jpg' || FileExt == 'jpeg' || FileExt == 'jpe' || FileExt == 'bmp' || FileExt == 'png'){
if(strFileName.indexOf('$$$')>-1){
var arr = strFileName.split('$$$')
document.myform.ImageURL.value = '<%=InstallDir & GetAdDir() &"/Uploadfiles/"%>'+arr[0];
}else{
document.myform.ImageURL.value = '<%=InstallDir & GetAdDir() &"/Uploadfiles/"%>'+strFileName;
}
}
}
function AddFlash(strFileName){
var arrName = strFileName.split('.');
var FileExt = arrName[1];
if (FileExt == 'swf'){
document.myform.FlashURL.value = '<%=InstallDir & GetAdDir() &"/Uploadfiles/"%>'+strFileName;
}
}
function onAdType(value){
for(var i=0;i<2;i++){
getObject("AdType"+ i).style.display = "none";
}
getObject("AdType"+ value).style.display = "";
}
function onAdURLChange(str){
if(str.indexOf(".swf")>-1){
onAdType(1);
getObject("FlashURL").value = str;
document.myform.AdType[1].checked = true;
}else{
onAdType(0);
getObject("ImageURL").value = str;
document.myform.AdType[0].checked = true;
}
}
function Check(frm){
if(frm.AdName.value.trim()==""){
alert("请输入广告名称");
frm.AdName.focus();
return false;
}
if(frm.AdType[0].checked){
if(frm.ImageURL.value.trim()==""){
alert("请输入图片地址");
frm.ImageURL.focus();
return false;
}
var FileExt = frm.ImageURL.value.split(".")[1].toLowerCase();
if(FileExt != 'gif' && FileExt != 'jpg' && FileExt != 'jpeg' && FileExt != 'jpe' && FileExt != 'bmp' && FileExt != 'png'){
alert("图片格式不正确");
frm.ImageURL.focus();
return false;
}
if(frm.ImageWidth.value.trim()==""){
alert("请输入图片宽度");
frm.ImageWidth.focus();
return false;
}
if(frm.ImageHeight.value.trim()==""){
alert("请输入图片高度");
frm.ImageHeight.focus();
return false;
}
}else{
if(frm.FlashURL.value.trim()==""){
alert("请输入动画地址");
frm.FlashURL.focus();
return false;
}
var FileExt = frm.FlashURL.value.split(".")[1].toLowerCase();
if(FileExt != 'swf'){
alert("动画格式不正确");
frm.FlashURL.focus();
return false;
}
if(frm.FlashWidth.value.trim()==""){
alert("请输入动画宽度");
frm.FlashWidth.focus();
return false;
}
if(frm.FlashHeight.value.trim()==""){
alert("请输入动画高度");
frm.FlashHeight.focus();
return false;
}
}
if(frm.AdRight.value.trim()==""){
alert("请输入广告权重");
frm.AdRight.focus();
return false;
}
SubmitOnce(frm);
return;
}
</script>
<form name="myform" action="Admin_Advertisement.asp" method="post" onSubmit="return Check(this)">
<table width="100%" border="0" cellpadding="0" cellspacing="1" class="Border">
<tr>
<td colspan="2" class="top_25"><strong>添加广告</strong></td>
</tr>
<tr>
<td width="17%" class="td_ItemName"><strong>所属版位</strong></td>
<td width="83%" class="td_25">
<select name="ZoneID" id="ZoneID">
<%=EL_Common.Data2Options("EL_Zone", "ZoneID", "ZoneName", ZoneID, "1=1")%>
</select> </td>
</tr>
<tr>
<td class="td_ItemName"><strong>广告名称</strong></td>
<td class="td_25"><input name="AdName" type="text" id="AdName" size="50"></td>
</tr>
<tr>
<td class="td_ItemName"><strong>广告类型</strong></td>
<td class="td_25"><input name="AdType" type="radio" class="nomargin" value="0" checked onClick="onAdType(this.value)">
图片
<input name="AdType" type="radio" class="nomargin" value="1" onClick="onAdType(this.value)">
动画</td>
</tr>
<tr>
<td class="td_ItemName"><strong>广告内容设置</strong></td>
<td class="td_25">
<table id="AdType0" width="100%" border="0" cellpadding="0" cellspacing="1" bgcolor="#FFFFFF">
<tr>
<td colspan="2" align="center" class="td_ItemName"><strong>图片设置</strong></td>
</tr>
<tr>
<td width="10%" nowrap class="td_ItemName"><strong>图片地址</strong></td>
<td width="90%" class="td_25"><input name="ImageURL" type="text" id="ImageURL" size="60" onChange="onAdURLChange(this.value)"></td>
</tr>
<tr>
<td nowrap class="td_ItemName"><strong class="BlueText">上传图片</strong></td>
<td class="td_25">
<iframe id="UploadImage" src="Admin_Upload.asp?DialogType=pic&ChannelID=<%=EL_Channel.ChannelID%>&EventName=AddPicture&Opt=Ad" frameborder="0" scrolling="no" width="100%" height="50" allowtransparency="true"></iframe> </td>
</tr>
<tr>
<td nowrap class="td_ItemName"><strong>图片尺寸</strong></td>
<td class="td_25"><table width="100%" border="0" cellspacing="1" cellpadding="0">
<tr>
<td width="5%" nowrap class="td_ItemName">宽度：</td>
<td width="8%"><input name="ImageWidth" type="text" id="ImageWidth" size="10"></td>
<td width="8%" align="right" nowrap class="td_ItemName">高度：</td>
<td width="79%"><input name="ImageHeight" type="text" id="ImageHeight" size="10"></td>
</tr>
</table></td>
</tr>
<tr>
<td nowrap class="td_ItemName"><strong>链接地址</strong></td>
<td class="td_25"><input name="LinkURL" type="text" id="LinkURL" value="http://" size="60"></td>
</tr>
<tr>
<td nowrap class="td_ItemName"><strong>链接提示</strong></td>
<td class="td_25"><input name="LinkTitle" type="text" id="LinkTitle" size="60"></td>
</tr>
<tr>
<td nowrap class="td_ItemName"><strong>打开方式</strong></td>
<td class="td_25"><input name="OpenType" type="radio" class="nomargin" value="0">
原窗口
<input name="OpenType" type="radio" class="nomargin" value="1" checked>
新窗口</td>
</tr>
</table>
<table id="AdType1" style="display:none" width="100%" border="0" cellpadding="0" cellspacing="1" bgcolor="#FFFFFF">
<tr>
<td colspan="2" align="center" class="td_ItemName"><strong>动画设置</strong></td>
</tr>
<tr>
<td width="10%" nowrap class="td_ItemName"><strong>动画地址</strong></td>
<td width="90%" class="td_25"><input name="FlashURL" type="text" id="FlashURL" size="60" onChange="onAdURLChange(this.value)"></td>
</tr>
<tr>
<td nowrap class="td_ItemName"><strong class="BlueText">上传动画</strong></td>
<td class="td_25"><iframe id="Uploadflash" src="Admin_Upload.asp?DialogType=flash&ChannelID=<%=EL_Channel.ChannelID%>&EventName=AddFlash&Opt=Ad" frameborder="0" scrolling="no" width="100%" height="50" allowtransparency="true"></iframe></td>
</tr>
<tr>
<td nowrap class="td_ItemName"><strong>动画尺寸</strong></td>
<td class="td_25"><table width="100%" border="0" cellspacing="1" cellpadding="0">
<tr>
<td width="5%" nowrap class="td_ItemName">宽度：</td>
<td width="8%"><input name="FlashWidth" type="text" id="FlashWidth" size="10"></td>
<td width="8%" align="right" nowrap class="td_ItemName">高度：</td>
<td width="79%"><input name="FlashHeight" type="text" id="FlashHeight" size="10"></td>
</tr>
</table></td>
</tr>
<tr>
<td nowrap class="td_ItemName"><strong>背景透明</strong></td>
<td class="td_25"><INPUT name="FlashWmode" type="radio" class="nomargin" value="<%=EL_True%>" checked>
透明
<INPUT name="FlashWmode" type="radio" class="nomargin" value="<%=EL_False%>">
不透明 </td>
</tr>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -