📄 manage_vote.asp
字号:
<%
If request.cookies("member")="" Then
Response.redirect"../"
End If
%>
<!--#include file="conn.asp"-->
<%
dim totalrecord
dim uID
uID=request.cookies("uID")
dim rs,sql
set rs=Server.CreateObject("Adodb.Recordset")
sql="select top 15 voteID,uID,votename from vote where uID='"&uID&"' order by voteID desc"
rs.open sql,conn,1,1
If rs.eof Then
response.write "<script>alert('你还没申请调查，点击确定申请。');location.href='add_vote.asp';</Script>"
conn.close
set conn=nothing
rs.close
set rs=nothing
response.end
End If
totalrecord=rs.recordcount
%>
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<title>专业选票 | 会员控制面板</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="Description" content="互动调查,免费调查引擎">
<meta name="Keywords" content="互动调查,调查,引擎调查,投票,免费调查,vote,research">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<style type="text/css">
<!---a:link { color: #000080; font-family: Arial; text-decoration: underline }
a:visited { color: #680090; font-family: Arial; text-decoration: underline }
a:active { color: red; font-family: Arial; text-decoration: none }
a:hover { color: red; text-decoration: none }
body { color: #000000; font-size: 9pt; line-height: 12pt; font-family: Arial }
th { font-size: 9pt; line-height: 14pt }
td { font-size: 9pt; line-height: 14pt }
a.1:link { font-family: Arial; text-decoration: none; color: black }
a.1:visited { font-family: Arial; text-decoration: none; color: black }
a.1:hover { font-family: Arial; text-decoration: none; color: white }
a.2:link { font-family: Arial; text-decoration: none; color: black }
a.2:visited { font-family: Arial; text-decoration: none; color: black }
a.2:hover { font-family: Arial; text-decoration: none; color: silver }
.form { font-size: 9pt }
---></style>
<script language="javascript">
<!--
if (parent.frames.length > 0) {
parent.location.href = location.href;
}
function help(){
window.open("help.htm","","width=440,height=480,top=30,left=180,resizable=no,scrollbars=yes,status=no,toolbar=no,menubar=no,location=no");
}
// --></script>
</head>
<body topmargin="11" leftmargin="0" bgcolor="#303430">
<form method="post" name="form1" language="javascript" onsubmit="return login_onsubmit()" action="save.asp">
<div align="center">
<table border="0" cellpadding="0" cellspacing="0" width="750" bgcolor="#FFA800" height="420">
<tr>
<td height="55" width="150">
<p align="center"><a href="../member/ctrl.asp"><img border="0" src="../images/logo/ctrl_logo.gif" alt="专业选票 控制面板" width="111" height="30"></a></td>
<center>
<td height="420" width="600" bgcolor="#F6F6F6" rowspan="4" valign="top"></center>
<div align="center">
<center>
<table border="0" cellspacing="1" width="96%" height="80">
<tr>
<td width="100%" height="19" colspan="4">您目前共有调<%=totalrecord%>个，以下是调查列表。</td>
</tr>
<tr>
<td width="11%" height="16" bgcolor="#808080">
<p align="center"><font color="#FFFFFF">调查编号</font></td>
<td width="64%" height="16" bgcolor="#808080"><font color="#FFFFFF"> 调查名称（点击察看详细资料）</font></td>
<td width="12%" height="16" bgcolor="#808080">
<p align="center"><font color="#FFFFFF">修改</font></td>
</center>
<td width="13%" height="16" bgcolor="#808080">
<p align="center"><font color="#FFFFFF">删除</font></td>
</tr>
<center>
<%
Function votename()
If len(rs("votename"))>29 Then
response.write left(rs("votename"),29)&"..."
Else
response.write rs("votename")
End If
End Function
do while not rs.eof%>
<tr>
<td width="11%" height="1" bgcolor="#EBEBEB">
<p align="center"><%=rs("voteID")%></td>
<td width="64%" height="1" bgcolor="#EBEBEB"> <a href="info_vote.asp?voteID=<%=rs("voteID")%>" class="2"><%=votename()%></a></td>
<td width="12%" height="1" bgcolor="#EBEBEB">
<p align="center"><a href="edit_vote.asp?voteID=<%=rs("voteID")%>" class="2">修改</a></td>
<td width="13%" height="1" bgcolor="#EBEBEB">
<p align="center"><a href="del_ask.asp?voteID=<%=rs("voteID")%>" class="2">删除</a></td>
</tr>
<% rs.movenext
loop
conn.close
set conn=nothing
rs.close
set rs=nothing
%>
</center>
<tr>
<td width="100%" height="5" colspan="4" bgcolor="#808080"> </td>
<center>
</tr>
<tr>
<td width="100%" height="12" colspan="4">注：每个会员最多可以申请15个调查。</td>
</tr>
</table>
</center>
</div>
</td>
</tr>
<center></center><center></center><center></center><center>
<tr>
<td height="18" width="150" bgcolor="#FFCD71">
<p align="center">当前用户：<%=request.cookies("rname")%></td>
</tr>
<tr>
<td height="17" width="150"> </td>
</tr>
</center>
<tr>
<td height="330" width="150" valign="top">
<div align="center">
<table border="0" cellpadding="3" width="100%" height="157">
<tr>
<td width="100%" height="77" valign="top">
<p align="center"><a href="add_vote.asp" class="1">增加新的调查</a><br>
<a href="manage_vote.asp" class="1">管理现有调查</a><br>
<a href="../member/change_pwd.asp" class="1">更改登陆密码</a><br>
<a href="../member/change_info.asp" class="1">修改会员资料</a><br>
<a href="javascript:help()" class="1">使用帮助信息</a><br>
<br>
<a href="../member/logout.asp" class="1">退出登陆</a></td>
</tr>
</table>
</div>
</td>
</tr>
</table>
</div>
<div align="center">
<table border="0" cellpadding="0" cellspacing="0" width="750">
<tr>
<td></td>
</tr>
<center>
<tr>
<td></td>
</tr>
</table>
</center>
</div>
</form>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -