<!-- #include file="cookies.asp" -->
<!-- #include file="conn/conn.asp" -->
<%

select case request.form("qtype")
 case "1"
  if len(trim(request.form("rightkey")))>1 then
  x="no"
%>
<script language=javascript>
window.alert("此為單選題，而你選擇了多個答案")
history.go(-1)
</script>
<%
 end if
case "2"
end select

if trim(request.form("rightkey"))="" then
  x="no"
%>
<script language=javascript>
window.alert("您還未選擇答案")
history.go(-1)
</script>
<%
end if 


if x<>"no" then
'檢查通過,修改題目
set rs=server.createobject("adodb.recordset")
sql="select * from question where qid='"&trim(request.form("qid"))&"'"
rs.open sql,conn,1,3

rs("qname")=trim(request.form("qname"))
rs("qtype")=trim(request.form("qtype"))
rs("key1")=trim(request.form("key1"))
rs("key2")=trim(request.form("key2"))
rs("key3")=trim(request.form("key3"))
rs("key4")=trim(request.form("key4"))
rs("key5")=trim(request.form("key5"))
rs("key6")=trim(request.form("key6"))
rs("rightkey")=trim(request.form("rightkey"))
rs("addtime")=date()
rs("adduser")=sname

rs.update
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
<script language=javascript>
window.alert("成功編輯一道題目")
window.close();
</script>
<%
end if%>