📄 admin_vote.asp

📁 网站整站
💻 ASP
字号:
<!--#include file="inc/conn.asp"-->
<!--#include file="inc/set.asp"-->
<!--#include file="inc/adminfunction.asp"-->
<%
'//版权所有：野草设计

'//程序作者：野草

'//当前版本：V2.0

'//联系QQ：94440079

'//官方网站：http://www.yecaoweb.com
%>
<%
call hacker()
call checkadmin("vote")
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="STYLESHEET" type="text/css" href="img/admin.css">
<script type='text/javascript' language='javascript' src='inc/adminjs.js'></script>
</head><body style="padding:0;margin:0">
<table width="100%"  border="0" cellpadding="0" cellspacing="0" rules=none class=3d><tr class="bg"  height="22"><td>&nbsp;<img src=img/admin.gif border=0 width=15 height=15 align=absMiddle>&nbsp;<a href="admin_vote.asp">投票管理</a>&nbsp;<a href="admin_vote.asp?action=addvote">添加投票</a></td></tr></table>
<%
select case request("action")
case ""%>
 <table width="100%" align=center border="0" cellpadding="0" cellspacing="0" bordercolor="<%=border%>" rules=none class=3d>
<tr><td height="22" colspan="2" class=title><b>&nbsp;<img src=img/ie.gif border=0 width=15 height=15 align=absMiddle>&nbsp;投票管理</td></tr>
<tr class=bg height="25" >
<td width="80%" align=center>标题</td>
<td width="20%"align=center>操作</td></tr><td class="hr" colspan="2"></td></tr>
<%
set rs=server.CreateObject("adodb.recordset")
sql="select * from [YC_voteclass] "
rs.open sql,conn,1,1
if not rs.bof and not rs.eof then
rs.pagesize=cint(adminpage)
i=1
mypage=request("page")
if mypage="" then
mypage=1
else
mypage=cint(mypage)
end if
pages=rs.pagecount
rs.absolutepage=mypage
do while not rs.eof%>
<tr class=bg height="25"  class=bg onmouseout="this.style.backgroundColor=''" onmouseover="this.style.backgroundColor='#efefef'">
<td width="80%">&nbsp;<font face="Wingdings">v</font>&nbsp;<%=rs("classname")%></td>
<td width="20%"align=center><a href="?action=editvote&id=<%=rs("id")%>">编辑</a>&nbsp;<a href="?action=delvote&id=<%=rs("id")%>">删除</a>&nbsp;</td></tr>
<tr><td class="hr" colspan="2"></td></tr>
<%
if i=rs.pagesize then exit do end if
i=i+1
rs.movenext
loop
end if
if rs.eof and rs.bof then
Response.Write("<tr class=bg height=30><td align=""center""colspan=""3"">当前还没有投票</td></tr>")
else%>
<tr class=bg><td  height=25 colspan=6>
&emsp;&emsp;共有投票<font color=red><%=rs.recordcount%></font>个，每页<font color=red><%=rs.pagesize%></font>个，分<font color=red><%=mypage%></font>/<%=rs.pagecount%>页&emsp;&emsp;&emsp;
<script language="javascript">
function showPageLink(sUrl,iPage,iCount){
var i;
i=Math.max(1,iPage-1);
document.write("<a href=\""+sUrl+"1\"><FONT face=Webdings>9</FONT></a> ");
document.write("<a href=\""+sUrl+i+"\"><FONT face=Webdings>7</FONT></a> <b>");
for(i=Math.max(1,iPage-5);i<iPage;i++){
document.write("<a href=\""+sUrl+i+"\">"+i+"</a> ");}
document.write("<font color='#ff3333'>"+iPage+"</font> ");
for(i=iPage+1;i<=Math.min(iCount,iPage+5);i++){
document.write("<a href=\""+sUrl+i+"\">"+i+"</a> ");}
i=Math.min(iCount,iPage+1);
document.write("</b><a href=\""+sUrl+i+"\"><FONT face=Webdings>8</FONT></a> ");
document.write("<a href=\""+sUrl+iCount+"\"><FONT face=Webdings>:</FONT></a> ");}
<%if request.querystring("error")<>"" then%>
showPageLink("?action=list&error=error&class=<%=request("class")%>&page=",<%=mypage%>,<%=pages%>);
<%else%>
showPageLink("?action=list&class=<%=request("class")%>&page=",<%=mypage%>,<%=pages%>);
<%end if%>
</script>
<%end if%>
</td></tr>
</table></form>
<%
rs.close
set rs=nothing
case "addvote"
call addvote()
case "addvoteok"
if request.form("classname")="" then
response.write"<script>alert('标题不能为空哦！下次记得哦！');history.back()</script>"
response.end
end if
if request.form("no")="" then
response.write"<script>alert('怎么这么不小心！影片集数也要添的！好入帐嘛！');history.back()</script>"
response.end
end if
for j=1 to int(request.form("no"))+int(request("count"))
if request.form("title"&j)="" then
response.write"<script>alert('既然你设置了！就要全部添完！男子汉大丈夫，要负责的！');history.back()</script>"
response.end
end if
next
set rs=server.CreateObject("adodb.recordset")
rs.open "YC_voteclass",conn,1,3
rs.addnew
rs("classname")=trim(request.Form("classname"))
rs.update
urlid=rs("id")
rs.close
set rs=nothing
no=request.form("no")
set rsurl=server.createobject("adodb.recordset")
for i=1 to no
sql="select * from [YC_vote] where (id is null)"
rsurl.open sql,conn,1,3
rsurl.addnew
rsurl("num")=request("no"&i&"")
rsurl("class")=urlid
rsurl("title")=request("title"&i&"")
rsurl("click")=request("click"&i&"")

rsurl.update
next
rsurl.close
set rsurl=nothing
response.write"<script>location.href='admin_vote.asp';</script>"
case "editvote"
call editvote()
case "editvoteok"
if request.form("classname")="" then
response.write"<script>alert('标题不能为空哦！下次记得哦！');history.back()</script>"
response.end
end if
if request.form("no")="" then
response.write"<script>alert('怎么这么不小心！个数也要添的！好入帐嘛！');history.back()</script>"
response.end
end if
set rs=server.CreateObject("adodb.recordset")
sql="select * from [YC_voteclass] where id="&request("id")
rs.open sql,conn,1,3
rs("classname")=trim(request.Form("classname")) 
rs.update
urlid=rs("id")
rs.close
 
set rsurl=server.createobject("adodb.recordset")
for i=1 to request("count")
if not isempty(request("del"&i)) then
Conn.Execute("Delete * From [YC_vote] Where id="&request("id"&i))
else
Conn.execute"update [YC_vote] set title='"&request("title"&i)&"' where id="&request("id"&i)
Conn.execute"update [YC_vote] set click='"&request("click"&i)&"' where id="&request("id"&i)
end if
next
for i=1 to request("no")
sql="select * from [YC_vote] where (id is null)"
rsurl.open sql,conn,1,3
rsurl.addnew
rsurl("class")=urlid
rsurl("title")=replace(trim(request("title"&(int(i)+int(request("count")))&"")),"'","")
rsurl("click")=replace(trim(request("click"&(int(i)+int(request("count")))&"")),"'","")
rsurl("num")=request("count")+i
rsurl.update
next
rsurl.close
set rsurl=nothing
response.Write "<script>alert('恭喜您！修改成功了！');location.href='admin_vote.asp';</script>"
case "delvote"
Conn.Execute("Delete * From YC_voteclass Where id="&Request.querystring("id"))
Conn.Execute("Delete * From YC_vote Where class="&Request.querystring("id"))
Response.Write("<script language=javascript>alert('删除成功！');this.location.href='admin_vote.asp';</script>")
response.end
case else
call list()
end select
sub addvote()
%>
<script language="javascript">
function setid()
{
str='';
if(!window.form.no.value)
window.form.no.value=1;
for(i=1;i<=window.form.no.value;i++)
str+='&nbsp;第'+'<INPUT TYPE="text" NAME=no'+i+' value='+i+' style="border:0px;background:#d0d4c8;width:24px;text-align:center;">项：<input type="text" name="title'+i+'" class="yecao" size=40 onMouseOver="this.focus()" onFocus="this.select()">&nbsp;<input type="text" name="click'+i+'" class="yecao" size=5 onMouseOver="this.focus()" onFocus="this.select()" value="1"><BR>';
window.upid.innerHTML=str+'<br>';
}
</script>
<form method="post" name="form" id="form" onsubmit="return chk();" action="?action=addvoteok">
<table width="100%" align=center border="0" cellpadding="0" cellspacing="0" rules=none class=3d>
<tr class="title"  height="22"><td><b>&nbsp;<img src=img/ie.gif border=0 width=15 height=15 align=absMiddle>&nbsp;发布投票</b></td></tr>	
<tr class=bg height="25"><td>&nbsp;投票主题：<input name="classname" type="text" id="title" size="40" class=yecao></td></tr>
<tr><td>&nbsp;投票项数：<input type="text" name="no" class="yecao" value="1" size=5>&nbsp;
<input type="button" name="Button" class="button" onclick="setid();" value="设 定">
</td></tr>
<tr><td id="upid"></td></tr>
<tr height="30" class=foot><td  align="center">
<input name="new" type="submit" class="adminbutton" id="new" value="发 布">&nbsp;<input name="Submit2" type="reset" class="adminbutton" value="清 空">
</td></tr>
</table></form> 
<%end sub
sub editvote()
set rs=server.CreateObject("adodb.recordset")
sql="select * from [YC_voteclass] where id="&request.QueryString("id")
rs.open sql,conn,1,1
%> <form method="post" name="form" id="form" onsubmit="return chk();" action="?action=editvoteok">
 <table width="100%" align=center border="0" cellpadding="0" cellspacing="0" rules=none class=3d>
<tr class="title"  height="22"><td><b>&nbsp;<img src=img/ie.gif border=0 width=15 height=15 align=absMiddle>&nbsp;修改投票</b></td></tr>	
<tr class=bg height="25">
<td>&nbsp;投票主题：<input name="classname" type="text" size="40" class=yecao value="<%=rs("classname")%>"></td></tr><tr><td>
<%
sqlurl="SELECT * FROM [YC_vote] WHERE class="&rs("id")&" order by id"
Set rsurl=Server.CreateObject("ADODB.Recordset")
rsurl.open sqlurl,Conn,1,1
if rsurl.eof then
response.write "暂时没有投票项目！"
else
for i=1 to rsurl.recordcount%>
&nbsp;第<span style="width=24;text-align:center"><%=i%></span>项：<input type="text" name="title<%=i%>" class="yecao" size=60 value="<%=rsurl("title")%>" onMouseOver="this.focus()" onFocus="this.select()">
<input type="text" name="click<%=i%>" class="yecao" size=5 value="<%=rsurl("click")%>" onMouseOver="this.focus()" onFocus="this.select()">
<INPUT TYPE="hidden" name="id<%=i%>" value="<%=rsurl("id")%>">
<INPUT TYPE="checkbox" name="del<%=i%>"><a href="javascript:siit<%=i%>()">删除</A><BR>
<SCRIPT LANGUAGE="JavaScript">
<!--
function siit<%=i%>(){
if (form.del<%=i%>.checked!=true) form.del<%=i%>.checked=true ;
else form.del<%=i%>.checked=false ;
}
//-->
</SCRIPT>
<%
rsurl.movenext
next
end if
%>
<div id="upid"></div>
<script language="javascript">
function setid()
{
str='';
if(!window.form.no.value)
window.form.no.value=0;
for(i=1;i<=window.form.no.value;i++)
str+='&nbsp;<font color=red>第<span style="width=24;text-align:center">'+(i+<%=rsurl.recordcount%>)+'</span>项</font>：<input type="text" name="title'+(i+<%=rsurl.recordcount%>)+'" class="yecao" size=60 onMouseOver="this.focus()" onFocus="this.select()">&nbsp;<input type="text" name="click'+(i+<%=rsurl.recordcount%>)+'" class="yecao" size=5 onMouseOver="this.focus()" onFocus="this.select()" value="1"><BR>';
window.upid.innerHTML=str;
}
</script>
</td></tr>
<tr>
<td height=25>&nbsp;继续添加：加&nbsp;<input type="text" name="no" class="yecao" value="0" size=2 maxlength=50>&nbsp;项&nbsp;<input type="button" name="Button" class="button" onclick="setid();" value="添 加">
</td>
</tr>
<INPUT TYPE="hidden" name=count value=<%=rsurl.recordcount%>>
<%rsurl.close
set rsurl=nothing%>
<tr><td class="hr"></td></tr>
<tr height="30" class=foot><td align="center">
<input name="id" type="hidden" id="id" value="<%=rs("id")%>">
<input name="edit" type="submit" class="adminbutton" id="edit" value="修 改">&nbsp;<input name="Submit2" type="reset" class="adminbutton" value="清 空" onclick="ClearReset()">

</td></tr>

</table> </form>




<%
rs.close
set rs=nothing
end sub
%>
💿 文件大小 1378 K
👤 上传用户 yehao
📂 所属分类电子书籍
🏷️ 相关标签

#网站
⌨️ 快捷键说明

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