📄 admindatabasesaveedit.asp

📁 网络考试系统最终备份

💻 ASP

字号:

<!--#include file="conn.inc"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" type="text/css" href="css.css">
</head>

<body>
<%
id=request("id")
sid=request("sub_id")
typeadd=request("qtype")

v_sknow = request("sknow")
v_dif = request("fdif_button")





if typeadd="0" then

  sql="select * from question_database where QueID="&id
  set rs=server.createobject("adodb.recordset")
  rs.open sql,conn,3,2
  rs("Sub_ID")=sid
  rs("Que_Type")=typeadd
  rs("Question")=request("question")
  rs("Option1")= request("Option1")
  rs("Option2")= request("Option2")
  rs("Option3")= request("Option3")
  rs("Option4")= request("Option4")
  rs("Option5")= request("Option5")
  rs("Option6")= request("Option6")
  rs("StandKey")= request("answer")
  
  rs("DiffRate") = v_dif
  rs("Knowledge_ID") = v_sknow
  rs("setTime") = now
  
  rs.update
  rs.close
  set rs = nothing
end if

if typeadd="1" then

  sql="select * from question_database where QueID="&id
  set rs=server.createobject("adodb.recordset")
  rs.open sql,conn,3,2
  rs("Sub_ID")=sid
  rs("Que_Type")=typeadd
  rs("Question")=request("question")
  rs("Option1")= request("Option1")
  rs("Option2")= request("Option2")
  rs("Option3")= request("Option3")
  rs("Option4")= request("Option4")
  rs("Option5")= request("Option5")
  rs("Option6")= request("Option6")
  rs("StandKey")= request("answer")
  
  
    
  rs("DiffRate") = v_dif
  rs("Knowledge_ID") = v_sknow
  rs("setTime") = now
  
  
  rs.update
  rs.close
  set rs = nothing
end if



if typeadd="2" then
  sql="select * from question_database where QueID="&id
  set rs=server.createobject("adodb.recordset")
  rs.open sql,conn,3,2
  rs("Sub_ID")=sid
  rs("Que_Type")=typeadd
  rs("Question")=request("question")
  rs("StandKey")=request("answer")
  
  
  
    
  rs("DiffRate") = v_dif
  rs("Knowledge_ID") = v_sknow
  rs("setTime") = now
  rs.update
end if
response.Write("试题修改成功")

%>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -