pingfen.asp

来自「可以进行智能出卷,在线测试和在线评价,界面友好,适合广大教学用户使用」· ASP 代码 · 共 16 行

<!--#include file="../Connections/libconn.asp"-->
<!--#include file="../students/conn.asp"-->
<%
dim answers,answers1,answers2
sql="select answer from std where answer='"&answer1&"'"
sql="select answer from testselect1new where answer='"&answer2&"'"
set rs=conn.Execute(sql)
if ("answer1")=answer2 then
rs.update
end if
response.Write("<hr>")
response.Write("你的得分是:"&answer)
 rs.close
 conn.close

%>