asp 在线调查系统

2015-08-12 16:02:43来源:作者:人点击

<head>
<meta http-equiv="Content-Language" content="zh-cn">
<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">
<LINK href="new.css" rel=stylesheet type=text/css>
<title>asp 在线调查系统</title>
<meta name="Microsoft Border" content="none">
<style type="text/css">
<!--
.test {  font-size: 13px}
-->
</style>
</head>

<body>
<%
   dim conn  
   dim connstr
   connstr="DBQ="+server.mappath("vote.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
     set conn=server.createobject("ADODB.CONNECTION")
     conn.open connstr

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.createobject("adodb.recordset")
sql="select * from vote where id=1"
rs.open sql,conn,1,1
if not rs.eof then
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)*100
selectb=(rs("selectb")/total)*100
selectc=(rs("selectc")/total)*100
selectd=(rs("selectd")/total)*100
selecte=(rs("selecte")/total)*100
selectf=(rs("selectf")/total)*100
selectg=(rs("selectg")/total)*100
selecth=(rs("selecth")/total)*100
selecti=(rs("selecti")/total)*100
selectj=(rs("selectj")/total)*100
      response.write "<table  cellspacing=0 cellpadding=0 border=1 valign='middle' width='100%' height='100%' align='center' bordercolor='#ffffff' ><tr><td bgcolor='#f7f3f7' bordercolor='#808080'>"
      response.write "<p align=center>::: 调 查 结 果 :::</p>" %>
<span class="test"><br>
</span>
<p class="test">[目前共有<b><font color="#FF0000"><%=total%></font></b>人参与本站调查]<br>
  <br>
  &nbsp;
<table width="424" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td width="147" class="test" height="20">
      <div align="right">城市花园:</div>
    </td>
    <td width="277" class="test" height="20"><img src=redbar.gif width=<%=int(selecta*2)%> height=10>&nbsp;<%=rs("selecta")%>人
      占:<%=round(selecta,2)%>% </td>
  </tr>
  <tr>
    <td width="147" class="test" height="20">
      <div align="right">新世界花园:</div>
    </td>
    <td width="277" class="test" height="20"><img src=redbar.gif width=<%=int(selectb*2)%> height=10>&nbsp;<%=rs("selectb")%>人
      占:<%=round(selectb,2)%>% </td>
  </tr>
  <tr>
    <td width="147" class="test" height="20">
      <div align="right">景湖花园:</div>
    </td>
    <td width="277" class="test" height="20"><img src=redbar.gif width=<%=int(selectc*2)%> height=10>&nbsp;<%=rs("selectc")%>人
      占:<%=round(selectc,2)%>% </td>
  </tr>
  <tr>
    <td width="147" class="test" height="20">
      <div align="right">东泰花园:</div>
    </td>
    <td width="277" class="test" height="20"><img src=redbar.gif width=<%=int(selectd*2)%> height=10>&nbsp;<%=rs("selectd")%>人
      占:<%=round(selectd,2)%>% </td>
  </tr>
  <tr>
    <td width="147" class="test" height="20">
      <div align="right">新世纪豪园:</div>
    </td>
    <td width="277" class="test" height="20"><img src=redbar.gif width=<%=int(selecte*2)%> height=10>&nbsp;<%=rs("selecte")%>人
      占:<%=round(selecte,2)%>% </td>
  </tr>
  <tr>
    <td width="147" class="test" height="20">
      <div align="right">景峰高尔夫别墅:</div>
    </td>
    <td width="277" class="test" height="20"><img src=redbar.gif width=<%=int(selectf*2)%> height=10>&nbsp;<%=rs("selectf")%>人
      占:<%=round(selectf,2)%>% </td>
  </tr>
  <tr>
    <td width="147" class="test" height="20">
      <div align="right">时富花园:</div>
    </td>
    <td width="277" class="test" height="20"><img src=redbar.gif width=<%=int(selectg*2)%> height=10>&nbsp;<%=rs("selectg")%>人
      占:<%=round(selectg,2)%>% </td>
  </tr>
  <tr>
    <td width="147" class="test" height="20">
      <div align="right">雍华庭花园:</div>
    </td>
    <td width="277" class="test" height="20"><img src=redbar.gif width=<%=int(selecth*2)%> height=10>&nbsp;<%=rs("selecth")%>人
      占:<%=round(selecth,2)%>% </td>
  </tr>
  <tr>
    <td width="147" class="test" height="20">
      <div align="right">金泽花园:</div>
    </td>
    <td width="277" class="test" height="20"><img src=redbar.gif width=<%=int(selecti*2)%> height=10>&nbsp;<%=rs("selecti")%>人
      占:<%=round(selecti,2)%>% </td>
  </tr>
  <tr>
    <td width="147" class="test" height="20">
      <div align="right">东湖花园:</div>
    </td>
    <td width="277" class="test" height="20"><img src=redbar.gif width=<%=int(selectj*2)%> height=10>&nbsp;<%=rs("selectj")%>人
      占:<%=round(selectj,2)%>%
      <% 
else 
  response.write "目前还没有人投票,欢迎您投票!" 
end if 
rs.close 
set rs=nothing 
conn.close 
set conn=nothing 
%>
    </td>
  </tr>
</table>
</body>

最新文章

123

最新摄影

微信扫一扫

第七城市微信公众平台