index.asp
来自「修正的自由领域投票系统2.0 支持文件上传」· ASP 代码 · 共 322 行
ASP
322 行
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="const.asp"-->
<!--#include file="conn.asp"-->
<!--#include file="pageclass.asp"-->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title><%=schoolname%>－－<%=schoolvote%></title>
<script src="prototype.js"></script>
<script type="text/javascript">
function UseAjax(objectid,Url,Pars)
{
$(objectid).innerHTML="处理中...";
var url = Url;
var pars = Pars;
var myAjax = new Ajax.Updater({success:objectid}, url, {method: 'post', parameters: pars ,insertion:showResponse});
}
function showResponse(ob,st)
{
//put returned XML in the textarea
$(ob).innerHTML = unescape(st);
}
</script>
<style type="text/css">
<!--
body,td,th {
font-family: 宋体;
font-size: 9pt;
}
body {
margin-left: 0px;
margin-top: 0px;
margin-right: 0px;
margin-bottom: 0px;
background-image: url(images/bg.gif);
}
table {
}
a:link {
font-family: "宋体";
font-size: 9pt;
font-weight: normal;
color: #FF6666;
text-decoration: none;
}
a:visited {
font-family: "宋体";
font-size: 9pt;
font-weight: normal;
color: #3399CC;
text-decoration: none;
}
a:hover {
font-family: "宋体";
font-size: 9pt;
font-weight: normal;
color: #FF6600;
text-decoration: none;
}
.b1 {
border-top-width: 1px;
border-right-width: 1px;
border-bottom-width: 1px;
border-left-width: 1px;
border-top-style: none;
border-right-style: solid;
border-bottom-style: solid;
border-left-style: solid;
border-top-color: #CCCCCC;
border-right-color: #CCCCCC;
border-bottom-color: #CCCCCC;
border-left-color: #CCCCCC;
}
.STYLE9 {
color: #FF0000;
font-weight: bold;
}
.STYLE10 {color: #FF6666}
.STYLE11 {color: #FF0000}
-->
</style>
</head>
<body>
<%
function getinfo(y,ii)
getinfo=""
id=Split(y,",")
for p=0 to ubound(id)
if int(id(p))=int(ii) then
getinfo="checked=""checked"""
exit for
end if
next
end function
%>
<table width="774" height="35" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td valign="top"><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=7,0,19,0" width="774" height="160">
<param name="movie" value="images/top.swf" />
<param name="quality" value="high" />
<embed src="images/top.swf" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="774" height="160"></embed>
</object></td>
</tr>
<tr>
<td width="774" valign="top"><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=7,0,19,0" width="774" height="35">
<param name="movie" value="images/top_2.swf" />
<param name="quality" value="high" />
<embed src="images/top_2.swf" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="774" height="35"></embed>
</object></td>
</tr>
</table>
<table width="774" height="444" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="200" rowspan="2" valign="top" bgcolor="F6F6F6"><table width="100%" border="0" cellpadding="0" cellspacing="0" class="b1">
<tr>
<td width="3%" height="31" background="images/backg.gif"><div align="center"><span class="STYLE10"> 学生登陆投票</span></div></td>
</tr>
<tr>
<td height="69" bgcolor="#FFFFFF">
<% if request.Cookies("tfot_tp")("sname")="" then %><form action="index_sdl.asp" method="post"><table width="100%" border="0">
<tr>
<td width="34%"><div align="right">姓名：</div></td>
<td width="66%">
<div align="left">
<input name="sname" type="text" id="sname" size="11" maxlength="10" />
</div></td>
</tr>
<tr>
<td><div align="right">学号：</div></td>
<td><div align="left">
<input name="sid" type="password" id="sid" size="11" maxlength="10" />
</div></td>
</tr>
<tr>
<td colspan="2" align="center"><input type="submit" name="Submit2" value="登录" />
<input type="button" name="Submit" value="注册" onclick="javascript:window.open('reg.asp','reg','width=262,height=128');return false" <% if reg="false" then
response.Write("disabled")
end if%>/></td>
</tr>
<tr>
<td colspan="2"><div align="center">
<label></label>
<label></label>
<div align="left"><span class="STYLE11">注意：</span>03,04,05级的同学可直接登陆，06级的同学或意外原因无法登陆的同学请如实注册。</div>
</div></td>
</tr>
</table>
</form><% else %>
<table width="100%" border="0">
<tr>
<td><div align="center">欢迎<%=request.Cookies("tfot_tp")("sname")%>登录投票系统</div></td>
</tr>
<tr>
<td><div align="center">
<% set rs=conn.execute("select * from ec where sid='"&request.Cookies("tfot_tp")("sid")&"'")%>
您的学号是：<%=rs("sid")%></div></td>
</tr>
<tr>
<td><div align="center">您已经投了
<%
dim vote1
vote1=rs("num")
%>
<%=vote1%>票，一共可以投<%=maxvote%>票。</div></td>
</tr>
<tr><%ytp=replace(rs("vote"),"dxf,","")%>
<td><div align="center">已投票编号：<%=replace(rs("vote"),"dxf,","")%></div></td>
</tr>
<tr>
<td><div align="center">
<span class="STYLE10">
<label>
<a href="logout.asp" class="STYLE10">退出系统</a> </label>
</span> </div></td>
</tr>
</table>
<% end if %></td>
</tr>
</table>
<table width="100%" border="0" cellpadding="0" cellspacing="0" class="b1">
<tr>
<td width="90%" height="31" valign="middle" background="images/backg.gif" bgcolor="#FFFFFF"><div align="center" class="STYLE10">目前得票排名</div></td>
</tr>
<tr>
<td height="63" bgcolor="#FFFFFF"><table width="100%">
<tr>
<td><div align="center" class="STYLE9">名次</div></td>
<td><div align="center">编号
</div>
<div align="center"></div></td><td><div align="center">姓名</div></td><td><div align="center">得票</div></td></tr>
<% set rs=conn.execute("select top "&syph&" * from stu order by vote desc")
if not rs.eof then
i=0
while not rs.eof
i=i+1
%><tr>
<td><div align="center" class="STYLE9"><%=i%></div></td>
<td><div align="center"><%=rs("id")%></div></td><td><div align="center"><a href="view.asp?id=<%=rs("id")%>" target="_blank"><%=rs("stuname")%></a></div></td><td><div align="center"><%=rs("vote")%></div></td></tr>
<% rs.movenext
wend
end if
set rs=nothing%></table></td>
</tr>
</table>
<table width="100%" border="0" cellpadding="0" cellspacing="0" class="b1">
<tr>
<td width="90%" height="31" background="images/backg2.gif" class="STYLE10"><div align="center">友情链接</div></td>
</tr>
<tr>
<td height="58" bgcolor="#FFFFFF"><table width="178" height="30" border="0">
<tr>
<th width="172" scope="col"><p> </p>
<p><a href="http://www.syit.edu.cn/" target="_blank">沈阳理工大学主页</a> </p>
<p><a href="http://218.25.35.26" target="_blank">沈阳理工大学教学网</a></p>
<p class="STYLE10"><a href="http://xsc.syit.edu.cn" target="_blank">沈阳理工大学学生处</a></p></th>
</tr>
</table></td>
</tr>
</table></td>
<% dim i
i=0
sql="select * from stu order by id desc"
'set rs=conn.execute(sql)
Set mypage=new xdownpage
mypage.getconn=conn
mypage.getsql=sql
'设置每一页的记录条数据为5条
mypage.pagesize=myxs
set rs=mypage.getrs()%>
<td width="576" height="31" background="images/backg.gif"><%mypage.showpage()%></td>
</tr>
<tr>
<td valign="top"><form action="vote.asp" method="post">
<table width="156" height="259" border="1" cellpadding="1" cellspacing="2" bordercolor="#FFFFFF">
<%
if not rs.eof then
%>
<tr>
<%
for ipage=1 to mypage.pagesize
if not rs.eof then%>
<td width="150" height="80" bgcolor="#FFFFFF"><label> </label>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><a href="view.asp?id=<%=rs("id")%>" target="_blank"><img height="145" width="190" src="<%=rs("images")%>" border="0" title="感动事迹：<%=rs("zhuti")%>"/></a></td>
</tr>
</table>
<div align="center"><a href="view.asp?id=<%=rs("id")%>" target="_blank"><%=rs("stuname")%></a><a href="view.asp?id=<%=rs("id")%>" target="_blank"></a></div>
编号：[<a href="view.asp?id=<%=rs("id")%>" target="_blank"><%=rs("id")%></a>]<br />
姓名：[<a href="view.asp?id=<%=rs("id")%>" target="_blank"><%=rs("stuname")%></a>]<br />
院系：[<a href="view.asp?id=<%=rs("id")%>" target="_blank"><%=rs("yuanxi")%></a>]<br />
班级：[<a href="view.asp?id=<%=rs("id")%>" target="_blank"><%=rs("banji")%></a>]
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="18"><div align="center" id="TP<%=rs("id")%>">投票
<input name="toupiao" type="checkbox" onclick="this.style.display='';UseAjax('TP<%=rs("id")%>','vote.asp','toupiao=<%=rs("id")%>');" value="<%=rs("id")%>" <%=getinfo(ytp,rs("id"))%>/>
目前票数[<%=rs("vote")%>]</div></td>
</table>
<label></label></td>
<%
i=i+1
if i mod 3 = 0 then
response.Write("</tr><tr>")
end if
rs.movenext
end if
next
else
response.Write("<tr><td align=center>什么都没有！</td></tr>")
end if
rs.close
set rs=nothing
set conn=nothing
%>
</tr>
<tr>
<td height="23" colspan="5" align="center" bgcolor="#FFFFFF"><label>
<div align="center"></div>
</label></td>
</tr>
</table>
</form></td>
</tr>
</table>
<table width="774" height="31" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="31" background="images/backg.gif"><div align="center"><a href="http://wenxing.syitbbs.com" target="_blank">版权所有:寂寞¤北极 </a> <a href="http://www.slgtw.com" target="_blank"> http://www.slgtw.com</a> <span class="STYLE10"><a href="admin.asp" target="_blank">管理登陆 </a>
<script language="javascript" type="text/javascript" src="http://js.users.51.la/967932.js"></script>
<noscript><a href="http://www.51.la/?967932" target="_blank"><img alt="我要啦免费统计" src="http://img.users.51.la/967932.asp" style="border:none" /></a></noscript></span></div></td>
</tr>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?