<%dimstudent_name,student_nostudent_name=session("student_name")student_no"> <%dimstudent_name,student_nostudent_name=session("student_name")student_no" />
在线考试系统源代码.doc

在线考试系统源代码.doc

ID:56747428

大小:157.00 KB

页数:14页

时间:2020-07-07

在线考试系统源代码.doc_第1页
在线考试系统源代码.doc_第2页
在线考试系统源代码.doc_第3页
在线考试系统源代码.doc_第4页
在线考试系统源代码.doc_第5页
资源描述:

《在线考试系统源代码.doc》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库

1、课程删除源代码:<%@LANGUAGE="VBSCRIPT"CODEPAGE="936"%><%dimstudent_name,student_nostudent_name=session("student_name")student_no=session("student_no")student_password=session("student_password")ifsession("student_name")=emptythenresponse.write"您还没有登录,请

2、">返回登录

"response.endendif'建立Connection对象setconn=Server.CreateObject("adodb.connection")'定义OLEDB连接字符串'provider="provider=microsoft.jet.oledb.4.0;"'dbpath="datasource="&server.mappath("/webtest/data/webtest.mdb")'打开连接'conn.openprovider&dbpathcnnstr="DBQ="+server.mappath("data/w

3、ebtest.mdb")+";DefaultDir=;DRIVER={MicrosoftAccessDriver(*.mdb)};"'打开连接'conn.openprovider&dbpathconn.opencnnstr'创建command对象setcmd=server.CreateObject("adodb.command")'将connection对象指定给command对象setcmd.activeconnection=conn'创建recordset对象setrs=Server.CreateObject("adodb.recordset")rs.lock

4、type=2'将锁定类型设为保守式dimsql1sql1="select所学课程fromstudent_subjectwhere学生学号='"&student_no&"'"rs.opensql1,conn,3ifrs.eofthenresponse.write"您还没有选择课程,请返回选择课程

"rs.closeresponse.endendif%>学生删除课程

5、v="Content-Type"content="text/html;charset=gb2312"><%=session("student_name")%>同学删除课程


<%ifrequest("send")=emptythen%>

6、ordercolor="#"> 

<%rs.MoveFirst'将当前的数据记录移到第一项%><%WhileNotrs.EOF'判断是否已经过了最后一项%>>   &

7、nbsp;

<%=rs(0)%><%rs.MoveNext'移到下一项%><%Wend%> 

8、send"

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。