大工15秋《软件工程》大作业题目及要求答案(4)

response.write \ rs3.movenext loop

rs3.close set rs3=nothing %>

 

'如果是第一次打开就将默认的省值赋值给变量dqsj if dqsj=\

sql=\

set rs4=server.createobject(\ rs4.open sql,conn,1,1

if not rs4.eof and not rs4.bof then end if rs4.close

dqsj=rs4(\

set rs4=nothing

end if

sql=\

set rs3=server.createobject(\ rs3.open sql,conn,1,1

do while not rs3.eof

response.write \ response.write \ rs3.movenext loop

rs3.close set rs3=nothing %>

 

**

set gwmcrs=server.createobject(\

gwmcsql=\

gwmcrs.open gwmcsql,conn,1,1

if not gwmcrs.eof and not gwmcrs.bof then

for i=1 to gwmcrs.recordcount

if gwmcrs.eof then exit for

response.write \

response.write \

gwmcrs.movenext

end if gwmcrs.close set gwmcrs=nothing

next

%> **

3.3.3 在考试系统的主界面index.asp中，输入正确的考号01、身份证号15个1和密码11后，就可以有权限进入系统的内部了。输入正确后，点击主界面中的“确定”按钮，系统自动提交用户的信息，对用户提交的信息进行检查，看提交的用户名是否在数据库内，如果在数据库内，则再检查用户输入的密码和用户名是否匹配，如果不匹配则给予相应的错误提示该用户的用户名或密码错误，请核实后再登陆信息；如果用户名和密码相匹配，则给予该登陆用户相应的权限予以登陆，跳转到用户选择页面userselect.asp中（可选择考试或则差分）。

选择页面如图：

选择正在考试如下图：

程序核心代码如下所示：