马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
帮助用户快速实现各种应用服务,ASP商有整合各方面资源的能力,可在短期内为用户提供所需的解决方案。例如,典型的ERP安装,如果要在客户端安装的话需要半年到二年的时间,但是美国的一些ASP商如USI和CORIO能在90—120天内提供ERP应用方案。技能|办理[媒介]
我们常常会碰到多重查扣问题,而长长的SQL语句常常让人丈二僧人摸不着思想。出格是客户端部分填进查询前提时,如用一般办法将更是难上加难。
以下奇妙天时用"where1=1"的恒等式(现实上良多,让它值为TRUE便可)办理此成绩。
[注释提要]
subject信息题目
company公布信息的公司称号
content公布信息的内容
address公司地点
infomation公司简介
note相干申明
以上值均由FORM提交,然后经由过程:subject=trim(Request.Form("subject"))等失掉响应的值。
<%
这个函数很关头!---------------------------
Functionsql(a,b,sqls)
ifb""then假如客户端没有提交此值,则不会发生响应的SQL语句。
sqls=sqls&"and"&a&"like%"&b&"%"
endif
sql=sqls
EndFunction
-----------------挪用数据库
Setconn=Server.CreateObject("ADODB.Connection")
DBpath=Server.MapPath("/database/mydb.mdb")
Conn.Open"driver={MicrosoftAccessDriver(*.mdb)};pwd=;dbq="&DBpath
Setrs=Server.CreateObject("ADODB.Recordset")
sqls="select*frommytablewhere1=1"
以下挪用下面的函数便可,能够良多个挪用(实际上是恣意)
sqls=sql("subject",subject,sqls)
sqls=sql("company",company,sqls)
sqls=sql("content",content,sqls)
sqls=sql("address",address,sqls)
sqls=sql("infomation",infomation,sqls)
sqls=sql("note",note,sqls)
sqls=sqls&"orderbyiddesc"
rs.opensqls,conn,3,2
%>
[停止语]
假如没有关头的函数Functionsql(a,b,sqls),我们能够设想,必要几判别的一个接一个的语句!
问题是他们究竟是喜欢他们是使用软件时,速度快还是速度慢好.(当然在3秒以内).无论是他们输入资料时,查找资料时,分析资料时. |