仓酷云

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 588|回复: 9
打印 上一主题 下一主题

[学习教程] ASP网页设计收集科场(9)(转)taddsub.asp

[复制链接]
海妖 该用户已被删除
跳转到指定楼层
楼主
发表于 2015-1-16 23:33:06 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
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:24 | 只看该作者
兴趣爱好,那么你无须学编程,申请一个域名和空间,在网上下载一些免费开源的CMS系统,你不用改代码,只须熟悉它们的后台操作,像office一样简单方便,很快就能建一个站点,很多站长都是这样做的
admin 该用户已被删除
板凳
发表于 2015-1-24 12:37:22 | 只看该作者
ASP(ActiveServerPages)是Microsfot公司1996年11月推出的WEB应用程序开发技术,它既不是一种程序语言,也不是一种开发工具,而是一种技术框架,不须使用微软的产品就能编写它的代码,能产生和执行动态、交互式、高效率的站占服务器的应用程序。
飘飘悠悠 该用户已被删除
地板
发表于 2015-1-28 21:15:10 | 只看该作者
虽然ASP也有很多网络教程。但是这些都不系统。都是半路出家,只是从一个例子告诉你怎么用。不会深入讨论,更不会将没有出现在例子里的方法都一一列举出来。
谁可相欹 该用户已被删除
5#
发表于 2015-1-29 06:26:51 | 只看该作者
Request:从字面上讲就是“请求”,因此这个是处理客户端提交的东东的,例如Resuest.Form,Request.QueryString,或者干脆Request("变量名")
不帅 该用户已被删除
6#
发表于 2015-2-5 20:25:32 | 只看该作者
ASP也是这几种脚本语言中最简单易学的开发语言。但ASP也是这几种语言中唯一的一个不能很好支持跨平台的语言。  因为ASP脚本语言非常简单,因此其代码也简单易懂,结合HTML代码,可快速地完成网站的应用程序。
莫相离 该用户已被删除
7#
发表于 2015-2-13 07:40:43 | 只看该作者
在平时的学习过程中要注意现学现用,注重运用,在掌握了一定的基础知识后,我们可以尝试做一些网页,也许在开始的时候我们可能会遇到很多问题,比如说如何很好的构建基本框架。
飘灵儿 该用户已被删除
8#
发表于 2015-3-11 11:55:01 | 只看该作者
用户端的浏览器不需要提供任何别的支持,这样大提高了用户与服务器之间的交互的速度。
海妖 该用户已被删除
9#
 楼主| 发表于 2015-3-18 10:06:52 | 只看该作者
运用ASP可将VBscript、javascript等脚本语言嵌入到HTML中,便可快速完成网站的应用程序,无需编译,可在服务器端直接执行。容易编写,使用普通的文本编辑器编写,如记事本就可以完成。由脚本在服务器上而不是客户端运行,ASP所使用的脚本语言都在服务端上运行。
若天明 该用户已被删除
10#
发表于 2015-3-25 15:50:01 | 只看该作者
ASP主要是用好六个对象,其实最主要的是用好其中两个:response和request,就可以随心所欲地控制网页变换和响应用户动作了。
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|仓酷云 鄂ICP备14007578号-2

GMT+8, 2024-11-15 13:54

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表