📄 research.asp
字号:
<% Response.Buffer=True %>
<!--#include file="dbconn.inc"-->
<% if request("stype")="" then
options=request("options")
if Request.ServerVariables("REMOTE_ADDR")=request.cookies("IPAddress") then
response.write"<SCRIPT language=JavaScript>alert('感谢您的支持，您已经投过票了，请勿重复投票，谢谢！');"
response.write"javascript:window.close();</SCRIPT>"
end if
response.cookies("IPAddress")=Request.ServerVariables("REMOTE_ADDR")
set rs=server.createobject("adodb.recordset")
sql1="update research set select"&options&"=select"&options&"+1 where id=1"
rs.open sql1,conn,4,4
set rs=nothing
end if %>
<% set rs=server.createobject("adodb.recordset")
sql2="select * from research where id=1"
rs.open sql2,conn,1,1
if rs("selecta")="0" and rs("selectb")="0" and rs("selectc")="0" and rs("selectd")="0" and rs("selecte")="0" then
response.write"<SCRIPT language=JavaScript>alert('目前尚无人参与调查！');"
response.write"javascript:window.close();</SCRIPT>"
end if
total=rs("selecta")+rs("selectb")+rs("selectc")+rs("selectd")+rs("selecte")
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 %>
<head>
<title>易讯网络科技 调查结果</title>
<style type="text/css"><!-- A{text-transform:none;text-decoration:none;}a:hover{text-decoration:underline;color:#000000}BODY{font-family:"宋体";font-size:9pt;}td{font-family:"宋体";font-size:9pt;}--></style>
</head>
<body link="#396BA5" vlink="#396BA5">
<div align="center">
<center>
<table border="1" cellspacing="0" cellpadding="0" height="20" width="90" bordercolor="#396BA5">
<tr>
<td bgcolor="#396BA5" align="center"><font color="#FFFFFF">调查</font></td>
<td align="center"><font color="#000000">结果</font></td>
</tr>
</table>
</center>
</div>
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" width="100%" height="21">
<tr>
<td height="21" valign="middle">
<font color="#000073">综合性调查</font>
</td>
</tr>
<tr>
<td valign="top">
A. 增加主机数量：<img src=images/d.bmp width=<%=int(selecta*2)%> height=8> <%=round(selecta,3)%>% <font color="#FF0000"><%=rs("selecta")%></font>人<br>
B. 改进客户系统：<img src=images/d.bmp width=<%=int(selectb*2)%> height=8> <%=round(selectb,3)%>% <font color="#FF0000"><%=rs("selectb")%></font>人<br>C. 降低主机价格：<img src=images/d.bmp width=<%=int(selectc*2)%> height=8> <%=round(selectc,3)%>% <font color="#FF0000"><%=rs("selectc")%></font>人<br>D. 改进网站设计：<img src=images/d.bmp width=<%=int(selectd*2)%> height=8> <%=round(selectd,3)%>% <font color="#FF0000"><%=rs("selectd")%></font>人<br>E. 100元主机我买：<img src=images/d.bmp width=<%=int(selecte*2)%> height=8> <%=round(selecte,3)%>% <font color="#FF0000"><%=rs("selecte")%></font>人<font color="#000073">
<br>
<br>
共有</font><font color="#FF0000"><%=total%></font><font color="#000073">人参加调查</font></center>
</td>
</tr>
</table>
</div>
<p align="center">【<a href="javascript:window.close()">关闭窗口</a>】<% rs.close
set rs=nothing
conn.close
set conn=nothing %>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -