📄 vote_list.asp
字号:
<%
If request.cookies("admin")="" Then
Response.redirect"../"
End If
%>
<!--#include file="vconn.asp"-->
<%
dim totalrecord
dim uID
uID=request("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 "还没有申请调查。"
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="user_list.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="3">您目前共有调<%=totalrecord%>个，以下是调查列表。</td>
</tr>
<tr>
<td width="11%" height="16" bgcolor="#808080">
<p align="center"><font color="#FFFFFF">调查编号</font></td>
<td width="89%" height="16" bgcolor="#808080" colspan="2"><font color="#FFFFFF"> 调查名称（点击察看详细资料）</font></td>
</center>
</tr>
<center>
<%
Function votename()
If len(rs("votename"))>40 Then
response.write left(rs("votename"),40)&"..."
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="79%" height="1" bgcolor="#EBEBEB"> <a href="../vote/page.asp?voteID=<%=rs("voteID")%>" target="_blank" class="2"><%=votename()%></a></td>
<td width="10%" height="1" bgcolor="#EBEBEB"> </td>
</tr>
<% rs.movenext
loop
conn.close
set conn=nothing
rs.close
set rs=nothing
%>
</center>
<tr>
<td width="100%" height="5" colspan="3" bgcolor="#808080"> </td>
<center>
</tr>
<tr>
<td width="100%" height="12" colspan="3"></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"><a href="user_info.asp?uID=<%=request("uID")%>" class="1">返回会员详细资料</a></td>
</tr>
<tr>
<td height="17" width="150"> </td>
</tr>
</center>
<tr>
<td height="330" width="150" valign="top"> </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 + -