pingfen.asp

可以进行智能出卷,在线测试和在线评价,界面友好,适合广大教学用户使用

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

%>