|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
无法实现跨操作系统的应用。当然这也是微软的理由之一,只有这样才能发挥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.(一般企业里,跟你们交付软件接触得最多的是她们) |
|