modifyscore.asp

网络会议系统,WEB的。喜欢的下吧

<!--#include file="Const.asp"-->

<%
'ModifyScore?UID=xxx&CID=xxx&Score=xxx
'	其中:
'		Score：表示课堂分变化，正值为加分，负值为减分
%>

<%
	set cn=server.CreateObject("ADODB.connection")
	cn.Open DSN_ACLASS
	' return
	set rs=server.CreateObject("ADODB.recordset")
	rs.Open "select Fraction from CLASSUSER where UID="&request("UID")&" and CID="&request("CID")&"",cn
	if not rs.eof then
		' update score
		SCORE=rs("Fraction")+clng(request("score"))
		rs.close
		cn.execute "update CLASSUSER set Fraction="&SCORE&" where UID="&request("UID")&" and CID="&request("CID")&""
		' TODO: write USER_COURSE_LOG
	end if

	set rs=nothing
	cn.close
	set cn=nothing
%>