首页 > 语言 > 关键词 > asp最新资讯 > 正文

ASP实例代码:长文章分页代码设置方法

2007-08-20 10:01 · 稿源:网页教学网

 

以下为引用的内容:

<%
Class aspxsky_page
 Private Sub class_initialize
 End Sub

 Public Function Alert(message,gourl)
    message = replace(message,"'","\'")
    If gourl="-1" then
        Response.Write ("<script language=javascript>alert('" & message & "');history.go(-1)</script>")
    Else
        Response.Write ("<script language=javascript>alert('" & message & "');location='" & gourl &"'</script>")
    End If
    Response.End()
 End Function

 Public Sub showpage(str,page,url)
  if not isnumeric(page) then
    alert "提示:错误的参数!","-1"
  end if
  if page="" or page=0 or isnull(page) or isempty(page) then
    page=1
  else
    page=cint(page)
  end if
  str=split(str,"{nextpage}")
  abspage=page
  pcount=ubound(str)+1
  if page>cint(ubound(str)+1) or page<1 then
alert "提示:错误的参数!","-1"
  else
response.write str(page-1)&"<br><br><center> 共分为"&pcount&"页 "
  end if

  for p=0 to ubound(str)
 response.write "<a href="&url&"p="&p+1&">["&p+1&"]</a> "
  next
  response.write "当前第"&abspage&"/"&pcount&"页</center>"
 End Sub
End Class

'------------------调用-----------------------
p=request.QueryString("p")
str="第一页:这里是第一页的内容{nextpage}第二页:这里是第二页的内容"
url="shownews.asp?id="&id&"&"
set newpage=new aspxsky_page
newpage.showpage str,p,url
%>


  • 相关推荐
  • 大家在看
  • 斗鱼为转发攻击虎牙失实文章等行为致歉

    9月21日消息,斗鱼官微今日发布致歉声明,称此前在官方微博账号与官方微信公众号转发了《直播界黑公关事件曝光:虎牙再陷泥潭被指攻击斗鱼》、刊载《向黑公关SAYNO!》等失实文章,并向公众传播“虎牙公司是所谓黑公关”的虚假、误导性信息。上述虚假、误导性内容在网络上公开传播,直接侵害了广州虎牙信息科技有限公司及虎牙直播平台的商业信誉,产生了负面的影响。斗鱼的行为已被法院认定构成不正当竞争。据悉,2018年

  • 爱玛配置好不好,看完这篇文章你就了解了

    说其爱玛,大家对她时尚潮流的外观非常喜爱。不过也有些小伙伴有疑惑,长得这么好看,爱玛配置怎么样?作为国内知名电动车品牌,爱玛的产品可以说种类繁多,下面以E350(TZ-L4820 标准版)为例,为大家解答一下爱玛配置好不好的问题。这款E350 是爱玛 7 月的新款,在发布的新款豪锂车型里的算不上最高,也不算很低,用来比较分析正合适。(图注:爱玛E350)首先是电机,决定电动车性能的是电机的性能。E350 采用的是350W的博世电机

  • 家族群里的爆款文章,是怎么收割老年人的?

    互联网流量红利见顶,老年人市场这片蓝海,成了内容灰产盯上的新阵地。“秋天不要错过这个水果,一个等于 5 味药”、“村民发现山上有‘野人’,吃生鸡生玉米,原因是……”、“为满足丈夫,十年女子不穿……”

  • 想要开通微粒贷?不妨先看看这篇文章

    微粒贷自上线以来就备受好评,但是微粒贷采用的官方邀请制,只有受邀用户才能在微信支付和手Q钱包中看到微粒贷的入口。有很多想用微粒贷的朋友不知道该怎么做才能成为微粒贷的受邀用户,怎么才能开通微粒贷。而骗子就会趁虚而入,想要借此来骗取钱财,大家一定不要上当,看完这篇文章,你就会知道微粒贷是无法人工操作和申请开通的,任何特殊渠道开通都是骗人的。微粒贷征信微粒贷想要开通微粒贷?不妨先看看这篇文章如果你在微信支付和手Q?

  • 微信重大更新:聊天记录可隐藏,这里的文章终于能点“踩”了

    近日,微信iOS 内测更新至7.0. 16 版本,新增多项功能。(在微果酱后台回复“内测”获取最新内测版)而其中最亮眼的,是骚气十足的“海王”操作(bushi )。

  • 深入解析Lua脚本加密技术,给游戏代码加上“紧箍咒”

    不少安全专家表示,在互联网上失去对代码的控制,就像把银行的设计图交给抢劫犯一样。Lua是一种被广泛用于游戏开发中的计算机语言,方便开发者定制自己所需的功能。其中,红遍全球的《愤怒的小鸟》就是由Lua语言用Wax开发的。此外,梦幻西游、奇迹暖暖、开心消消乐、放置奇兵、最强蜗牛等手游也采用了Lua语言进行编写。近年来,Lua脚本在游戏行业长期流行,但Lua脚本泄露事件屡见不鲜,其安全性也引起关注。不法分子通过开私服、开

  • Twitter不再屏蔽《纽约邮报》关于拜登之子报道的文章链接

    Twitter周五表示,在共和党议员指责其审查保守派言论后,该公司已不再屏蔽《纽约邮报》一篇包含对民主党总统候选人乔·拜登之子指控的文章链接。该公司最初在周三屏蔽了该文章的链接,因为该内容违反了其禁止传播黑客材料的规则,以及另一项禁止发布人们的电子邮件和电话号码等个人信息的政策。

  • 知乎好物,一篇文章赚4W经验分享

    大家好,我是”从零开始“,在今年 5 月份时通过生财有术分享的一篇帖子开始尝试做知乎好物,单打独斗做了三个月后遭遇流量瓶颈,在看了天枢哥公众号上的一篇关于「知+」的文章之后, 8 月份时决定加入社群,成为了天哥的二期学员。

  • 搜狗发布组件化代码解耦框架 极大降低组件化重构成本

    9 月 28 日,搜狗正式发布SogouModuleBus组件化解耦框架,为业界贡献新的组件化解决方案。同时,这款基于搜狗立体化架构思维诞生的组件化框架,将会进一步降低开发者的组件化重构成本。代码耦合,是指软件工程中不同模块和类之间的依赖关系。耦合度高,则代码之间的依赖度高,往往容易出现牵一发而动全身的被动局面。因此开发者们需要对高耦合度代码进行解耦,让业务模块之间的关联依赖降到最低。此次搜狗SogouModuleBus组件化框架

  • 微软已移除Windows 10中用于通话的相关代码:全面转战安卓

    对于微软来说,他们已经彻底放弃Windows Phone了。根据一些网友发现的情况看,通话相关的GUID随着2020年3月发布的预览版就已经删除了。对于那些不熟悉的人来说,全球唯一标识符(GUID)通常被

  • 斗鱼向虎牙发布致歉声明:转载失实文章构成不正当竞争

    今日,斗鱼在微博对虎牙发布致歉声明称:“对于去年转载的失实文章侵害了广州虎牙信息科技有限公司及虎牙直播平台的商业信誉,产生了负面的影响。我司的行为已被法院认定构成不正当竞争。我司现向广州虎牙信息科技有限公司及虎牙直播平台郑重道歉。”

  • 黑客声称获取育碧尚未发布游戏《看门狗:军团》源代码

    育碧和Crytek(欧洲的电子游戏开发商)这两家当今最大的游戏公司数据遭泄露,原因是一个名为Egregor的勒索软件团伙在窃取了这家两家公司内部网络窃取的数据,并在暗网上公布。

  • 微软已移除Windows10中用于通话的相关代码,全面转战安卓

    对于微软来说,他们已经彻底放弃Windows Phone了。根据一些网友发现的情况看,通话相关的GUID随着 2020 年 3 月发布的预览版就已经删除了。对于那些不熟悉的人来说,全球唯一标识符(GUID)通常被开发人员和微软用于运行脚本或进程。

  • [图]微软发布两个紧急安全更新:修复远程代码执行漏洞

    今天微软发布了两个不定期的例外(Out-of-Band)安全更新,重点修复了WindowsCodecs库和VisualStudioCode应用中的安全问题。这两个例外安全更新是本月补丁星期二活动日之后再发布的,主要修复了两款产品中的“远程代码执行”漏洞,能够让攻击者在受影响的设备上远程执行代码。

  • 苹果笑而不语:源代码泄露显示 微软秘密打造酷似Mac的WinXP主题

    泄露的源代码展示了微软当初打造Windows XP更多趣事,比如他们曾秘密准备了一个版本,让该操作系统看起来更接近于 Mac。最近泄漏的Windows XP源代码泄漏了微软在操作系统上的早期工作,其中一

  • 开发人员现可在Windows上构建和运行Swift代码项目

    苹果的Swift编程语言本周正式登陆Windows,现在可以从开源项目下载Swift工具链图片。

  • 一篇文章带货2200万,知乎还有多大的可能?

    2020 年注定不平凡,在实体经济艰难辗转的同时,互联网平台创作、知识分享带货等“新个体经济”蔚然兴起。

  • iOS 14.2测试版亮相 代码显示买iPhone你要小心没配件

    ​9 月 30 日凌晨,苹果公司向用户和开发者们推送了iOS 14.2测试版系统,该版本除了改进一些Bug之外,似乎没有增加什么功能和新的特性。但是,iOS 14. 2 测试版中出现的一小段代码引起了大家的注意,这段代码或暗示了苹果以后不会在iPhoen包装中赠送EarPods耳机。

  • 执掌百度20年 李彦宏没为产品写过一行代码

    百度迎来创业二十年,官方纪录片《二十度》(点击观看)也正式上线。影像资料中介绍了一些不为人知的百度幕后故事,比如百度集团资深副总裁崔珊珊爆料,李彦宏是百度第一版的产品经理,但没有

  • Linux Kernel 5.10本周合并引入了对 AMD/Intel新硬件的性能代码支持

    本周一的 Linux 5.10 窗口合并,为“Perf”子系统添加了对 AMD 和 Intel 新硬件的支持。除了大量的 Intel / AMD x86 更改,还有 Ingo Molnar 发出的性能事件查询请求。以 AMD Zen / Zen 2 处理器的运行时平均功率限制(RAPL)为例,其代码现已扩展适用于 Family 19h(即 Zen 3),辅以专为 AMD 制定的诸多性能修复。

  • 参与评论
文明上网理性发言,请遵守新闻评论服务协议
  • 热门标签