ASP网页编程之用ASP完成分页显示的具体解说

当然了,现在国内CRM厂商的产品与其说是CRM,但从至少从我的角度分析上来看,充其量只是一个大型的进销存而已了,了解尚浅,不够胆详评,这里只提技术问题分页|显示   　　一. 表 结 构 定 义:
　 ---- 表 名:Product ---- 表 名:Product ---- 字 段 名: 产 品 编号:Product_Id ---- 产 品 名 称:Product_Name
　　二. 功 能 描 述:
　 ---- 用 户 输 入 产 品 号, 不 必 输 入全 名. 采 用 模 糊 查 询 的 方 法. 找 到 满 足 条 件 的 纪 录. ---- 用 户 输 入 产 品 号, 不 必 输 入全 名. 采 用 模 糊 查 询 的 方 法. 找 到 满 足 条 件 的 纪 录.
　　三. 程 序 脚 本
---- 整 个 程 序 有 三 个Asp 文 件( 省略Html 语 言 部 分)
---- 整 个 程 序 有 三 个Asp 文 件( 省略Html 语 言 部 分)
---- 1 用 户 查 询 数据 输 入 表 单:Input.Asp
-----用户输出产物编号
< Form Method="Post" Action="/Cgi/Prod.Asp" >
< Input Type="Text" Name="Id" Size="20" >
< Input Type="Submit" Value="Submit" Name="B1" >
< /Form >
　　2.分页处置法式之一:Prod.Asp
　　----用户提交表单Input.Asp后触发
< %Cid=Trim(Request.Form("Id"))% >
< %Set Rlt = Createobject("Adodb.Recordset")% > ******创立Recordset对象
< %Sql="Select * From Product Where Product_Id Like ' "& Cid &"'+'%'" >
< %Rlt.Open Sql,"Uid=Ncgi;Pwd=Sql;Dsn=Tcgi",1% > ******履行Sql语句
< % If Rlt.Pagecount< 1 Then % >
< H2 >没有记载< /H2 >
< A Href="Javascript:History.Back()" > 前往< /A >
< %Else% >
*****以下显示查询信息:显示款式:
*****共有XX页XXX条记载 页号:1 .2 .3. 4. 5......... 共有< %=Rlt.Pagecount% >页
< %=Rlt.Recordcount% >条记载
页号:< % For I=1 To Rlt.Pagecount% >
< %cid=rlt("product_id") < AHref="Prodpage.Asp?Pcnt=< %=I% >&id=< %=cid% > >
< %=I% >.< /A >
　　< %Next % >
　　< /A >
　　< Hr >
　　< %Rlt.Pagesize=20% >
　　******以下显示产物列表:显示款式: ******1.XXXX ******2.XXXX ****** ...........
　　< %Rlt.Absolutepage=1% >
　　< % For I=1 To Rlt.Pagesize% >
　　< % If Rlt.Eof Then Exit For End If% >
　　< Li >< %=I% >.
　　< %=Trim(Rlt("Product_Name"))< /Li >
　　< %Rlt.Movenext Next% >
　　< %Rlt.Close% >
　　3.分页处置法式之二:Propage.Asp
　　----用户选择 (页号:1 .2 .3. 4. 5.........)中某页号后触发
　　< %Cid=Trim(Request.querystring("Id"))% >
　　< %Rlt.Absolutepage=Request.Querystring("Pcnt")% > ******以上局部与Prod.Asp不异 *****
　　< % For I=1 To Rlt.Pagesize% >
　　< % If Rlt.Eof Then Exit For End If% >
　　< Li >< %=I% >. < %=Trim(Rlt("Product_Name"))< /Li >
　　< %Rlt.Movenext Next% >
　　< %Rlt.Close% >
　　四。 补 充 说 明：
　　---- 你 可 以 让 用 户 设 置 每 页 的长 度。 方 法 是 用Session 对 象 维 护 用 户 信 息 接 受 用 户 设 相信 息： ---- 你 可 以 让 用 户 设 置 每 页 的长 度。 方 法 是 用Session 对 象 维 护 用 户 信 息 接 受 用 户 设 相信 息：
< %session（"size"）=request.form("size")% >
　　把Prod.asp中 < %Rlt.Pagesize=20% >一句用以下语句取代 < %if session("size")="" then rlt.pagesize=20 else rlt.pagesize=session("size") end if% >
　　疑问解析
　　1.分页功效的关头: Pagesize Absolutepage属性的使用 Pagesize: 每页记载巨细 Absolutepage:光标定位到那一页.好比说有20条记载,分红两页,每页十条 Absolutepage=1则从第一条记载入手下手。 Absolutepage=2则从第十一条记载入手下手。
　　2.< %Rlt.Open Sql,"Uid=Ncgi;Pwd=Sql;Dsn=Tcgi",1% > Dsn:体系数据源名,Uid:用户名,Pwd:用户暗码,1:光标类型 你必需在掌握面板-- > 32位Odbc中创立体系数据源,记住是体系数据源而不是用户数据源光标类型:0,是默许值,但假如你想完成分页功效光标类型必需设为1 否则 Recordcount Pagesize Pagecount属性都不克不及用.
　　3.request.form("id")和request.querystring("id"） 的名字是id request.querystring("id"）指从URL中承受数据
asp，你就只能等着微软给你解决，它不乐意你就只好悲催。而且asp跑在windows服务器上，windows服务器跟linux比起来简直弱爆了！

虽然ASP也有很多网络教程。但是这些都不系统。都是半路出家，只是从一个例子告诉你怎么用。不会深入讨论，更不会将没有出现在例子里的方法都一一列举出来。

跟学别的语言一样，先掌握变量，流程控制语句(就是ifwhileselect)等，函数/过程，数组

如何更好的使自己的东西看上去很不错等等。其实这些都不是问题的实质，我们可以在实践中不断提升自己，不断充实自己。

掌握asp的特性而且一定要知道为什么。

我想问如何掌握学习节奏(先学什么再学什么)最好详细点?

Session:这个存储跟客户端会话过程的数据，默认20分钟失效

下载一个源代码，然后再下载一个VBScript帮助，在源代码中遇到不认识的函数或是其他什么程序，都可以查帮助进行解决，这样学习效率很高。

代码逻辑混乱，难于管理：由于ASP是脚本语言混合html编程，所以你很难看清代码的逻辑关系，并且随着程序的复杂性增加，使得代码的管理十分困难，甚至超出一个程序员所能达到的管理能力，从而造成出错或这样那样的问题。

用户端的浏览器不需要提供任何别的支持，这样大提高了用户与服务器之间的交互的速度。

运用ASP可将VBscript、javascript等脚本语言嵌入到HTML中，便可快速完成网站的应用程序，无需编译，可在服务器端直接执行。容易编写，使用普通的文本编辑器编写，如记事本就可以完成。由脚本在服务器上而不是客户端运行，ASP所使用的脚本语言都在服务端上运行。

他的语法和设计思路和VB完全相同，导致很多ASP的书都留一句“相关内容请参考VB的相关教材....”更糟糕的是，相当多的ASP教程混合了Javascript,VBscript等等脚本语言，搞的初学者。

弱类型造成潜在的出错可能：尽管弱数据类型的编程语言使用起来回方便一些，但相对于它所造成的出错几率是远远得不偿失的。

交流是必要的，不管是生活还是学习我们都要试着去交流，通过交流我们可以学到很多我们自己本身所没有的知识，可以分享别人的经验甚至经历。

以HTML语言整合(HTML负责界面上，ASP则负责功能上)形成一个B/S(浏览器/服务器)模式的网页程序。

Request:从字面上讲就是“请求”，因此这个是处理客户端提交的东东的,例如Resuest.Form，Request.QueryString,或者干脆Request("变量名")

没有坚实的理论做基础，那么我们连踏入社会第一步的资本都没有，特别对于计算机专业的学生学好专业知识是置关重要的。在这里我侧重讲一下如何学习ASP，从平时的学习过程中。

完全不知道到底自己学的是什么。最后，除了教程里面说的几个例子，还是什么都不会。

下面简单介绍一下我学习ASP的方法,希望对想学习ASP的朋友有所帮助...

交流是必要的，不管是生活还是学习我们都要试着去交流，通过交流我们可以学到很多我们自己本身所没有的知识，可以分享别人的经验甚至经历。