vote_edit_choice.asp

来自「这是一个学生毕业时做的教务系统」· ASP 代码 · 共 95 行

<!--#include file=conn.asp-->
<%
IF not(Session("KEY")="super" or Session("KEY")="input") THEN
response.redirect "login.asp"
response.end
END IF
%>
<%
cid=request("cid")
id=request("id")
if request("actions")="1" then
   choice=trim(request("choice"))
   if request("current")="1" then
      def=true
   else
      def=false
   end if
   if choice="" then
	  response.write "<script language='javascript'>alert('选项内容不能为空!');history.go(-1);</script>"
   else
      set rs=server.CreateObject("adodb.recordset")
	  sql="select * from vote_smallclass where id="&cid
	  rs.open sql,conn,1,3
	  rs("choice")=choice
	  rs("IsDefault")=def
	  rs.update
	  rs.close
	  set rs=nothing
	  response.write "<script language='javascript'>alert('修改成功！');window.location.href='vote_add_choice.asp?id="&id&"';</script>"
   end if
else
set rs=server.CreateObject("adodb.recordset")
sql="select * from vote_smallclass where id="&cid
rs.open sql,conn
%>
<link href="news.css" rel="stylesheet" type="text/css">


<br>
<br>
<br>
<br>
<table width="70%"  border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#000000">
  <tr>
    <td height="25" valign="middle" bgcolor="abb8d6"> 
      <div align="center"><strong>投 票 主 题 选 项 修 改</strong></div></td>
  </tr>
</table>


<form name="form1" method="post" action="">
  <table width="70%"  border="0" align="center" cellpadding="2" cellspacing="1" bgcolor="#000000">
    <tr bgcolor="#FFFFFF"> 
      <td width="34%"> 
        <div align="center">选项内容
      </div></td>
      <td width="66%"> 
        <input name="choice" type="text" class="input" id="choice" value="<%=rs("choice")%>" size="30"></td>
    </tr>
    <tr bgcolor="#FFFFFF"> 
      <td> 
        <div align="center">是否默认</div></td>
      <td> 
        <%
	  if rs("IsDefault")=true then
	  %>
        <input type="radio" name="current" value="1" checked>
是
<input type="radio" name="current" value="2">
否
<%else%>
<input type="radio" name="current" value="1">
是
<input type="radio" name="current" value="2" checked>
否
<%end if%></td>
    </tr>
    <tr bgcolor="#FFFFFF"> 
      <td colspan="2"> 
        <div align="center">
        <input type="submit" name="Submit" value="提交">&nbsp;&nbsp;
        <input type="reset" name="Submit2" value="重置">
        <input name="actions" type="hidden" id="actions" value="1">
      </div></td>
    </tr>
  </table>
</form>
<p>&nbsp;</p>
<p>&nbsp;</p>
<p>&nbsp;</p>
<p>&nbsp;</p>
<%rs.close
set rs=nothing%>

<%end if%>