仓酷云

标题: ASP网页设计收集科场(9)(转)taddsub.asp [打印本页]

作者: 海妖    时间: 2015-1-16 23:33
标题: ASP网页设计收集科场(9)(转)taddsub.asp
asp可以使用微软的activeX使得网页功能无比强大,不过安全性也较差,而且是基于的windows服务器,所以性能稳定性也一般收集<%@Language=VBScript%>
<%
ifRequest.ServerVariables("http_method")="GET"then
假如是以GET体例哀求页面,则将页码定为1
page=1
endif
setrec=server.CreateObject("adodb.recordset")
rec.ActiveConnection="dsn=testsys"
rec.Source="select*fromsubinfowhereteachid="&session("teachid")&""
将课程表中一切teachid=以后教员编号的纪录查找出来
rec.Open,,1,3
ifRequest.ServerVariables("http_method")="POST"then
page=cint(Request.Form("page"))
ifRequest.Form("submit")="到场"then
处置到场新的课程的哀求
rec.AddNew
rec("teachid")=session("teachid")
rec("sub")=Request.Form("subname")
rec("testtime")=Request.Form("testtime")
rec("testnum")=Request.Form("testnum")
rec.Update
endif
ifRequest.Form("submit")="修正"then
处置修正课程的哀求
rec.PageSize=1
将页码设置为以后页
rec.AbsolutePage=page
依据提交的课程内容举行修正
rec("teachid")=session("teachid")
rec("sub")=Request.Form("subname")
rec("testtime")=Request.Form("testtime")
rec("testnum")=Request.Form("testnum")
rec.Update
page=cint(Request.Form("page"))
elseifRequest.Form("submit")="前一个"then
假如请求显现前一个纪录,则页码-1
page=page-1
else
请求显现后一个纪录,页码+1
page=page+1
endif
endif
ifnotrec.BOFandnotrec.EOFthen
假如课程纪录不为空
rec.PageSize=1
依据页码设定以后的纪录地位
rec.AbsolutePage=page
依据以后纪录获得课程信息
subname=rec("sub")
testtime=rec("testtime")
testnum=rec("testnum")
ifpage>1then
假如页码>1,则字符串变量prebut="false",依据该变量
在window_onload事务中设定按扭(id=submit3,value="前一个")
的disabled值决意该按扭是不是可用
以下的nextbut、revisebut变量感化相似
prebut="false"
else
假如以后页码<0则设定prebut="true"设定"前一个"按扭不成用
prebut="true"
endif
ifcint(page)<rec.PageCountthen
以后页码<最年夜页码,则设定"后一个"按扭可用
nextbut="false"
else
设定"后一个"按扭不成用
nextbut="true"
endif
修正按扭可用
revisebut="false"
else
revisebut="true"
prebut="true"
nextbut="true"
endif
dimpagecount以后课程的总数
pagecount=rec.PageCount
rec.Close
setrec=nothing
%>
<html>
<head>
<metaNAME="GENERATOR"Content=&</p>由于ASP还是一种Script语言所没除了大量使用组件外,没有办法提高其工作效率。它必须面对即时编绎的时间考验,同时我们还不知其背后的组件会是一个什么样的状况;
作者: 金色的骷髅    时间: 2015-1-22 19:38
兴趣爱好,那么你无须学编程,申请一个域名和空间,在网上下载一些免费开源的CMS系统,你不用改代码,只须熟悉它们的后台操作,像office一样简单方便,很快就能建一个站点,很多站长都是这样做的
作者: admin    时间: 2015-1-24 12:37
ASP(ActiveServerPages)是Microsfot公司1996年11月推出的WEB应用程序开发技术,它既不是一种程序语言,也不是一种开发工具,而是一种技术框架,不须使用微软的产品就能编写它的代码,能产生和执行动态、交互式、高效率的站占服务器的应用程序。
作者: 飘飘悠悠    时间: 2015-1-28 21:15
虽然ASP也有很多网络教程。但是这些都不系统。都是半路出家,只是从一个例子告诉你怎么用。不会深入讨论,更不会将没有出现在例子里的方法都一一列举出来。
作者: 谁可相欹    时间: 2015-1-29 06:26
Request:从字面上讲就是“请求”,因此这个是处理客户端提交的东东的,例如Resuest.Form,Request.QueryString,或者干脆Request("变量名")
作者: 不帅    时间: 2015-2-5 20:25
ASP也是这几种脚本语言中最简单易学的开发语言。但ASP也是这几种语言中唯一的一个不能很好支持跨平台的语言。  因为ASP脚本语言非常简单,因此其代码也简单易懂,结合HTML代码,可快速地完成网站的应用程序。
作者: 莫相离    时间: 2015-2-13 07:40
在平时的学习过程中要注意现学现用,注重运用,在掌握了一定的基础知识后,我们可以尝试做一些网页,也许在开始的时候我们可能会遇到很多问题,比如说如何很好的构建基本框架。
作者: 飘灵儿    时间: 2015-3-11 11:55
用户端的浏览器不需要提供任何别的支持,这样大提高了用户与服务器之间的交互的速度。
作者: 海妖    时间: 2015-3-18 10:06
运用ASP可将VBscript、javascript等脚本语言嵌入到HTML中,便可快速完成网站的应用程序,无需编译,可在服务器端直接执行。容易编写,使用普通的文本编辑器编写,如记事本就可以完成。由脚本在服务器上而不是客户端运行,ASP所使用的脚本语言都在服务端上运行。
作者: 若天明    时间: 2015-3-25 15:50
ASP主要是用好六个对象,其实最主要的是用好其中两个:response和request,就可以随心所欲地控制网页变换和响应用户动作了。




欢迎光临 仓酷云 (http://ckuyun.com/) Powered by Discuz! X3.2