asia-webs_view.asp

来自「8款下载系统源代码 2003-3-11 21:37:45 433 949k · 」· ASP 代码 · 共 178 行

ASP
178 行
字号 
<%
If request("voteID")="" Then
response.redirect"http://www.linkfox.com/"
End If
%>
<!--#include file="conn.asp"-->
<%
dim rs,sql
dim p1,p2,p3,p4,p5,p6,p7,p8,p9,p10,total
set rs=Server.CreateObject("Adodb.Recordset")
sql="select voteID,votename,s1,s2,s3,s4,s5,s6,s7,s8,s9,s10,n1,n2,n3,n4,n5,n6,n7,n8,n9,n10 from vote where voteID="&request("voteID")
rs.open sql,conn,1,1
total=rs("n1")+rs("n2")+rs("n3")+rs("n4")+rs("n5")+rs("n6")+rs("n7")+rs("n8")+rs("n9")+rs("n10")
p1=(rs("n1")/total)*100
p2=(rs("n2")/total)*100
p3=(rs("n3")/total)*100
p4=(rs("n4")/total)*100
p5=(rs("n5")/total)*100
p6=(rs("n6")/total)*100
p7=(rs("n7")/total)*100
p8=(rs("n8")/total)*100
p9=(rs("n9")/total)*100
p10=(rs("n10")/total)*100
%>
<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>调查结果</title>
<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:active   { font-family: Arial; text-decoration: none; color: silver }
a.1:hover    { font-family: Arial; text-decoration: none; color: silver }
.line        { line-height: 10pt }
.il          { line-height: 12pt }
.form        { font-size: 9pt }
---></style>
</head>

<body topmargin="0" leftmargin="0">

<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" width="659" height="292">
<tr>
<td height="44" width="657">
<p align="center"></td>
</tr>
<tr>
<td height="209" valign="top" width="657">
<div align="center">
<table border="1" cellspacing="0" width="100%" height="84" cellpadding="0" bordercolorlight="#FFFFFF" bordercolordark="#FFFFFF">
<tr>
<td width="100%" height="16" bgcolor="#FF6800" colspan="4">
<p align="center"><font color="#FFFFFF"><%=rs("votename")%></font></td>
</tr>
<tr>
<td width="28%" height="4" bgcolor="#808080"><font color="#FFFFFF">&nbsp;投票选项</font></td>
<td width="53%" height="4" bgcolor="#808080"><font color="#FFFFFF">&nbsp;百分比示意图</font></td>
<td width="9%" height="4" bgcolor="#808080">
<p align="center"><font color="#FFFFFF">百分比</font></td>
<td width="10%" height="4" bgcolor="#808080">
<p align="center"><font color="#FFFFFF">投票</font><font color="#FFFFFF">人数</font></td>
</tr>
<tr>
<td width="28%" height="19" bgcolor="#F6F6F6"><%=rs("s1")%></td>
<td width="53%" height="19" bgcolor="#F6F6F6"><img border="0" src="images/bar0.gif"><img border="0" src="images/bar.gif" width="<%=int(p1*3)%>" height="14"><img border="0" src="images/bar1.gif"></td>
<td width="9%" height="19" bgcolor="#F6F6F6"><%=round(p1,2)%>%</td>
</center>
<td width="10%" height="19" bgcolor="#F6F6F6">&nbsp;<%=rs("n1")%></td>
</tr>
<center>
<tr>
<td width="28%" height="21" bgcolor="#F6F6F6"><%=rs("s2")%></td>
<td width="53%" height="21" bgcolor="#F6F6F6"><img border="0" src="images/bar0.gif"><img border="0" src="images/bar.gif" width="<%=int(p2*3)%>" height="14"><img border="0" src="images/bar1.gif"></td>
<td width="9%" height="21" bgcolor="#F6F6F6"><%=round(p2,2)%>%</td>
<td width="10%" height="21" bgcolor="#F6F6F6">&nbsp;<%=rs("n2")%></td>
</tr>
<%
If rs("s3")<>"" Then %>
<tr>
<td width="28%" height="19" bgcolor="#F6F6F6"><%=rs("s3")%></td>
<td width="53%" height="19" bgcolor="#F6F6F6"><img border="0" src="images/bar0.gif"><img border="0" src="images/bar.gif" width="<%=int(p3*3)%>" height="14"><img border="0" src="images/bar1.gif"></td>
<td width="9%" height="19" bgcolor="#F6F6F6"><%=round(p3,2)%>%</td>
</center>
<td width="10%" height="19" bgcolor="#F6F6F6">&nbsp;<%=rs("n3")%></td>
</tr>
<% End If 
If rs("s4")<>"" Then %>
<tr>
<td width="28%" height="19" bgcolor="#F6F6F6"><%=rs("s4")%></td>
<td width="53%" height="19" bgcolor="#F6F6F6"><img border="0" src="images/bar0.gif"><img border="0" src="images/bar.gif" width="<%=int(p4*3)%>" height="14"><img border="0" src="images/bar1.gif"></td>
<td width="9%" height="19" bgcolor="#F6F6F6"><%=round(p4,2)%>%</td>
<td width="10%" height="19" bgcolor="#F6F6F6">&nbsp;<%=rs("n4")%></td>
</tr>
<% End If
If rs("s5")<>"" Then %>
<tr>
<td width="28%" height="19" bgcolor="#F6F6F6"><%=rs("s5")%></td>
<td width="53%" height="19" bgcolor="#F6F6F6"><img border="0" src="images/bar0.gif"><img border="0" src="images/bar.gif" width="<%=int(p5*3)%>" height="14"><img border="0" src="images/bar1.gif"></td>
<td width="9%" height="19" bgcolor="#F6F6F6"><%=round(p5,2)%>%</td>
<td width="10%" height="19" bgcolor="#F6F6F6">&nbsp;<%=rs("n5")%></td>
</tr>
<% End If
If rs("s6")<>"" Then %>
<tr>
<td width="28%" height="19" bgcolor="#F6F6F6"><%=rs("s6")%></td>
<td width="53%" height="19" bgcolor="#F6F6F6"><img border="0" src="images/bar0.gif"><img border="0" src="images/bar.gif" width="<%=int(p6*3)%>" height="14"><img border="0" src="images/bar1.gif"></td>
<td width="9%" height="19" bgcolor="#F6F6F6"><%=round(p6,2)%>%</td>
<td width="10%" height="19" bgcolor="#F6F6F6">&nbsp;<%=rs("n6")%></td>
</tr>
<% End If
If rs("s7")<>"" Then %>
<tr>
<td width="28%" height="19" bgcolor="#F6F6F6"><%=rs("s7")%></td>
<td width="53%" height="19" bgcolor="#F6F6F6"><img border="0" src="images/bar0.gif"><img border="0" src="images/bar.gif" width="<%=int(p7*3)%>" height="14"><img border="0" src="images/bar1.gif"></td>
<td width="9%" height="19" bgcolor="#F6F6F6"><%=round(p7,2)%>%</td>
<td width="10%" height="19" bgcolor="#F6F6F6">&nbsp;<%=rs("n7")%></td>
</tr>
<% End If 
If rs("s8")<>"" Then %>
<tr>
<td width="28%" height="19" bgcolor="#F6F6F6"><%=rs("s8")%></td>
<td width="53%" height="19" bgcolor="#F6F6F6"><img border="0" src="images/bar0.gif"><img border="0" src="images/bar.gif" width="<%=int(p8*3)%>" height="14"><img border="0" src="images/bar1.gif"></td>
<td width="9%" height="19" bgcolor="#F6F6F6"><%=round(p8,2)%>%</td>
<td width="10%" height="19" bgcolor="#F6F6F6">&nbsp;<%=rs("n8")%></td>
</tr>
<% End If
If rs("s9")<>"" Then %>
<tr>
<td width="28%" height="19" bgcolor="#F6F6F6"><%=rs("s9")%></td>
<td width="53%" height="19" bgcolor="#F6F6F6"><img border="0" src="images/bar0.gif"><img border="0" src="images/bar.gif" width="<%=int(p9*3)%>" height="14"><img border="0" src="images/bar1.gif"></td>
<td width="9%" height="19" bgcolor="#F6F6F6"><%=round(p9,2)%>%</td>
<td width="10%" height="19" bgcolor="#F6F6F6">&nbsp;<%=rs("n9")%></td>
</tr>
<% End If
If rs("s10")<>"" Then %>
<tr>
<td width="28%" height="19" bgcolor="#F6F6F6"><%=rs("s10")%></td>
<td width="53%" height="19" bgcolor="#F6F6F6"><img border="0" src="images/bar0.gif"><img border="0" src="images/bar.gif" width="<%=int(p10*3)%>" height="14"><img border="0" src="images/bar1.gif"></td>
<td width="9%" height="19" bgcolor="#F6F6F6"><%=round(p10,2)%>%</td>
<td width="10%" height="19" bgcolor="#F6F6F6">&nbsp;<%=rs("n10")%></td>
</tr>
<% End If %>
<tr>
<td width="100%" height="11" bgcolor="#D7D7D7" colspan="4">
<p align="center">共有<%=total%>人参加本次调查</td>
</tr>
</table>
</div>
</td>
</tr>
<tr>
<td height="16" valign="top" width="657">
<p align="center"></td>
</tr>
<tr>
<td height="17" valign="top" width="657">
<p align="center"><a href="javascript:window.close()" class="1">关闭窗口</a></td>
</tr>
</table>
</div>
<script></script>

</body>

</html>

asia-webs_view.asp - 源码说明

本页面展示了「8款下载系统源代码 2003-3-11 21:37:45 433 949k · 都很常见： 猛虎山庄、燕衔泥（飞扬的软件第二版用的就是他」中的 asia-webs_view.asp 源码文件，采用 ASP 编程语言编写，共 178 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与2003相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

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