📄 ad.asp

📁 廣告聯盟系統,發布廣告信息,很不錯的一款

💻 ASP

字号:

<%

set cn=server.createobject("adodb.connection")
pat=server.mappath("../data/union.mdb")
cn.open "provider=microsoft.jet.oledb.4.0; data source="&pat&";jet oledb:database"
set rs=server.CreateObject("AdODb.Recordset")
 sql="select * from jifei "
 rs.open sql,cn,3,3,adcmdtext
%>
<HTML>
<HEAD>
<TITLE>广告网 后台</TITLE> <META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=gb2312"> 
<LINK REL="stylesheet" HREF="../images/style.css" TYPE="text/css">
<style type="text/css">
<!--
.样式1 {
	font-size: 9pt;
	font-weight: bold;
}
-->
</style>
</HEAD>

<BODY BGCOLOR="#eeeeee" LEFTMARGIN="0" TOPMARGIN="0" MARGINWIDTH="0" MARGINHEIGHT="0">
<TABLE WIDTH="760" BORDER="0" CELLSPACING="0" CELLPADDING="0" ALIGN="CENTER" BGCOLOR="#eeeeee" HEIGHT="300">
  <TR>
    <TD BACKGROUND="images/dots.gif" ROWSPAN="2" WIDTH="4"><IMG SRC="images/dots.gif" WIDTH="4" HEIGHT="4"></TD>
    <TD VALIGN="TOP" ALIGN="RIGHT" HEIGHT="2">&nbsp;
    </TD>
  </TR>
  <TR>
    <TD HEIGHT="4">&nbsp;
    </TD>
  </TR>
  <TR>
    <TD BACKGROUND="images/dots.gif" WIDTH="4">&nbsp;</TD>
    <TD VALIGN="TOP">
      <p>&nbsp;</p>
      <p align="center" class="样式1">客户点击统计</p>
      <p>&nbsp;</p>
	  <% for i= 1 to 4 %>
      <p align="center"><%=rs(1)%> 广告共被点击<span class="样式1"><font color="#FF0000"><%=rs(2)%></font></span>次<span class="p9">,有效电击<span class="样式1"><font color="#FF0000"><%=rs(4)%></font></span>次，显示<span class="样式1"><font color="#FF0000"><%=rs(3)%></font></span></span>）<a href="ql.asp?id=<%=rs(0)%>">数据清零</a><br>
        <%
		rs.movenext
		if rs.eof then
		exit for
		end if 
		next
		rs.close
		cn.close
		set rs=nothing: set cn=nothing
		%>
      <p align="center">&nbsp;</p>
      <p align="center">&nbsp; </p>
      <p align="center"><font size="4"><b></b></font></p>
      <p>&nbsp;</p>
      <p>&nbsp;</p>
      <p><span class="p9">&nbsp; </span></p>
    </TD>
  </TR>
</TABLE>
</BODY>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -