www.gusucode.com > 共享世纪内容管理系统 2.1 build 080704 全站开源版 > admin/VoteAdd.asp
<!--#include file="top.asp"--> <html> <head> <title>投票管理 -共享世纪新闻文章管理系统</title> <meta copy="WWW.2KY.CN 共享世纪"> <link rel="stylesheet" href="admin.css" type="text/css"> <%Admin="InfoInsert"%> <!--#include file="check.asp"--> <!--#include file="mdb_path_vote.asp"--> <% '========================================== ' ' 晓宇听幽新闻文章管理系统 2004 ' ' 主页地址:http://www.xoYu.com ' '========================================== '程序名称:晓宇听幽新闻文章管理系统 '英文名称:xoYu News 2004 Professional '程序创建时间:2003-7-10 '程序完成时间:2003-9-11 '最后修改时间:2003-10-10 '========================================== if request.form("action")="add" then set rs=conn.execute("select VoteClassID from VoteClass where Title='"&request.form("title")&"'") if not rs.eof then Call Warn("标题不能重复"):response.end x=false for i=1 to request.form("VoteOper").count if request.form("VoteOper")(i) <>"" then x=true end if next if x=false then Call Warn("最少输入一个选项"):response.end set rs=server.createobject("adodb.recordset") sql="select title,type,AddDate from VoteClass" rs.open sql,conn,3,3 rs.addnew rs("title")=request.form("title") rs("type")=request.form("type") rs("Adddate")=now() rs.update rs.close set rs=nothing set rs=conn.execute("select VoteClassID from VoteClass where Title='"&request.form("title")&"'") VoteClassID=rs("VoteClassID") rs.close set rs=nothing for i=1 to request.form("VoteOper").count if request.form("VoteOper")(i) <>"" then conn.execute("insert into vote (VoteOper,VoteClassID,count) values ('"&request.form("VoteOper")(i)&"','"&VoteClassID&"',0)") end if next Call Warn("添加成功") response.redirect"Votemanage.asp" end if %> <body> <form name=form method=post action"" onsubmit="return CheckVote()"> <table width="380" border="0" cellspacing="1" cellpadding="3" align=center class="tableBorder"> <tr> <th height="25" align="center" onMouseOver=this.style.backgroundColor='#FAFBFC'; onMouseOut=this.style.backgroundColor=''; this.style.cursor='hand'; > <p>投票内容</p></th> </tr> <tr> <td height="25" align="center" class=forumrow onMouseOver=this.style.backgroundColor='#FAFBFC'; onMouseOut=this.style.backgroundColor=''; this.style.cursor='hand'; > <p>标题: <input type="text" name="Title" size="30"> </p></td> </tr> <tr> <td height="25" align="center" class=forumrow onMouseOver=this.style.backgroundColor='#FAFBFC'; onMouseOut=this.style.backgroundColor=''; this.style.cursor='hand'; >方式: <input type="radio" name="type" value="radio" checked> 单选 <input type="radio" name="type" value="checkbox"> 多选</td> </tr> <tr> <td height="25" align="center" class=forumrow onMouseOver=this.style.backgroundColor='#FAFBFC'; onMouseOut=this.style.backgroundColor=''; this.style.cursor='hand'; >选项: <input type="text" name="VoteOper" size="30"> </td> </tr> <tr> <td height="25" align="center" class=forumrow onMouseOver=this.style.backgroundColor='#FAFBFC'; onMouseOut=this.style.backgroundColor=''; this.style.cursor='hand'; >选项: <input type="text" name="VoteOper" size="30"> </td> </tr> <tr> <td height="25" align="center" class=forumrow onMouseOver=this.style.backgroundColor='#FAFBFC'; onMouseOut=this.style.backgroundColor=''; this.style.cursor='hand'; >选项: <input type="text" name="VoteOper" size="30"> </td> </tr> <tr> <td height="25" align="center" class=forumrow onMouseOver=this.style.backgroundColor='#FAFBFC'; onMouseOut=this.style.backgroundColor=''; this.style.cursor='hand'; >选项: <input type="text" name="VoteOper" size="30"> </td> </tr> <tr> <td height="25" align="center" class=forumrow onMouseOver=this.style.backgroundColor='#FAFBFC'; onMouseOut=this.style.backgroundColor=''; this.style.cursor='hand'; >选项: <input type="text" name="VoteOper" size="30"> </td> </tr> <tr> <td height="25" align="center" class=forumrow onMouseOver=this.style.backgroundColor='#FAFBFC'; onMouseOut=this.style.backgroundColor=''; this.style.cursor='hand'; >选项: <input type="text" name="VoteOper" size="30"> </td> </tr> <tr> <td height="25" align="center" class=forumrow onMouseOver=this.style.backgroundColor='#FAFBFC'; onMouseOut=this.style.backgroundColor=''; this.style.cursor='hand'; >选项: <input type="text" name="VoteOper" size="30"> </td> </tr> <tr> <td height="25" align="center" class=forumrow onMouseOver=this.style.backgroundColor='#FAFBFC'; onMouseOut=this.style.backgroundColor=''; this.style.cursor='hand'; >选项: <input type="text" name="VoteOper" size="30"> </td> </tr> <tr> <th height="25" align="center" onMouseOver=this.style.backgroundColor='#FAFBFC'; onMouseOut=this.style.backgroundColor=''; this.style.cursor='hand'; > <input type="submit" name="Submit" value=" 添 加 "> <input type="hidden" name="action" value="add"> <input type="reset" name="Submit2" value=" 还 原 "> </th> </tr> </table> </form> </body> </html> <%Sub Warn(depict)%> <script luanage=javascript> history.back() alert("<%=depict%>") </script> <%end Sub%>