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

📄 votelist.asp

📁 XXX档案美女图片站适合给图片广告的站长下载使用
💻 ASP
字号:
<!--#include file="const.asp"-->
<!--#include file="connv.asp"-->
<!--#include file="session.asp"-->
<%if session("userkey")<>4 then%>
<script language=javascript>  
alert( "错误:您无权进行版面管理!"  );
location.href = "javascript:history.back()"  
</script>
<%end if%>
<%response.expires=-1
addr00=request.servervariables("server_name")
addr10=request.servervariables("url")
addr10=replace(addr10,"votelist.asp","")
addr000="http://"&addr00&addr10
'response.write addr000
set rs=server.createobject("adodb.recordset")
sql="select * from voteclass order by id desc"
rs.open sql,conn,3,1
count=int(request("id"))
if count<=0 then
count=30
end if
if not rs.eof then
rs.pagesize=count
pagecount=rs.pagecount
if request("id")="" then
page=1
else
page=int(request("id"))
end if
if page>=rs.pagecount then
page=rs.pagecount
elseif page<=1 then
page=1
end if
rs.absolutepage=page
else
pagecount=1
page=1
end if
i=1

addr0=request.servervariables("server_name")
addr1=request.servervariables("url")
addr="http://"&addr0&addr1%>

<head>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../../css/sitecss.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
body {
	margin-top: 1px;
}
-->
</style></head>
<body >
<div align="center">
  <center>
    <table width="100%" border="0" align="center" cellpadding="5" cellspacing="1" bgcolor="#999999">
      <tr>
        <td height="25" bgcolor="#7C7CB5"  ><div align="right"><A href="Admin_Exit.asp"><FONT color=#ffffff>退出网站</FONT></A>&nbsp;&nbsp; <A onclick="checkclick('您是否要打开本站首页?')" href="index.asp" target=_blank><FONT color=#ffffff>网站首页</FONT></A></div></td>
      </tr>
    </table>
    <!--#include file="vmenu.asp"-->
    <table width="100%" height="200" border="0" cellpadding="0" cellspacing="1" bgcolor="#999999">
      <tr>
        <td height="26" bgcolor="#EEEEEE"><table width="100%" border="0" cellpadding="0" cellspacing="0" >
          <tr>
            <td height="25"><div align="center">┊<b> 投 票 管 理 </b>┊</div></td>
          </tr>
        </table>
      </tr>
      <tr> 
        <td width="100%" height="93" bgcolor="#FFFFFF"> <div align="center"> 
            <center>
              <table width="95%" height="22" border="0" cellpadding="0" cellspacing="1" bordercolorlight="#000000" bordercolordark="#FFFFFF" bgcolor="#999999">
                <tr bgcolor="#EEEEEE"> 
                  <td width="11%" height="20"> 
                  <p align="center"><font color="#000000">ID</font></td>
                  <td width="62%" height="20"> 
                  <p align="center"><font color="#000000">标题</font></td>
                  <td width="27%" height="20"> 
                  <p align="center"><font color="#000000">管理</font></td>
                </tr>
              </table>
              <table width="100%" border="0" cellspacing="0" cellpadding="0">
                <tr> 
                  <td height="2"></td>
                </tr>
              </table>
            </center>
          </div>
          <%do while not rs.eof and i<=count
  %>
          <div align="center"> 
            <center>
              <table width="95%" height="22" border="0" cellpadding="0" cellspacing="1" bordercolor="#FFFFFF" bgcolor="#CCCCCC">
                <tr bgcolor="#FFFFFF"> 
                  <td width="11%" height="20"> <p align="center"><font color="#000000"><%=rs("id")%></font></td>
                  <td width="62%" height="20"> <p align="center"><font color="#000000"><a href="showvote.asp?classid=<%=rs("id")%>" target="_blank"><%=rs("title")%></a></font></td>
                  <td width="27%" height="20"> <p align="center"><font color="#000000"><a href="votemodify.asp?id=<%=rs("id")%>&style=<%=rs("style")%>">修改</a>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
                  <a href="savevote.asp?id=del&classid=<%=rs("id")%>">删除</a></font></td>
                </tr>
              </table>
              <table width="100%" border="0" cellspacing="0" cellpadding="0">
                <tr> 
                  <td height="2"></td>
                </tr>
              </table>
            </center>
          </div>
          <%if k=count then 
exit do
end if
rs.movenext
loop%>
        </td>
      </tr>
      <br>
      <tr> 
        <td bgcolor="#eeeeee"> <p align="center"><br>
            对于单个投票的调用代码说明:<br>
            &lt;script language="javascript" src=&quot;<%=addr000%>votedy.asp?<font color="#FF0000">id=5</font>&quot;&gt;&lt;/script&gt;</p>
          <p align="center">请把这里的<font color="#FF0000">id=5</font>的<font color="#FF0000">5</font>改成相应投票的ID就可以了<br>
            <br>
        </p></td>
      </tr>
      <br>
    </table>
    <table width="100%"  >
      <tr>
        <td height="4"></td>
      </tr>
    </table>
  </center>
</div><!--#include file=../../admin/Admin_Bottom.asp-->
<%rs.close
set rs=nothing
conn.close
set conn=nothing%>

⌨️ 快捷键说明

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