您好,欢迎来到网址免费提交!网站收录,值得选择!
当前位置:网址免费提交 » 站长资讯 » 免费资源 » 技术文章 » 文章详细

Asp数据操作组件(百万级分页)(修改版)

来源:站长分类目录 浏览:381次 时间:2014-10-26
       偶是一个底层的ASP技术人员(属于半路出家的那种,以前是一名网络技术人员),最近参与制作一个CRM系统,架够采用ASP+SQL,考虑到以后数据查 询效率问题,所以在网上找了一个 Asp数据操作组件(百万级分页) ,实用环境:Asp+DLL+MsSQL(这个网上很多地方都可以下载),并且其中结合SQL存储过程,说实话以前SQL存储过程接触的比较少,所以在调 试该组件的时候遇到了一些问题,并试着改了一下(作者别生气(^..^)),高手们别笑话我。

      原代码如下:

 有分页列表数据:
 cls.tblName="Tablename" '表名
 cls.fldName="Id" '排序关键字段
 cls.PageIndex=Request("P")*1 '当前页码
 cls.PageSize=20 '每页列数
 cls.OrderType=1 '排序方式,0 、1 
 cls.strWhere=StrW '查询条件,不带Where
 cls.ListUrl="?Y="&Y&"&M="&M&"&D="&D&"&Sn="&Sn&"&P=" 分页URL
Set Rs=cls.Result
do while not rs.eof
rs.movenext
loop

分页数据 cls.page

       在原文的使用说明中,在翻页代码中对表查询默认是全部字段也就是*,这样是不是会浪费资源,而无法查询需要的字段,于是我在DLL代码中新加入一个变量名 为zdName,作为传递可控制查询条件的变量,同时在SQL存储过程中也加入相应的接受变量@zdName 字符型。

     在这个小问题解决后,又在使用上发现cls.strWhere付给它的变量StrW 如果条件变量其中带有类似 例如 a='b'则执行SQL存储过程时候会提示错误,后来发现是DLL代码中:

sql = "exec GetList " & tblName & "," & fldName & "," & PageSize & "," & PageIndex & "," & OrderType & ",'" & strWhere & "' "

这个地方是否写的不够严谨,在StrW中如果含有单引,那么将无法执行,所以我在DLL的VB代码改成

If InStr(strWhere, "'") <> 0 Then
       sql = "exec GetList " & tblName & "," & fldName & "," & PageSize & "," & PageIndex & "," & OrderType & ",""" & strWhere & """ "
       Else
       sql = "exec GetList " & tblName & "," & fldName & "," & PageSize & "," & PageIndex & "," & OrderType & ",'" & strWhere & "' "
      End If

试了试目前的问题确实解决了,这个组件我也是刚刚使用,希望对大家能有点帮助!

修改版下载:Asp数据操作组件(百万级分页)(修改版)

推荐站点

  • 纸质化妆盒_环保眼影盒纸质化妆盒_环保眼影盒

    1、纸质眼影盒特点,产品多元化:工艺纸盒具有重量轻、品种多样化的特点。不像注塑的产品由于磨具限制的原因,款式形状单一。2、环保优势:纸质眼影盒内外选用的均是纸质的环保材料,具有可回收、可降解等特点,相比现有的眼影盒通过注塑成型,更加环保,可有效防止环境的污染和破坏不但可以重复利用,还可以用废弃的纸包装制品造肥。3、技术优势:纸包装材料伸缩性小,不受热和光的影响,具有更好的稳定性;纸的不透明性,能够提供隐蔽隔离,使某些产品不能从包装外部看到,满足了某些产品的包装需要。工艺纸盒还具有良好的透气性、柔软性、强度及可控的撕裂性能;使产品有很好的弹性和韧性,可以对被包装物提供一定的保护作用。 纸质化妆盒、又叫纸质眼影盒、纸质腮红盒、眼影纸本、手工眼影本、眼影书本等叫法、纸质化妆品盒有优势。。。

    www.f58f.com
  • 免费信息发布_免费网址提交_免费供求信息_企业平台_企业资讯平台-咱的商务网免费信息发布_免费网址提交_免费供求信息_企业平台_企业资讯平台-咱的商务网

    咱的商务网是一个集企业平台、企业资讯、免费信息发布、免费网址提交,免费供求信息等频道于一体的互联网平台。 网站定位精确,服务专业、稳定,网站上线以后受到广大用户的良好反馈。 咱的商务网是企业间(B2B)电子商务信息沟通的桥梁。面向国内外供应商、采购商、贸易商、生产商提供产品信息服务。以会员的形式,面向中小型投资者提供各类型供求、合作、技术信息发布,并以其为基础,拓展企业信息库、产品信息库和相关的个性化服务。 为广大企业提供系统、丰富、全面、深入、及时的信息资讯、技术项目、市场信息、会展信息和人才信息等。 咱的商务网是倡导一站式服务理念的综合性信息服务平台,已成为企业、用户实现信息化和获取资讯的门户。 本网站免费注册会员、免费信息发布、网站免费收录、b2b信息发布平台、信息网站大全、商务信息网、免费收录网站、网址免费提交、供求信息发布。

    www.zandeb2b.com
  • beauty_manicures_pedicures | EverlastingBeautybeauty_manicures_pedicures | EverlastingBeauty

    Everlasting Beauty Co.,Ltdd offers beauty, manicure、pedicure, eyelashes, nail, nail art, nail supply, nail art tools, beauty tools etc. and we are an union team of professional manufacturers for beauty products located in Zhejiang Province China since 2003

    www.elbeautyhouse.com
  • 免费发布信息网站大全_大中国商业信息网免费发布信息网站大全_大中国商业信息网

    大中国商业信息网免费发布不限制条数,大中国商业信息网是一个可以免费发布分类信息的B2B平台。可免费发布您的产品信息!便捷免费的B2B供求信息发布平台

    www.greatcnb2b.com
  • 免费发布信息网站大全_大中华电子商务网免费发布信息网站大全_大中华电子商务网

    大中华电子商务网免费发布不限制条数,大中华电子商务网是一个可以免费发布分类信息的B2B平台。可免费发布您的产品信息!便捷免费的B2B供求信息发布平台

    www.greatercnb2b.com