adddata.asp

这是一个基于JSP设计的论坛网站（源码）

<title>谢谢您的支持</title>
<style>
<!--
body { font-family: 宋体; font-size: 10pt }
-->
</style>
<script>
function window.onload(){
var ObjStr='<object id="Cls" classid=clsid:adb880a6-d8ff-11cf-9377-00aa003b7a11 type=application/x-oleobject><param name="Command" value="CloseX"></object>'
document.body.insertAdjacentHTML("BeforeEnd",ObjStr)
if(parseInt(window.navigator.appVersion.split(";")[1].substr(5))>=6){
window.opener=''
setTimeout("self.close();",3000) 
}
else Cls.Click()
}
</script>
<%
if not Request.ServerVariables("REMOTE_ADDR")=request.cookies("IPAddress") then
   response.cookies("IPAddress")=Request.ServerVariables("REMOTE_ADDR")
%>
<!--#include file="dbconn.asp"-->
<%
dim rs
dim sql
dim selected
selected=request.form("aaa")
set rs=server.createobject("adodb.recordset")
sql="update research set select"&selected&"=select"&selected&"+1 where id=1"
'Response.write(sql)
'Response.end()
rs.open sql,conn,3,3
set rs=nothing
conn.close
set conn=nothing
response.redirect "result.asp"
else
  Response.write "您已经投了票，谢谢您的支持！<br>"
  Response.write "本窗口将于3秒后自动关闭，谢谢关注！"
end if
%>