<head>
<meta http
<meta http
<meta name="GENERATOR" content="Microsoft FrontPage
<meta name="ProgId" content="FrontPage
<LINK href="new
<title>asp 在線調查系統</title>
<meta name="Microsoft Border" content="none">
<style type="text/css">
<!
</style>
</head>
<body>
<%
dim conn
dim connstr
connstr="DBQ="+server
set conn=server
conn
dim rs
dim sql
dim selecta
dim selectb
dim selectc
dim selectd
dim selecte
dim selectf
dim selectg
dim selecth
dim selecti
dim selectj
dim total
set rs=server
sql="select * from vote where id=
rs
if not rs
total=rs("selecta")+rs("selectb")+rs("selectc")+rs("selectd")+rs("selecte")+rs("selectf")+rs("selectg")+rs("selecth")+rs("selecti")+rs("selectj")
selecta=(rs("selecta")/total)*
selectb=(rs("selectb")/total)*
selectc=(rs("selectc")/total)*
selectd=(rs("selectd")/total)*
selecte=(rs("selecte")/total)*
selectf=(rs("selectf")/total)*
selectg=(rs("selectg")/total)*
selecth=(rs("selecth")/total)*
selecti=(rs("selecti")/total)*
selectj=(rs("selectj")/total)*
response
response
<span class="test"><br>
</span>
<p class="test">[目前共有<b><font color="#FF
<br>
<table width="
<tr>
<td width="
<div align="right">城市花園:</div>
</td>
<td width="
占
</tr>
<tr>
<td width="
<div align="right">新世界花園:</div>
</td>
<td width="
占
</tr>
<tr>
<td width="
<div align="right">景湖花園:</div>
</td>
<td width="
占
</tr>
<tr>
<td width="
<div align="right">東泰花園:</div>
</td>
<td width="
占
</tr>
<tr>
<td width="
<div align="right">新世紀豪園:</div>
</td>
<td width="
占
</tr>
<tr>
<td width="
<div align="right">景峰高爾夫別墅:</div>
</td>
<td width="
占
</tr>
<tr>
<td width="
<div align="right">時富花園:</div>
</td>
<td width="
占
</tr>
<tr>
<td width="
<div align="right">雍華庭花園:</div>
</td>
<td width="
占
</tr>
<tr>
<td width="
<div align="right">金澤花園:</div>
</td>
<td width="
占
</tr>
<tr>
<td width="
<div align="right">東湖花園:</div>
</td>
<td width="
占
<%
else
response
end if
rs
set rs=nothing
conn
set conn=nothing
%>
</td>
</tr>
</table>
</body>
From:http://tw.wingwit.com/Article/program/net/201311/14075.html