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

📄 show_banner.asp

📁 是一个关于小学信息化教育的平台,提供了学校论坛,和聊天室功能!
💻 ASP
字号:
<!--#include file="../../include/db.asp"-->
<!--#include file="../../include/admin_check.asp"-->
<!--#include file="power.asp"-->
<%
Set conn = OpenOrGet_Database("sql_conn")
%>
<html>
<head>
<title>深圳育才一小欢迎您!</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="/include/page.css" type="text/css">
<LINK href="/Include/DatePicker.css" rel=stylesheet type=text/css>
<SCRIPT language=javascript src="/include/DateObject.js"></SCRIPT>
<SCRIPT language=javascript src="/include/DatePicker.js"></SCRIPT>
<SCRIPT language=javascript src="/include/editlib.js"></SCRIPT>
</head>

<body >
<table width="1" border="0" cellspacing="0" cellpadding="0" align="center">
  <tr> 
    <td> 
      <table width="753" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td><!--#include file="../../include/admin_banner.inc"--></td>
        </tr>
        <tr> 
          <td> 
            <table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td width="1%">&nbsp;</td>
                <td width="99%"> 
                  <table width="100%" border="0" cellspacing="0" cellpadding="0">
                    <tr> 
                      <td id="td1">&nbsp;</td>
                    </tr>
                    <tr> 
                      <td> 
                        <table width="100%" border="0" cellspacing="0" cellpadding="0">
                          <tr> 
                            <td width="21%" valign="top"><!--#include file="../../include/admin_left.inc"--></td>
                            <td width="2%" valign="top">&nbsp;</td>
                            <td width="77%" height=1 valign="top">
                              <table width="97%" border="0" cellspacing="0" cellpadding="0">
                                <tr> 
                                  <td> 
                                    <table width="100%" border="0" cellspacing="0" cellpadding="0">
                                      <tr valign="top"> 
                                        <td background="/images/middle/m-bg.gif" width="70"> 
                                          <table width="100%" border="0" cellspacing="0" cellpadding="0">
                                            <tr> 
                                              <td> 
                                                <table width="100%" border="0" cellspacing="0" cellpadding="0">
                                                  <tr> 
                                                    <td><img src="/images/border/A01.gif" width="12" height="19"></td>
                                                    <td nowrap style="background-image: url('/images/border/A_bg1.gif');padding-top:3px;font-size:12px;" valign="middle"> 
                                                      首页友情链接</td>
                                                    <td><img src="/images/border/A02.gif" width="18" height="19"></td>
                                                  </tr>
                                                </table>
                                              </td>
                                            </tr>
                                            <tr> 
                                              <td><img src="/images/border/01.gif" width="2" height="19"></td>
                                            </tr>
                                          </table>
                                        </td>
                                        <td background="/images/border/Bg1.gif"  align="right"><img src="/images/border/02.gif" width="3" height="38"></td>
                                        <td width="6" align="right"><img src="/images/border/04.gif" width="16" height="38"></td>
                                      </tr>
                                    </table>
                                    <table width="100%" border="0" cellspacing="0" cellpadding="0">
                                      <tr> 
                                        <td class="bg-left" width="6"><img src="/images/left/l-l.gif" border=0></td>
                                        <td width="100%" class="newsborder" valign="top">
                                          <table border="0" cellspacing="2" cellpadding="2" width="90%" align="center">
                                            <tr align="center"> 
                                              <td width="7%">序号</td>
                                              <td width="75%">广告条</td>
                                              <td width="8%">修改</td>
                                              <td width="10%">删除</td>
                                              <td width="10%">状态</td>
                                            </tr>
                                            <%
											SelectSql = "Select * from banner order by ban_src desc"
											Set Rs = Open_Rs(conn,SelectSql)
											id=1
											Do While Not Rs.Eof
											if InStr(Rs("ban_src"),".swf") Then
											%>
                                            <tr> 
                                              <td width="7%" align="center"><%=id%></td>
                                              <td width="75%" align="center"> 
                                                <object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://active.macromedia.com/flash2/cabs/swflash.cab#version=4,0,0,0" id=Movie1 width=<%=rs("ban_width")%> height=<%=rs("ban_height")%>>
                                                  <param name=movie value="<%=rs("ban_src")%>">
                                                  <param name=quality value=high>
                                                  <embed src=http://ad4.sina.com.cn/btn/cechp.swf quality=high bgcolor=#FFFFFF  width=<%=rs("ban_width")%> height=<%=rs("ban_height")%> type="application/x-shockwave-flash" 
											pluginspage="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash">
                                                  </embed> 
                                                </object> </td>
                                              <td width="8%" align="center"><a href="Modi_banner.asp?act=mo&id=<%=rs("id")%>"><img src="/images/edit.gif" width="15" height="15" border=0></a></td>
                                              <td width="10%" align="center"><a href="del_banner.asp?act=del&id=<%=rs("id")%>"><img src="/images/delete.gif" width="15" height="15" border=0></a></td>
                                              <td width="10%" align="center">
											  <%
											  If rs("ban_use") = true Then
											  Response.write "使用中"
											  Else
											  Response.write "<a href='del_banner.asp?act=use&id="&rs("id")&"'><img src='/images/touse.gif' width=16 height=16 border=0></a>"
											  End If
											  %>
											  </td>
                                            </tr>
                                            <%Else%>
                                            <tr> 
                                              <td width="7%" align="center"><%=id%></td>
                                              <td width="75%" align="center"> 
                                                <%
If Rs("ban_href") = "" or IsNull("ban_href") Then
Response.write "<img src='" & Rs("ban_src") & "' border=0 alt='"& Rs("ban_name") & "' width="&rs("ban_width")&" height="&rs("ban_height")&">"
Else
Response.write "<a href='"&Rs("ban_href")&"' target='"&Rs("ban_target")&"'><img src='" & Rs("ban_src") & "' border=0 alt='"& Rs("ban_name") & "' width="&rs("ban_width")&" height="&rs("ban_height")&"></a>"
End If
%>
                                              </td>
                                              <td width="8%" align="center"><a href="Modi_banner.asp?act=mo&id=<%=rs("id")%>"><img src="/images/edit.gif" width="15" height="15" border=0></a></td>
                                              <td width="10%" align="center"><a href="del_banner.asp?act=del&id=<%=rs("id")%>"><img src="/images/delete.gif" width="15" height="15" border=0></a></td>
                                              <td width="10%" align="center">
                                                <%
											  If rs("ban_use") = true Then
											  Response.write "使用中"
											  Else
											  Response.write "<a href='del_banner.asp?act=use&id="&rs("id")&"'><img src='/images/touse.gif' width=16 height=16 border=0></a>"
											  End If
											  %>
                                              </td>
                                            </tr>
                                            <%
											End IF
											id = id + 1
											Rs.MoveNext
											Loop
											%>
                                          </table>
                                          <table border="0" cellspacing="3" cellpadding="2" align="center">
                                            <tr align="center"> 
                                              <td> 
                                                <table width="40" border="0" cellspacing="0" cellpadding="0">
                                                  <tr> 
                                                    <td width="5"><img src="/images/left/s-l.gif" width="5" height="19"></td>
                                                    <td background="/images/left/s-bg.gif" nowrap>&nbsp;<a href="add_banner.asp">新增</a>&nbsp; 
                                                    </td>
                                                    <td align="right" width="5"><img src="/images/left/s-r.gif" width="5" height="19"></td>
                                                  </tr>
                                                </table>
                                              </td>
                                              <td>
                                                <table width="40" border="0" cellspacing="0" cellpadding="0">
                                                  <tr> 
                                                    <td width="5"><img src="/images/left/s-l.gif" width="5" height="19"></td>
                                                    <td background="/images/left/s-bg.gif" nowrap>&nbsp;<a href="javascript:history.back();">返回</a>&nbsp;</td>
                                                    <td align="right" width="5"><img src="/images/left/s-r.gif" width="5" height="19"></td>
                                                  </tr>
                                                </table>
                                              </td>
                                            </tr>
                                          </table>
                                        </td>
                                        <td class="bg_right" width="6"><img src="/images/left/l-r.gif" border=0></td>
                                      </tr>
                                    </table>
                                    <table width="100%" border="0" cellspacing="0" cellpadding="0">
                                      <tr valign="top" class="Border-a"> 
                                        <td width="6"><img src="/images/border/05.gif" width="13" height="8"></td>
                                        <td width="100%" align="right"></td>
                                        <td align="right" width="6"><img src="/images/border/06.gif" width="12" height="8"></td>
                                      </tr>
                                    </table>
                                  </td>
                                </tr>
                              </table>
                            </td>
                          </tr>
                        </table>
                      </td>
                    </tr>
                    <tr> 
                      <td height="13">&nbsp;</td>
                    </tr>
                    <tr> 
                      <td><!--#include file="../../include/dot.inc"--></td>
                    </tr>
                    <tr> 
                      <td>&nbsp;</td>
                    </tr>
                  </table>
                </td>
              </tr>
            </table>
          </td>
        </tr>
      </table>
    </td>
  </tr>
</table>
</body>
</html>
     <SCRIPT language=javascript>
<!--
function checkform()
{ 
	var Checkblank = /^(\s*|(\ )|(\.))*$/;
	if (Checkblank.test(form.username.value))	 	 
{
          alert("用户名不能为空!");
	  return false;	
         } 
	if (Checkblank.test(form.userpass.value))	 	 
{
          alert("密码不能为空!");
	  return false;	
         } 

      window.form.submit();

   }
   function submitdel()
{
  var flag=false;
  if (isNaN(dataform.select_del.length)&&(!(dataform.select_del.checked))){
  flag=false;}
  else if(!(isNaN(dataform.select_del.length))){

  for (var i=0;i<dataform.select_del.length;i++){
    if (dataform.select_del[i].checked==true) flag=true;
  }}
  else{
  flag=true;
  }

  if ((flag==false)) {alert ('请选择需要删除的项目!');return false;}
  		
  if (!(confirm("您是否确定删除选定的记录?")))
  {
    if (isNaN(dataform.select_del.length)) {dataform.select_del.checked=false;return false;}
    for (var i=0;i<dataform.select_del.length;i++) dataform.select_del[i].checked=false;
    return false
  }  
  window.dataform.submit();  
}
function openwin(filename)
{
	//alert(filename);
	window.open(filename,"","location=0,menubar=1,left=0,width=700,height=500,");
	return;
}

//-->

</SCRIPT>

⌨️ 快捷键说明

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