ASP教程之复杂的分页函数
无法实现跨操作系统的应用。当然这也是微软的理由之一,只有这样才能发挥ASP最佳的能力。可是我却认为正是Windows限制了ASP,ASP的概念本就是为一个能让系统运行于一个大的多样化环境而设计的;分页|函数<%onerrorresumenext
分页程序
functionfy(scount,pgsize,pg,url)
scount纪录总数
pgsize每面纪录数
pg以后页
url转向的地点,运转本函数后会在前面加上"&page=页号"
dimpgcount,i,j,mh,k
mh=chr(34)欠好意义,是双引号
cint()会四舍五进,以是不能不加个k
k=(scount+pgsize-1)/pgsize
pgcount=cint((scount+pgsize-1)/pgsize)
ifpgcount>kthenpgcount=pgcount-1
response.write"<ahref="+mh+url+"&page=1"+mh+">[第一页]</a>"
ifcint(pg)>cint(1)then
response.write"<ahref="+mh+url+"&page="+cstr(pg-1)+mh+">[上一页]</a>"
endif
ifcint(pg)>5then
i=cint(pg)-5
else
i=1
endif
ifcint(pgcount)<cint(pg+5)then
j=pgcount
else
j=pg+5
endif
whilecint(i)<=cint(j)
ifcint(i)=cint(pg)then
response.writecstr(i)+""
else
response.write"<ahref="+mh+url+"&page="+cstr(i)+mh+">"+cstr(i)+"</a>"
endif
i=i+1
wend
ifcint(pgcount)>cint(pg)then
response.write"<ahref="+mh+url+"&page="+cstr(pg+1)+mh+">[下一页]</a>"
endif
response.write"<ahref="+mh+cstr(url)+"&page="+cstr(pgcount)+mh+">[最初页]</a>"
endfunction
%></p>写软件都是想的时间比写的时间要长的.如果反过来了就得看看是什么原因了.另外大家可以回去问问公司里的小MM.(一般企业里,跟你们交付软件接触得最多的是她们) ASP的语言不仅仅只是命令格式差不多,而是包含在<%%>之内的命令完全就是VB语法。虽然ASP也是做为单独的一个技术来提出的,但他就是完全继承了VB所有的功能。 我可以结合自己的经验大致给你说一说,希望对你有所帮助,少走些弯路。 下载一个源代码,然后再下载一个VBScript帮助,在源代码中遇到不认识的函数或是其他什么程序,都可以查帮助进行解决,这样学习效率很高。 Server:这个表示的服务器,操作服务器的一些东西使用这个,如Server.Mappath转换服务器路径,Server.CreateObject实例化一个组件 还有如何才能在最短的时间内学完?我每天可以有效学习2小时,双休日4小时。 尽管MS自己讲C#内核中更多的象VC,但实际上我还是认为它和Java更象一些吧。首先它是面向对象的编程语言,而不是一种脚本,所以它具有面向对象编程语言的一切特性,比如封装性、继承性、多态性等等,这就解决了刚才谈到的ASP的那些弱点。 交流是必要的,不管是生活还是学习我们都要试着去交流,通过交流我们可以学到很多我们自己本身所没有的知识,可以分享别人的经验甚至经历。 掌握asp的特性而且一定要知道为什么。
页:
[1]