ASP教程之收集科场(11)(转)teditquestion.as...
asp,你就只能等着微软给你解决,它不乐意你就只好悲催。而且asp跑在windows服务器上,windows服务器跟linux比起来简直弱爆了!收集<%@Language=VBScript%><%
ifRequest.ServerVariables("http_method")="POST"then
提交体例对试题举行操纵
setmrs=server.CreateObject("adodb.recordset")
mrs.ActiveConnection="dsn=testsys"
mrs.Source="select*fromquestionwhereteachid="&session("teachid")&"andsub="&Request.Form("selsub")&""
翻开与以后教员编号和选择课程的称号分歧的recordset
mrs.Open,,1,3
ifRequest.Form("submit")="删除"then
实行删除操纵
page=Request.Form("page")
指向要删除的纪录
mrs.PageSize=1
mrs.AbsolutePage=page
删除并更新
mrs.Delete
mrs.Update
ifRequest.Form("page")>1then
page=Request.Form("page")-1
else
page=1
endif
endif
ifRequest.Form("submit")="修正"then
实行修正操纵
page=Request.Form("page")
指向要修正的纪录
mrs.PageSize=1
mrs.AbsolutePage=page
依据提交的内容修正以后纪录
mrs("teachid")=session("teachid")
mrs("sub")=Request.Form("selsub")
mrs("question")=Request.Form("question")
mrs("A")=Request.Form("opta")
mrs("B")=Request.Form("optb")
mrs("C")=Request.Form("optc")
mrs("D")=Request.Form("optd")
mrs("answer")=Request.Form("answer")
mrs.Update
page=Request.Form("page")
elseifRequest.Form("submit")="前一个"then
实行检察前一个纪录的哀求
page=Request.Form("page")-1
elseifRequest.Form("submit")="后一个"then
实行检察后一个纪录的哀求
page=Request.Form("page")+1
elseifRequest.Form("submit")="断定"then
从选择课程的页面进进该页面时,将页数设定为1
page=1
endif
ifnotmrs.BOFandnotmrs.EOFthen
假如选择的数据库不为空
mrs.PageSize=1
mrs.AbsolutePage=page
寄存标题总数的变量
quesnum=mrs.PageCount
寄存以后标题序号的变量
currques=page
寄存标题内容的变量
question=mrs("question")
寄存标题选择谜底A-D内容的变量
opta=mrs("A")
&nb</p>当然了,现在国内CRM厂商的产品与其说是CRM,但从至少从我的角度分析上来看,充其量只是一个大型的进销存而已了,了解尚浅,不够胆详评,这里只提技术问题 弱类型造成潜在的出错可能:尽管弱数据类型的编程语言使用起来回方便一些,但相对于它所造成的出错几率是远远得不偿失的。 那么,ASP.Net有哪些改进呢? 还有如何才能在最短的时间内学完?我每天可以有效学习2小时,双休日4小时。 没有坚实的理论做基础,那么我们连踏入社会第一步的资本都没有,特别对于计算机专业的学生学好专业知识是置关重要的。在这里我侧重讲一下如何学习ASP,从平时的学习过程中。 那么,ASP.Net有哪些改进呢? 用户端的浏览器不需要提供任何别的支持,这样大提高了用户与服务器之间的交互的速度。 如何学好ASP,以前也有人问过,把回答给你转过来看看能否对你有帮助: ASP也是这几种脚本语言中最简单易学的开发语言。但ASP也是这几种语言中唯一的一个不能很好支持跨平台的语言。 因为ASP脚本语言非常简单,因此其代码也简单易懂,结合HTML代码,可快速地完成网站的应用程序。 Response:从字面上讲是“响应”,因此这个是服务端向客户端发送东西的,例如Response.Write 下载一个源代码,然后再下载一个VBScript帮助,在源代码中遇到不认识的函数或是其他什么程序,都可以查帮助进行解决,这样学习效率很高。 接下来就不能纸上谈兵了,最好的方法其实是实践。实践,只能算是让你掌握语言特性用的。而提倡做实际的Project也不是太好,因为你还没有熟练的能力去综合各种技术,这样只能使你自己越来越迷糊。
页:
[1]